Message boxes in VB 1

[hoofit]

Good morning,
Can someone assist with code for a message box that contains the yes - No - Cancel options as vb.net has here

whichButtonDialogResult = MessageBox.Show("Add current values to the total?", _
"Save?", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

Thank you

 

[SkipVought]

Hi,

Take a look at the InputBox, or design your own.

Skip,

_[red][/red]

 

[alvechurchdata]

I think you'll find MsgBox to be familiar:

whichButtonDialogResult = msgbox("Add current values?", _               
                          vbYesNo + vbQuestion, _
                          "Save")

Geoff Franklin

http://www.alvechurchdata.co.uk

 

[TheAceMan1]

How are ya hoofit . . .

Try the msgbox function:

[blue]   Dim Msg As String, Style As Integer, Title As String, Rtn
   
   Msg = "Your Text Here"
   Style = vbInformation + vbYesNoCancel
   Title = "Testing"
   Rtn = MsgBox(Msg, Style, Title)
   
   If MsgBox = vbYes Then
      [green]'do this[/green]
   ElseIf MsgBox = vbNo Then
      [green]'do that[/green]
   Else
      [green]'cancel code here[/green]
   End If[/blue]

See Ya! . . . . . .

 

[hoofit]

alvechurchdata,
Most familiar indeed. That hit the spot! I was wondering when I would hit familiat territory.

Thank you!