trying to put a limit on number of letters in a in

Konnan
08-06-2001, 09:22 PM
trying to put a limit on number of letters in a inputbox wondering what the santax is

Conan Visinko

orufet
08-08-2001, 11:52 PM
This should work....


Private Sub Command1_Click()
Dim MyVar As String
Dim MyVarLength As Integer
MyVarLength = 11

Do While MyVarLength > 10 'Limit to 10 chars
MyVar = InputBox("Type in something")
MyVarLength = Len(MyVar)
Loop
End Sub

Jacob Sheehy
http://www.sheehy.ca

The more I C, the less I see.

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum