Nwlapcug.com


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



Caselle di testo vengono utilizzate principalmente per ricevere l'input da parte degli utenti, o testo di visualizzazione o pre-programmati o da un'origine di database. In Visual Basic 6.0, il controllo di "TextBox" viene utilizzato per disegnare una casella di testo in un Windows Form. Le proprietà del controllo possono essere impostate a seconda delle esigenze dell'utente. Ad esempio, è possibile impostare una casella di testo di sola lettura o modificabile, con colore di sfondo diverso, o con le barre di scorrimento. È anche possibile limitare il tipo di testo di input che può accettare. Imparare a creare un programma in Visual Basic 6.0 che limita un input di casella di testo ai numeri soltanto.

Istruzioni

1

Caricare l'ambiente di Visual Basic 6.0 cliccando l'icona del programma scelta rapida dal desktop, oppure selezionando "Microsoft Visual Basic 6.0" dal menu "Start" nel vostro computer.

2

Selezionare "EXE Standard" nella finestra di dialogo "Nuovo progetto", quindi fare clic sul pulsante "Apri".

3

Aggiungere una casella di testo nel modulo facendo clic sul controllo "TextBox" dal "Toolbox", disegnando le dimensioni della casella di testo desiderato, quindi. Assicurarsi che sia sufficientemente larga contenere caratteri di input da parte dell'utente.

4

Deselezionare la didascalia di testo cancellando la parola "Text1" accanto alla proprietà "Text" la finestra "Proprietà" sul lato destro dello schermo.

5

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

6

Inserire il codice seguente all'interno dell'evento "Text1_Change":

Se non IsNumeric(Text1.Text) poi

MsgBox "Numeric input only!", vbCritical, "Invalid Input"

Text1.Text = ""

End If

7

Premere F5 o scegliere "Run" quindi "Start" dal menu per passare alla modalità di runtime.

8

Testare il programma per verificare che sia in esecuzione come dovrebbe. È possibile digitare caratteri alfanumerici o combinazione di lettere e numeri nella casella di testo. Si dovrebbe vedere un messaggio di errore che ti permette di conoscere l'input non è valido. Ora, è possibile digitare solo numeri nella casella di testo. Se nessun messaggio di errore visualizzato, è possibile che il programma viene eseguito correttamente.

9

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