My goal it’s to find if is possible to return same as Vb6, every thing in one line.
'Button1Text', 'Button2Text', 'Button3Text', ueWindow) Select Case b //determine which button was pressed.ĭim res as integer = BKS.Alert( kAlertCaution, 'Title Message.', _ Here’s what we’ve used for years (we also have a training video on how to create this):įunction Alert(Type as AlertTypes, Title as string, msg as string, btn1txt as string, btn2txt as string, btn3txt as string, w as window = nil) As integerĭim d as New MessageDialog //declare the MessageDialog objectĭim b as MessageDialogButton //for handling the resultĭ.icon=MessageDialog.GraphicCaution //display warning iconĭ.CancelButton.Visible= True //show the Cancel buttonĭ.AlternateActionButton.Visible= True //show the “Don’t Save” buttonĭ.AlternateActionButton.Caption = btn3txt
Delete/Cancel, Open/Cancel, or whatever you want. The better way is to have a button with an action. Over the years Apple, and more recently Microsoft have moved away from the simple responses (yes/no, abort/retry/cancel) because users found them confusing.
MsgBox is more or less the equivalent of the old VB6 Msgbox.
