控制按钮是否可用示例

时　间:2023-05-03 12:21:21
作　者:张志   ID：8  城市：上海  QQ：2851379730
摘　要:点击子窗体某条记录，控制控件可用与否。
正　文:

主要用到了if条件语句和 Enabled属性，示例代码如下：

Private Sub ID_GotFocus()
    Me.Parent.Form!Command1.Enabled = False
    Me.Parent.Form!Command2.Enabled = False
    Me.Parent.Form!Command3.Enabled = False
    '根据子窗体的选择记录来控制某些控件的可用与否
    If Me.CurrentRecord = 1 Then '如果选择的是第一条记录
        Me.Parent.Form!Command1.Enabled = True
    ElseIf Me.CurrentRecord = 2 Then '如果选择的是第二条记录
        Me.Parent.Form!Command2.Enabled = True
    Else
        Me.Parent.Form!Command3.Enabled = True
    End If
End Sub

示例下载：

点击下载此附件