主题：[求助]两列满足条件按钮名改变

列名值 1 2 3 且显隐逻辑列都为true 窗口里面的按钮才改名，求助

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:两列按钮名改变.foxdb

 

 

Select Case e.DataCol.Name

    Case "显隐","列名"

        Dim dr As DataRow = e.DataRow

        If dr("显隐") = True AndAlso dr("列名")= "1" Then '如果要列名值等于 1 2 3 三行且显隐类都为true 按钮名称才变化呢?

            Forms("窗口1").Controls("CheckBox1").text = "yyy"

            Forms("窗口1").Controls("Button1").text = "ff"

        Else

            Forms("窗口1").Controls("CheckBox1").text = "aa"

            Forms("窗口1").Controls("Button1").text = "bb"

        End If

End Select