Language Basics VisualBasic Script

Sub helpFile()
    Dim lngQ As Long
    lngQ = MsgBox("Do you want to delete this workbook?", vbYesNo _
        + vbCritical + vbDefaultButton2 + vbMsgBoxHelpButton, _
        "Delete Workbook", "c:\Help.chm", 1012)
End Sub