Ikke modal form benyttet som MsgBox custom designet
Jeg prøver at lave en ikke modal Msgbox custom designed,der skal returnere Ja/ Nej afhængig af valg på en buttom
Private Sub OK_Click()
Public_String = "Ja" (Declaration: Public Public_String As String)
'Me.OpenArgs = "Ja" <= Alternativ
DoCmd.Close acForm, Me.Name
End Sub
Jeg kalder Formen således:
Overfør = "Luk Gantt Planer"
DoCmd.OpenForm "MsgBox_Custom_Design", , , , , , Overfør
If Public_String = "Ja" Then
xxxxx
end if
Men Public_String (Global) er tom !!!!!!!!!
Nb jeg ville allerhelst benytte OpenArgs til at returnere Ja/Nej svaret
men det virker slet ikke
Kan i hjælpe