Thursday 30 December 2010

Lezione di visual basic con Snake - Creare una calcolatrice a 17 pulsanti.wmv

Title:
Lezione di visual basic con Snake - Creare una calcolatrice a 17 pulsanti.wmv


Video:


Description:In questo video tutorial con il visual basic impareremo a creare la calcolatrice con codici di programmazione, se volete copiarvi i codici eccoli elencati: Per il form subito dopo la scritta Pubblicclass form 1: Dim a, b As Double Dim op As String Per i pulsanti numerati da 0 a 9 il seguente: textbox1.text=textbox1.text+ "1" cambiare solo il numero nelle virgolette ad ogni pulsante per programmarlo Pulsante addizione a = CDbl(TextBox1.Text) op = "+" TextBox1.Text = "" Pulsante sottrazione: a = CDbl(TextBox1.Text) op = "-" TextBox1.Text = "" Pulsante moltiplicazione: a = CDbl(TextBox1.Text) op = "*" TextBox1.Text = "" Pulsante divisione: a = CDbl(TextBox1.Text) op = "/" TextBox1.Text = "" Pulsante uguale =: b = CDbl(TextBox1.Text) Select Case op Case "/" TextBox1.Text = a / b Case "*" TextBox1.Text = a * b Case "+" TextBox1.Text = a + b Case "-" TextBox1.Text = a - b End Select Pulsante esci: close

Published:
30/Dec/2010

No comments:

Post a Comment