標題: Msgbox 的回傳值問題?? [打印本頁]

---

作者: hugh0620    時間: 2010-12-2 18:29     標題: Msgbox 的回傳值問題??

Dear 大大

     小弟的問題如下

    MsgBox "請確認是否要刪除匯出的資料", Buttons:=vbYesNo + vbQuestion, Title:="是否刪除"
     if MSGBOX按下確定後,就執行刪除
      但如何抓到按確定時,會觸動刪除的指令
     If ????????????? Then
         Sheet9.Rows("7:2000").Delete
     End If

---

作者: GBKEE    時間: 2010-12-2 19:12

回復 1# hugh0620

1. Sub Ex()
   
2.     If MsgBox("確定刪除 ???", vbQuestion + vbYesNo, "刪除") = vbYes Then
   
3.         MsgBox "刪除完畢  !!", , "刪除"
   
4.     Else
   
5.         MsgBox "取消刪除  !!", , "刪除"
   
6.     End If
   
7. End Sub

複製代碼

---

作者: hugh0620    時間: 2010-12-3 09:15

回復 2# GBKEE


    謝謝大大~ 我的問題已經解決了~ 也有記錄並學習怎麼運用了~ 感恩~

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)