How to condition branch (if - else) with the value from Form.Recordset

Question

I have a project with MS-Access (Front End) + MySQL (BackEnd)

There are STATUS and DEL_FLG columns in a table called 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

User Interface is

|text||valid||invalid|

A value of DEL_FLG is invalid with an invalidity button in the case of 0, and a value of DEL_FLG wants to let you invalidate an effective button in the case of 1,

How to do it?

Answer 1

Assuming that your button is called myButton, I think what you want to do something like this:

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

Note: I'm not sure how MySQL store booleans (0, -1) or (0, 1) => (true, false), so some playing might be necessary.