|
-
Oct 31st, 1999, 10:07 AM
#1
Thread Starter
New Member
The code below is my check for a letter through a textbox array...it doesnt seem to work since it has a type mismatch at the points with ***
Thanx in advance.
Dim i As Integer
i = 0
Dim letterCheck(2) As Integer
Dim searchStr As String
searchStr = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
For i = 0 To 2
letterCheck(i) = InStr(txtValues(i), searchStr)
If letterCheck(i) = Not (0) Then
Answer = "LETTER"
txtValues(i).Text = ""
Exit For
End If
Next i
*** a = txtValues(0)
*** b = txtValues(1)
*** c = txtValues(2)
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|