返回列表 上一主題 發帖

請問如何顯示訊息問題

本帖最後由 luhpro 於 2016-4-30 05:12 編輯

回復 1# chaoyiho
那就比照辦理囉:
  1. Sub 詢問與防呆()

  2.   Dim ans As Integer
  3.   ans = MsgBox("您的表格是XXX嗎?", _
  4.   vbYesNo + vbQuestion, "您選擇了XXX表")

  5.   If ans = vbYes Then
  6.     ans = MsgBox("您的表格是XXX嗎?", _
  7.     vbYesNo + vbQuestion, "您確定處理XXX表嗎? 是(Y) 否(N)")
  8.     If ans = vbNo Then Exit Sub ' 直接跳出 Sub
  9.   Else
  10.     Exit Sub
  11.   End If
  12.   ' 都按確定後的處理作業
  13. End Sub
複製代碼

TOP

本帖最後由 luhpro 於 2016-5-6 23:37 編輯
回復  luhpro
前輩抱歉 這樣的語法似乎陳述式是錯誤的
ans = MsgBox ("您的表格是XXX嗎?" _
vb ...
chaoyiho 發表於 2016-5-3 09:09

咦?
我執行起來沒有問題啊?
基本上我丟上來的程式碼都會實際執行確認過可行,
除非我有特別註明未經實測過,
或是程式太簡單 亦或是 時間來不及側.

回復  chaoyiho
...
但是
如果選擇的是"是"
那該怎麼讓他判讀是否為要分析的固定格試表單呢?
chaoyiho 發表於 2016-5-3 12:23


我無法憑空想像你所謂的 "判讀" 是用甚麼條件做依據,
判讀的標的又是甚麼.

你要不要附上檔案看看,
可以先把隱私或個資 資料酌予遮罩,
或是你能敘述得更完整詳細一些.

TOP

        靜思自在 : 【行善要及時】行善要及時,功德要持續。如燒開水一般,未燒開之前千萬不要停熄火候,否則重來就太費事了。
返回列表 上一主題