[VB6 ] 按Delete所發生的問題

看板Visual_Basic作者 (.........)時間18年前 (2007/01/04 09:16), 編輯推噓3(301)
留言4則, 3人參與, 最新討論串1/1
各位大大以下是我的一小段程式... 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)

01/04 09:54, , 1F
最簡單的應該是加上On Error Resume Next吧? 一點小小意見
01/04 09:54, 1F

01/04 12:31, , 2F
If Val(Text5.Text) > 23 Then ...
01/04 12:31, 2F

01/04 12:58, , 3F
因為你執行動作的關係吧Text5_Change,當Text5一改變就會執
01/04 12:58, 3F

01/04 12:59, , 4F
行msgbox吧,試著用其他的動作來判斷吧
01/04 12:59, 4F
文章代碼(AID): #15d5MBOO (Visual_Basic)
文章代碼(AID): #15d5MBOO (Visual_Basic)