1
ห้อง MS Access / : ขอวิธี เมื่อกดปุ่มนี้ เเล้วจะล้างข้อความทั้งหมดในเเต่ละช่อง
« เมื่อ: 07 ก.ค. 66 , 15:34:55 »
Dim ctl As Control
For Each ctl In Me.Controls
If (ctl.ControlType = acTextBox) Then
ctl.Value = Null
End If
Next ctl
For Each ctl In Me.Controls
If (ctl.ControlType = acTextBox) Then
ctl.Value = Null
End If
Next ctl