ورود

View Full Version : مبتدی: تیک خوردن چک باکس با نوشتن متن در تکس باکس


mulesaberi
سه شنبه 25 خرداد 1395, 00:55 صبح
با سلام به همه دوستان
میخوام در فایل زیر به محض نوشتن در تکس باکس، تیک مربط به چکس باکس بصورت خودکار زده شود.
amirzazadeh
سه شنبه 25 خرداد 1395, 10:44 صبح
سلام
از اين كد استفاده كنيد.

Private Sub Text0_Change()
If Len(Text0.Text) > 0 Then
Me.Check2.Value = True
Else
Me.Check2.Value = False
End If
End Sub
mulesaberi
سه شنبه 25 خرداد 1395, 14:22 عصر
ممنونم کمک کردین