In un texbox scrivo un numero qualsiasi, come faccio a verificare che quello che ho scritto sulla textbox è un numero o stringa ?
Public Sub Button1_Click()
Dim s As String = TextBox1.Text
If s Then
Select TypeOf(Val(s))
Case 1
Print "Booleano"
Case 2
Print "Byte"
Case 3, 4, 5
Print "Numero intero"
Case 6, 7
Print "Numero in virgola"
Case 8
Print "Data"
Case Else
Print "Stringa"
End Select
Else
Print "Nessun dato"
Endif
EndA tal riguardo colgo l'occasione per rinviare alla seguente pagina della nostra Wiki:Codice: [Seleziona]......
Select TypeOf(Val(s))
......