Get Task Dialog Result from CreateObject

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi. I know how to create task dialog through createobject() code. I put the code in the Module.  

But how can I get which button the user click?

     Dim ts As Object

    Set ts = CreateObject("Codejock.TaskDialog." + XtremeSuiteControls.Version)

    With ts
        .Reset

        .WindowTitle = "Information Program & Management System"
        .EnableMarkup = True

        .AllowCancellation = False

        .AddButton "&Yes", 10
        .AddButton "&No", 20
        .DefaultButton = 20

            .MainInstructionText = "Save Changes?"
            .ContentText = "Changes detected."

            .MessageBoxStyle = True

        .ShowDialog

        '====> How can I know WHich button the user clicks? <=====

    End With