' 20-November-2011 Example program by J. van Zijl aka Slowdown. ' A DialogBox with multiple options. ' compiler beta june 22 2011 ' IDE beta july 11 2011 ' You can find me on, ' http://www.q7basic.org/forum/index.php and ' http://www.kbasic.com/forum/index.php Event Init() End Event Signal on_pushButton_clicked(Checked As Boolean) Dim n As Integer n = OpenDialog("mydialog") MsgBox("n", n) MsgBox("Return value ", ReturnValue) End Signal