Form_Activate question

[CoderNewbie]

This runs fine in the IDE but when I compile it and run it... I dont get the case select question... the program just exits after the Call is finished... Anyone have any ideas?

Private Sub Form_Activate()
    Dim SaveName As String
    
    SaveName = "c:\auto.bat"
    Set FSOFolder = MyFSO.GetFolder("d:\")
    Call RecurseDirs(FSOFolder)
    lblFile.Caption = "Scan Complete"
     
    Select Case MsgBox("Scan is now complete Notify Network Administrator?" vbYesNo 
    Case vbYes
        Open SaveName For Output As #1
            Print #1, "Yes... Notify Admin"
        Close #1
            Call MsgBox("Thank you for your time.", vbInformation + vbDefaultButton1, "")
            End
 
    Case vbNo
        Open SaveName For Output As #1
            Print #1, "No... Don't Notify Admin"
        Close #1
            Call MsgBox("Thank you for your time.", vbInformation + vbDefaultButton1, "")
           End
    End Select
    
End Sub

Thanks