Un requisito fondamentale di qualsiasi linguaggio di programmazione è la possibilità di aggiungere due valori , se il valore numerico o valori di stringa . Microsoft Visual Basic fornisce entrambe queste funzionalità per il programmatore . Per i valori numerici , è possibile scegliere qualsiasi numero di tipi di dati , tra cui interi, decimali e altro , più scientifico, tipi . Qualunque cosa i valori necessari per aggiungere , Visual Basic dovrebbe essere in grado di gestire l'operazione abbastanza facilmente . Istruzioni
Initial Setup
1
Avviare l'applicazione Visual Basic . Aprire il progetto esistente oppure fare clic su "Nuovo progetto ".
2
rotolare il cursore sopra il menu degli strumenti a sinistra e fare doppio clic su due caselle di testo , un pulsante e un'etichetta . Questo aggiunge questi controlli al form nella finestra di progettazione .
3
Trascinare i controlli intorno al modulo fino a quando non sono allineati correttamente in un modo che sembra organizzato e ha un senso . Le due caselle di testo terranno input dell'utente , l'etichetta riceverà i risultati del vostro codice , e il pulsante sarà effettivamente eseguire il codice.
4
Fare doppio clic sul pulsante sul form . La finestra di codifica si aprirà e l'editor di Visual Basic verrà posizionare il cursore tra una voce routine Sub e una riga End Sub . Il tuo codice andrà tra queste righe . Quando si esegue il programma in realtà , questo è il codice che viene eseguito quando si fa clic sul pulsante .
Aggiunta di valori numerici
5
Per aggiungere numeri , aggiungere il seguente codice tra la linea di routine Sub e la riga End Sub aggiungere due numeri :
Dim Num1 , Num2 , TotalNum as Integer
TextBox1.Text > niente allora
Textbox2.Text > niente allora
Prova
Num1.Focus ( ) per
Num1 = Integer.Parse ( TextBox1.Text )
Num2.Focus ( ) per
Num2 = Integer.Parse ( Textbox2.Text ) per
TotalNum = Num1 + Num2
Label1.Text = TotalNum.ToString ( ) per
cattura
MessageBox.Show ( " è richiesto un numero valido " ) per
End Try
Else
MessageBox.Show ( " Un numero è richiesto in il secondo campo " ) per
Torna
Else
MessageBox.Show ( " il numero è richiesto nel primo campo " ) per
Return
End If
l' istruzione Dim dichiara tre variabili di tipo Integer , e il codice successivo costringe l'utente a immettere valori numerici o di un messaggio di errore viene generato . Facendo clic sul pulsante fa sì che il codice da eseguire e analizzare le stringhe di numero di operazioni matematiche da Visual Basic . I numeri vengono sommati e inseriti nel campo TotalNum , che VB converte quindi in un valore di stringa e di luoghi nel campo Label1.Text .
6
clic sull'icona della freccia verde per eseguire il debug del progetto . Il vostro modulo dovrebbe aprire per testare il vostro codice .
7
Eseguire un test positivo , che è talvolta chiamato scendendo il "percorso felice". Chiave un numero nel primo campo e un numero nel secondo campo . Fare clic sul pulsante . Si dovrebbe vedere il risultato appare nel campo etichetta .
8
Eseguire un test negativo per i caratteri alfabetici keying in uno o entrambi i campi e facendo clic sul pulsante . Si dovrebbe vedere un messaggio di errore per ogni campo in cui digitato caratteri non numerici .
Aggiunta ( concatenazione ) stringhe di caratteri
9
Inserisci il seguente codice tra la procedura sub intestazione e l' End Sub linea finale :
TextBox1.Text > niente allora
Textbox2.Text > niente allora
Label1.Text = TextBox1.Text & Textbox2.Text
Else
MessageBox.Show ( " Una stringa è richiesto nel secondo campo" ) per
Torna
Else
< p > MessageBox.Show ( " una stringa è richiesta nel primo campo" ) per
Torna
End If
Questo codice verifica che un valore viene inserito in ogni campo e poi concatena le due stringhe , ponendo la stringa risultante nel campo Label1.Text .
10
Fare clic sulla freccia verde per eseguire il debug del progetto . Il vostro modulo dovrebbe aprire per testare il vostro codice .
11
Eseguire un test positivo inserendo una stringa nel primo campo e una stringa nel secondo campo . Fare clic sul pulsante e il codice dovrebbe virare le due stringhe insieme e mettere il risultato nel campo Label1.Text .
12
Eseguire un test negativo digitando nulla in uno o entrambi i campi e facendo clic sul pulsante . Si dovrebbe vedere un messaggio di errore per qualsiasi campo dove non hai nulla chiave