vb textbox 只能輸入英文字母
1樓:網友
private sub text1_keypress(keyascii as integer) 注意這裡text1的事件是keyascii不是change
if keyascii < 90 and keyascii > 65 then 這是大寫的。
elseif keyascii < 122 and keyascii > 97 then 這是小寫的。
elsekeyascii = 0
msgbox "輸入的必須是英文字母!", 64, "請注意"
end if
end sub
樓上的用chr函式來識別keyascii值方法比較簡單,不過我想我的你比較看得懂(對於初學者而言)
2樓:微標科技
'新增窗體form1,文字框text1,然後新增如下**:
private sub text1_keypress(keyascii as integer)
if not chr(keyascii) like "[a-za-z]" then keyascii = 0
end sub
3樓:網友
1 判斷keyascii值在65 和 90之間 以及 在 97 和 122 之間就可以。
2 用正規表示式。
如何才能讓vb裡的text控制項只能輸入數字?
4樓:網友
在文字框的更改事件中,使用isnumeric函式進行字元型別的判斷,如果出錯則清空輸入框,彈出提示資訊,範例**如下:
private sub text1_change()if isnumeric( = false thenmsgbox "只能輸入數字"
end if
end sub
5樓:網友
const xstr as string = "0123456789"
先宣告乙個常量,並把你想禁用或允許輸入的內容賦值給它。
private sub text1_keypress(keyascii as integer)
只能輸入數字。
keyascii = iif(instr(xstr & chr(8), chr(keyascii)),keyascii, 0)
end sub
private sub text2_keypress(keyascii as integer)
只能輸入數字以外的字元。
keyascii = iif(instr(xstr, chr(keyascii)),0, keyascii)
end sub
vb6.0裡怎樣讓乙個textbox中只能輸入數字,而不能輸入字母,如果輸入字母,會有視窗跳出提示錯誤?
6樓:網友
兩種方法可處理:
1、textbox獲得焦點時,鎖定字母鍵,只開放數字鍵(或小鍵盤)。
2、命令按鈕中加入一段測試控制程式,點選命令按鈕後,先測試textbox中是否為你要求的數字型別,如果有字母的話,則跳出「輸入錯誤」對話方塊,textbox中是你要求的數字型別才能放行。
用vb怎麼使文字框中只能輸入字母
7樓:匿名使用者
你好,暫時可以這樣做(選擇key_press事件)private sub text1_keypress(keyascii as integer)
select case keyascii
if not ((keyascii>=asc("a") and keyascii<=asc("z") or (keyascii>=asc("a") and keyascii<=asc("z")) or (keyascii=vbkeyback))
keyascii = 0
end select
end sub
vb.net 讓相應的textbox中只能輸入「中文字元、英文、數字」
8樓:網友
每個textbox都有keypress事件(event),每次使用者輸入乙個字元時檢測,如不滿足則清空。
我現在不在vs下,你可以找到這個面板,繫結相應的函式。
比如只能顯示數字。
private sub numbox_keypress(keyascii as integer)
if not isnumeric( then
end if
end sub
只能顯示英語(a-z 97-122; a-z 65-90; 8(退格)和13(換行))
private sub engbox_keypress(keyascii as integer)
if not (keyascii >= 97 and keyascii<=122) or (keyascii <= 90 and keyascii>=65) or = 8 then
end if
end sub
只能顯示漢字(漢字的ascii值要麼小於0,要麼是8(退格)和13(換行))
private sub chinesebox_keypress(keyascii as integer)
if not keyascii < 0 or keyascii = 8 or keyascii = 13 then
end if
end sub
在VB中如何讓MDI子窗體總在最前
沒有辦法取消合併,但是可以考慮把兩個窗體設為正常窗體,然後將父窗體調整為佔滿整個螢幕,並把視窗設為最前 窗體背景顏色設為灰色。這樣有選單的子視窗就在父視窗的範圍內顯示,就產生出 mdi 窗體的效果了。如果這樣做,還需要注意乙個問題,那就是 父窗體 的某些事件沒有影響到 子窗體 例如當 父窗體 最小化...
vb中如何在text控制項裡禁止拷貝和貼上
判斷鍵值應該可以,vb不是可以監控鍵盤按下和談起麼!如果按下的鍵值是ctrl c或是v那麼就不讓造作,這樣應該就可以了吧。 vb中可設定textbox控制項的enabled 屬性為false禁制拷貝和複製。enabled 屬性,返回或設定乙個值,該值用來確定乙個窗體或控制項是否能夠對使用者產生的事件...
在vb裡如何將日期加減得出天數
似水流年 其實vb提供了乙個計算兩個日期相差的函式datediff,在實際應用之中我們可以進行日期相減運算,但是vb推薦的還是使用vb自己提供的內部函式為好!乙個例子 private sub command1 click dim days as integer dim data1 as date d...