學習與應用

各位前輩你們好!!
前輩!

Sub 學習()
[F1] = ""
If MsgBox(" 練習已結束～即將關閉檔案！", 16384 + 2, " 終止與重試 , 略過及說明鈕應用練習") = vbAbort Then
[F1] = "Ａ"
ElseIf vbRetry Then
[F1] = "Ｒ"
ElseIf vbIgnore Then
[F1] = "ｉ"
ElseIf vbHelp Then
[F1] = "Ｈ"
End If
End Sub

複製代碼

請問為何按略過鈕F1= "Ｒ"而非= "ｉ"
   再問如何讓說明鈕成為有效鈕
   不知程式如何寫才能達成目的
   請知道的前輩,不吝賜教謝謝再三!!

樓主熱帖

myleoyes

高中生 Rank: 3 Rank: 3

帖子: 463
主題: 116
精華: 0
積分: 580
點名: 0
作業系統: Vista
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2010-5-4
最後登錄: 2017-11-13

論壇贊助勳章論壇榮譽勳章

2^#

發表於 2014-7-18 21:17 | 顯示全部帖子

回復 2# stillfish00
前輩!!
   謝謝!程式雖解決[F1] = "ｉ"的問題
   但是說明鈕依然為無效鈕
   也就是說[F1]無法 = "Ｈ"請再指導謝謝再三!!

TOP

myleoyes

高中生 Rank: 3 Rank: 3

帖子: 463
主題: 116
精華: 0
積分: 580
點名: 0
作業系統: Vista
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2010-5-4
最後登錄: 2017-11-13

論壇贊助勳章論壇榮譽勳章

3^#

發表於 2014-7-21 21:42 | 顯示全部帖子

回復 4# stillfish00
前輩!!
   謝謝!是的msgbox 回傳值是沒vbHelp
   然而vbMsgBoxHelpButton值是16384 將 Help按鈕新增到訊息方塊中。
   既然將 Help按鈕新增到訊息方塊中。
   照理說按Help鈕也應該如前輩!所訴連結msgbox引數"helpfile"定義的檔案
   可是卻為無效鈕很納悶??所以提問題討論想解心中疑惑?謝謝再三!!

TOP

myleoyes

高中生 Rank: 3 Rank: 3

帖子: 463
主題: 116
精華: 0
積分: 580
點名: 0
作業系統: Vista
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2010-5-4
最後登錄: 2017-11-13

論壇贊助勳章論壇榮譽勳章

4^#

發表於 2014-7-22 21:42 | 顯示全部帖子

回復 6# stillfish00
前輩!!
謝謝指導!小弟整理一下思緒再提問辛苦囉謝謝再三!!

TOP