Begging Help - About Forms

[charmedcharmer]

I designed a form so it could function like the MsgBox(). So there'll be at least 2 buttons, Ok and Cancel. Now in using the MsgBox() you an evaluate what the user pressed by simply

     result = MsgBox "Blah, Blah, Blah"

I also want my newly created form to execute a result when the buttons inside it are pressed. ANy suggestion on how I'll do this?

[Lightning]

check this thread, it might help you

[brucevde]

Add a method (function) to your message box form. Include any required arguments in the parameters list.

'in message box form
Private mlngResult as VbMsgBoxResult
 
Public Function GetResult(Byval MessageText as String) as VbMsgBoxResult
 
     txtMessage.Text = MessageText
 
     Me.Show vbModal
 
     GetResult = mlngResult
 
     Unload Me
 
End Function
 
Private Sub cmdOk_Click() 
      mlngResult = vbOk
      Me.Hide
End Sub
 
Private Sub cmdCancel_Click()
     mlngResult = vbCancel
     Me.Hide
End Sub
 
'in any other form
If frmMessageBox.GetResult("This is a test") = vbOk Then
Else
End If