推 LHE:最簡單的應該是加上On Error Resume Next吧? 一點小小意見 01/04 09:54
推 fumizuki:If Val(Text5.Text) > 23 Then ... 01/04 12:31
推 BearWu:因為你執行動作的關係吧Text5_Change，當Text5一改變就會執 01/04 12:58
→ BearWu:行msgbox吧，試著用其他的動作來判斷吧 01/04 12:59
各位大大以下是我的一小段程式...
Private Sub Text5_Change()
If Text5.Text > 23 Then
MsgBox "Value must < 24"
Text5.Text = 0
End If
End Sub
如果在欄位中輸入大於23的值...
就會出現警告訊息...
但是現在有各問題...
假設我欄位中已經有各值了...假設18...
然後我把18反白按delete刪除...
會跑出型態錯誤:13的訊息~_~...然後程式就關掉了..
問題出在這一段...
如果用倒退鍵<--也會有這問題...
請問有大大知道如何解決嗎??讓他也支援用delete刪除??
和倒退鍵??
不然根本無法修改值~_~...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.120.55.214
※ 編輯: badsan 來自: 59.120.55.214 (01/04 09:33)