如何使用Form.Recordset中的值来调整branch（if - else）

Question

我有一个MS-Access（前端）+ MySQL（BackEnd）项目

名为STATUS

的表格中有DEL_FLG和TB_STATUS列

strSQL = "SELECT * FROM TB_STATUS"
rs.Open strSQL, cn, adOpenKeyset, adLockOptimistic
If rs.RecordCount <> 0 Then
    Set Form.Recordset = rs
    rs.Close
End If

用户界面

|text||valid||invalid|

如果值为0，则DEL_FLG的值无效，无效按钮的值为DEL_FLG，如果为1，则值{{1}}会让您使有效按钮无效

怎么做？

Answer 1

假设您的按钮名为myButton，我认为您想要做的事情是这样的：

strSQL = "SELECT * FROM TB_STATUS"
rs.Open strSQL, cn, adOpenKeyset, adLockOptimistic
If rs.RecordCount <> 0 Then
    Set Form.Recordset = rs

    if rs("DEL_FLG") = 0 then
        me.myButton.enabled = false
    else
        me.myButton.enabled = true    
    end if
    rs.Close
End If

注意：我不确定MySQL如何存储布尔值（0，-1）或（0,1）=＆gt; （真实，错误），所以可能需要一些游戏。