0

Is it possible to change the event of a button click within different subs? For example, have the button take me to the main menu in one sub, but in another sub have the same button take me somewhere else.

4
Contributors
6
Replies
8
Views
6 Years
Discussion Span
Last Post by AndreRet
Featured Replies
  • [CODE]Dim flag As Integer Private Sub Command1_Click() If flag = 0 Then Flag1 Else Flag2 End If End Sub Private Sub Flag1() MsgBox ("flag 0") flag = 1 End Sub Private Sub Flag2() MsgBox ("flag 1") flag = 0 End Sub [/CODE] Read More

1
Dim flag As Integer
Private Sub Command1_Click()
If flag = 0 Then
Flag1
Else
Flag2
End If
End Sub
Private Sub Flag1()
MsgBox ("flag 0")
flag = 1
End Sub
Private Sub Flag2()
MsgBox ("flag 1")
flag = 0
End Sub
0

I would declare the flag public and then give it a value based on what I need to do. Say for instance your user has added a new record to your database and you now need to take him back to the main form, do this -

'In a module, add the following...

Public flag As Integer

'In your form you will use something like...

Private Sub Command1_Click()

'You are finished with the data add, now give flag a value...
flag = 1
End Sub

Private Sub Command2_Click()

If flag = 1 Then
    Form2.Show
    
    flag = 0
    Unload Me
        Else
    'flag = 0, do something here...
    MsgBox "What do I do now?"
End If
End Sub
This question has already been answered. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.