Come limitare una casella di testo al solo numeri in Visual Basic 6.0

Le caselle di testo sono utilizzati principalmente per ricevere input dagli utenti , oppure per visualizzare testo o pre-programmata o da una fonte di dati . In Visual Basic 6.0 , il controllo " TextBox " è usato per disegnare una casella di testo in un form Windows . Proprietà del controllo possono essere impostati in funzione delle esigenze dell'utente . Ad esempio, è possibile impostare una casella di testo in sola lettura o modificabile , con diverso colore di sfondo , o con le barre di scorrimento . È anche possibile limitare il tipo di input di testo di accettare. Scopri come creare un programma in Visual Basic 6.0 che limita un ingresso casella di testo ai soli numeri . Istruzioni
1

caricare l'ambiente di Visual Basic 6.0 , fare clic sull'icona di collegamento del programma dal desktop , o selezionando " Microsoft Visual Basic 6.0 " dal menu "Start" nel vostro computer .

2

Seleziona " EXE standard " nella finestra di dialogo "Nuovo progetto" , quindi fare clic sul pulsante "Apri" .
3

Aggiungere una casella di testo nel modulo con il pulsante " "controllo dal" TextBox Strumenti ", quindi disegnare la dimensione del testo casella desiderata . Assicuratevi che sia abbastanza larga per contenere i caratteri di input da parte dell'utente .
4

Cancella il sottotitolo di testo , cancellando la parola " Text1 " accanto alla proprietà "Text" alla finestra "Proprietà" sulla destra lato dello schermo .
5

Fare doppio clic sul controllo casella di testo per visualizzare la finestra "Codice" . Questo è dove si scrivono le istruzioni o codici sorgenti che eseguite dal programma in fase di esecuzione . Il codice sorgente che si sta per scrivere convaliderà l'input dell'utente ed accetta solo caratteri numerici , altrimenti verrà visualizzato un messaggio di errore
6

inserire il seguente codice all'interno dell'evento " Text1_Change " : .

If Not IsNumeric ( Text1.Text ) Poi

MsgBox " Inserimento numerico solo ! " , vbCritical , "Invalid Input "

Text1.Text = " "

End If
7

Premere F5 o selezionare " Esegui " e poi "Start " dal menu per passare alla fase di esecuzione -mode.
8

prova il programma per controllare che sia esecuzione come dovrebbe. Tipo di caratteri alfanumerici o una combinazione di lettere e numeri nella casella di testo . Si dovrebbe vedere un messaggio di errore ti permette di sapere l'input non è valido. Ora , digitare solo il numero nella casella di testo . Se nessun messaggio di errore compare , il programma è in esecuzione correttamente .
9

Salva il programma selezionando " Salva progetto " dal menu "File" . Fornire un nome nell'apposito spazio , quindi fare clic su "Salva".

• Come utilizzare un Select Case con Microsoft Visual Basic 2008 
• Come verificare se un file esiste in VB6