مبتدی: تیک خوردن چک باکس با نوشتن متن در تکس باکس [بایگانی]

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

mulesaberi

دوشنبه 24 خرداد 1395, 23:55 عصر

با سلام به همه دوستان
میخوام در فایل زیر به محض نوشتن در تکس باکس، تیک مربط به چکس باکس بصورت خودکار زده شود.

amirzazadeh

سه شنبه 25 خرداد 1395, 09: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, 13:22 عصر

ممنونم کمک کردین