Scrittura di un programma di calcolatrice standard in Visual Basic è un buon esercizio per i programmatori Visual Basic di principiante. Una calcolatrice di base contiene cifre "0" a "9," un pulsante, un pulsante di punto decimale, un tasto clear, un pulsante di equals e pulsanti per eseguire addizioni, sottrazioni, moltiplicazioni e divisioni. I controlli CommandButton sono inseriti in un form e quantità minima di codice è scritto per ogni evento di click del pulsante per il programma. Risultati vengono visualizzati in un controllo casella di testo nella parte superiore del modulo.

Istruzioni

1

Aprire il progetto di Visual Basic calculator. Il progetto dovrebbe contenere controlli CommandButton per cifre "0" a "9," un pulsante per il segno del numero, un pulsante decimale, un tasto clear, un pulsante di equals e pulsanti per eseguire l'operazione matematica specificata.

2

Dichiarare un tipo di variabile "Double" per contenere il primo valore immesso e il secondo valore inserito, se non già dichiarato. Rendere la variabile "privato" al form. Anche essere sicuri esistono variabili booleane dichiarate di sapere che tipo di operazione viene eseguito. Un valore booleano è true o false.

Dim Private dFirst as Double

Dim Private secondo as Double

BAdd Dim as Boolean

Dim bSubtract as Boolean

3

Memorizzare la cifra si fa clic su nella variabile "dFirst" nell'evento click dell'operatore matematico. Anche catturare quale pulsante di funzionamento è stata selezionata e impostare di conseguenza il valore booleano. Ad esempio, se è stato selezionato il pulsante di "aggiunta", è possibile impostare bAdd su"true". Se i pulsanti di funzionamento sono stati definiti in una matrice, il codice sarebbe simile:

Selezionare indice di caso

Caso 0

bDivision = True

Caso 1

bMultiply = True

Caso 2

bSubtract = True

Caso 3

bAdd = True

End Select.

4

Archivio il secondo valore entrato in "soli" e quindi scrittura una "istruzione If" per eseguire l'operazione sulle due cifre e visualizzare il risultato nel pulsante "Uguale a" fare clic su codice di evento. L'istruzione"If" è scritto come "se bAdd quindi txtResult.text = dFirst + secondo

End If"dove"txtResult"è il controllo casella di testo nella parte superiore del modulo.

Consigli & Avvertenze

• Nel pulsante "Clear" evento click, cancellare il contenuto della casella di testo risultato e assicurarsi di ripristinare tutte le variabili boolean false.