تايمر

[morika]

با سلام خدمت همه دوستان:
مي خواستم كدي براي من بنويسيد كه يه تايمر زماني شروع به كار كنه (Enabled=trute)كه محتويات يك تكس باكس از مثلا چهار كاراكتر بيشتر بشه.
خيلي ممنون.

[اوبالیت به بو]

Private Sub Text1_Change()
If Len(Text1.Text) > 4 Then
Timer1.Enabled = True
Else
Timer1.Enabled = False
End If
End Sub

اصلاح شد.