添加按鈕1代碼 彈出簡單提示框 添加按鈕2代碼 彈出處理反饋操作的提示框， 如果用戶確認，則執(zhí)行確認方面的操作 如果用戶取消，則執(zhí)行取消方面的操作添加按鈕3代碼 在反饋提示框中加入定制的圖標生成exe文件進行測試 彈出。

彈出提示框一般有3種 1alert 普通提示框2prompt 可輸入的提示框3confirm 可選擇的提示框下面舉個例子lt！doctype html Document第一種alert第二種prompt第三種confirm function mal。

responsewrite quotquotresponsewrite quotalert#39恭喜，注冊成功單擊“確定”登陸本站#39quotresponsewrite quotquotresponsewrite quotquot。

Private Sub Command1_ClickTimer1Enabled = True#39打開計時器 End Sub Private Sub Form_LoadTimer1Enabled = False#39關閉計時器 Timer1Interval = 3000#39計時器間隔3000毫秒，即3秒 End Sub Private Sub Timer1_。

Msgbox quot請注意quot，48，quot警告quot。

用MsgBox 函數(shù)，參見以下代碼 Dim Msg， Style， Title， Help， Ctxt， Response， MyString Msg = quotDo you want to continue ？quot #39 定義信息 Style = vbYesNo + vbCritical + vbDefaultButton2 #39 定義。