Remember me
Password recovery

People Free mobile sexchat no registrations

I have already visited a lot of countries and saw a lot of different cultures.
Remove the next two lines ' if you don't want your users being able to ' type in the thousands separator at all. " & _ vb Lf & vb Lf & "Please try again.", vb Exclamation With Controls("Text Box" & X) . Class1 = Obj End If Next Set Obj = Nothing End Sub Dim Text Boxes() As New Class1 Private Sub Command Button1_Click() Dim X As Long For X = 1 To 6 If Controls("Text Box" & X) = "." Then Msg Box "You cannot enter only a decimal point in the Text Boxes... Set Focus End With End If Next End Sub Private Sub User Form_Initialize() Dim Counter As Integer, Obj As Control For Each Obj In Me. Name Like "Text Box[1-6]" Then Counter = Counter 1 Re Dim Preserve Text Boxes(1 To Counter) Set Text Boxes(Counter).