Board logo

標題: 關於msgbox的問題! [打印本頁]

作者: yenwang    時間: 2016-3-16 00:19     標題: 關於msgbox的問題!

目前現在製作表單的資料填寫
當使用者填入數據之後,按下OK按鈕
程式會確認資料是否正確
若有數據超過範圍
則會跳出警告訊號
想問說,當使用者將警告訊號按確定後
如何讓表單維持在當下,讓使用者修改後
再按OK按鈕檢查

我目前只會當按下OK檢查後,有警告訊號出現,使用者按確定後
則整個表單會跳出,需要再次填寫><
相關程式碼如下!!

If SPBch.TextBox1.Value = "" Then
        
     MsgBox "透明度數值空白!!", vbCritical, "失敗"
     End
        
     ElseIf Val(SPBch.TextBox1.Value) < 0 Or Val(SPBch.TextBox1.Value) > 100 Then
        
        MsgBox "透明度數值輸入錯誤,請重新執行", vbCritical, "失敗"
        End
        
    Else
        spb02 = Val(SPBch.TextBox1.Value)
    End If
作者: stillfish00    時間: 2016-3-16 16:44

回復 1# yenwang
End 改為 Exit Sub
作者: yenwang    時間: 2016-3-16 23:23

回復 2# stillfish00

非常感謝
有試成功了!




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