Microsoft Forms 20 Object Library Vb6 -
Private Sub btnSubmit_Click() MsgBox "Customer: " & txtName.Text & vbCrLf & _ "Active: " & IIf(chkActive.Value, "Yes", "No") Unload Me End Sub
for easier maintenance
Recommendations
Private Sub btnSubmit_Click() MsgBox "Customer: " & txtName.Text & vbCrLf & _ "Active: " & IIf(chkActive.Value, "Yes", "No") Unload Me End Sub
for easier maintenance
Recommendations