Avviare il programma di Visual Basic dal computer facendo clic su "Start> Programmi> Visual Studio > Microsoft Visual di base ".
2
Creare un nuovo " progetto "dal menu file. Se si dispone di un progetto esistente , fare clic su "File> Apri progetto. " Sfoglia il file e aprirlo.
3
Selezionare il "Form" in cui si desidera disegnare e personalizzare caselle di input . Trascinare e rilasciare i controlli " TextBox " dalla finestra " cassetta degli attrezzi" in forma nella posizione che si preferisce. Queste caselle di testo servirà come le caselle di immissione nel programma.
4
Cancellare i testi predefiniti dalle scatole per eliminarli in su. Passare alla finestra "Proprietà" sulla destra , trova la proprietà "Text" e cancellare il testo . È anche possibile fare questo nel codice inserendo un codice simile a quello riportato di seguito nell'evento " Form_Load " : .
For i = 0 a 10, dove i è il numero di testo boxesText ( i) Testo = " " Next i
5
Cambiare il colore delle caselle di input sfondo quando l'utente digita qualcosa nella scatola . Inserire un codice simile a questo durante l'evento " Text_Change " :
Text1.BackColor = ' & H00C0FFFF e ' ' il colore di sfondo cambia da bianco a giallo
6
Limit il numero di caratteri delle singole caselle di input può contenere. Si può fare questo in fase di progettazione o durante la scrittura dei codici sorgente . In fase di progettazione , fare clic sulla casella di immissione e passare alla finestra "Proprietà" . Impostare la proprietà " MaxLength " a 25 , per esempio. Fare lo stesso per il resto delle caselle di input . Per fare questo i codici sorgente , digitare un codice simile all'evento " Form_Load " :
Text1.MaxLength = 25Text2.MaxLength = 15
7
Convalidare il tipo di dati che il input dell'utente nelle caselle prima di elaborarle . Ad esempio, è possibile visualizzare un messaggio del tipo " Invalid Input " se un utente digita le lettere in una casella di input che accetta solo numeri . Digitare un codice simile a quello riportato di seguito nell'evento " Text1_Validate " : " Questo campo richiede un input numerico "
If Not IsNumeric ( Text1.Text ) Then MsgBox , vbCritical , " Input non valido" Label9 . ForeColor = vbRed Text1.SelStart = 0 Text1.SelLength = Len ( Text1.Text ) Text1.SetFocusEnd se
8
Eseguire il programma e verificare se le caselle di input hai personalizzato funzionano come dovrebbero.
9
Salvare il lavoro . Fare clic su "File > Salva progetto con nome " e immettere il nome del progetto nella " Salva con nome" finestra di dialogo.
Programmazione © www.354353.com