IsNumeric Function

munkeyb0i

Hi,
The program that I have to make is suppose to check if the things I entered in the textbox is numeric and also if it's 9 digits. I tried a lot of ways to do it but none of them seem to work. Maybe someone can help me. This is my code for it:

Private Function TestInput() As Boolean

If IsNumeric(txtID.Text) and Len(Val(txtID.text)) Then
MsgBox("Please enter an appropriate FID.", MsgBoxStyle.Exclamation, "Enter FID Properly")
txtFID.Focus()
Return False
End If
End Function

Thanks

Nov 20 '06 #1

Killer42

This might be some help (just off the top of my head, not tested) Also note, we may be using different versions of VB - this should work in VB6.

Also, according to the manual, the input for IsNumeric must be a variant, not a string. I haven't checked this.

Nov 20 '06 #2

munkeyb0i

Yeah unfortunately, that doesn't work. It might be b/c i'm using VB5 but don't know. Thanks for your effort though

Nov 20 '06 #3

Killer42

Yeah unfortunately, that doesn't work. It might be b/c i'm using VB5 but don't know. Thanks for your effort though

Hm... you could try leaving out the IsNumeric check. Try this... Incidentally, I think we'll need more information than "doesn't work" to help further. It's a bit vague.

Nov 20 '06 #4

munkeyb0i

Yeah I finally got it. I just made 2 if statements and it works perfectly.


'return false if it is not all numbers inputted in the textbox
If IsNumeric(txtID.Text) = False Then
MsgBox("Please enter an appropriate ID.", MsgBoxStyle.Exclamation, "Enter ID Properly")
txtFID.Focus()
Return False
End If

'return false if it's not 9 digits long
If Len(txtID.Text) <> 9 Then
MsgBox("Please enter an appropriate ID.", MsgBoxStyle.Exclamation, "Enter ID Properly")
txtFID.Focus()
Return False
End If

Thanks for your help killer

Nov 20 '06 #5

Killer42

No worries. I'm glad it helped.

I'm curious, though - based on the .Focus method and the Return statement, this is not VB6 or earlier. Must be some version of VB.Net, correct?

Nov 20 '06 #6

munkeyb0i

Oh yeah...sorry...it's VB.Net. I guess it's a lot different from VB6 eh?

Nov 20 '06 #7

Killer42

Oh yeah...sorry...it's VB.Net. I guess it's a lot different from VB6 eh?

Details do differ quite a bit, but the logic tends to work the same across lots of languages, so we can often help. Feel free to try us. (As with this thread, you may need to adjust the answers slightly.)

You could also try the .Net forum when you have questions, as they may have more directly related experience.

Nov 20 '06 #8

munkeyb0i

Details do differ quite a bit, but the logic tends to work the same across lots of languages, so we can often help. Feel free to try us. (As with this thread, you may need to adjust the answers slightly.)

You could also try the .Net forum when you have questions, as they may have more directly related experience.

Oh okay then...thanks:D

Nov 20 '06 #9