窗体上所有控件的输入法关掉!
将窗体上所有控件的输入法关掉!
来源:不祥
Private Sub Form_Open(Cancel As Integer)
Dim ctl As Access.Control
For Each ctl In Me.Controls
Debug.Print ctl.Name & ctl.ControlType
If ctl.ControlType = acTextBox Then
ctl.IMEMode = 2
End If
Next
End Sub
Access软件网交流QQ群(群号:198465573) |