1樓：完運旺任春
vb文字框可通過文字框的keypress事件來判斷輸入字元的keyascii值來禁止輸入特定字元。
**例項，禁止輸入大寫a字元：
private sub text1_keypress(keyascii as integer)
if keyascii = 65 thenkeyascii = 0
end if
end sub
keypress
事件，此事件當使用者按下和鬆開乙個
ansi
鍵時發生。
keyascii
整數，包含引發
accesskeypress
事件的按鍵（除
alt鍵外）的
ascii
值，與標準的
keypress事件採用的方法相同。
2樓：都金蘭甫秋
是之前複製過記事本裡的內容然後點選text1然後自動黏貼嗎如果是private
subtext1_click()
'或者text1_gotfocus
text1.text=clipboard.gettextendsub
VB中控制滑鼠的移動，VB 中如何控制滑鼠移動
這不是乙個函式的使用問題 這個問題是 在vb中呼叫系統函式 去搜尋這個問題吧，我也不會 vb 中如何控制滑鼠移動 我怎麼感覺，ls兩位有點答非所問。呵呵 你想只是改變窗體中的位置不是螢幕上的位置的話。一 你在x,y座標是分別加上 me.width 和me.height 加上窗體的橫座標和縱座標不就是...
VB 滑鼠移進移出的問題，VB 滑鼠移進移出的問題。
dim mlblflag as boolean dim mlblchecked as integer 重新整理所有lbl背景 private sub clslblbkcolor vcolor as long dim olbl as label for each olbl in me.label1 i...
vb獲取某視窗內相對座標，vb 獲取滑鼠在窗體內的相對座標
其實得到窗體的控制代碼就什麼都得到了 vb 獲取滑鼠在窗體內的相對座標 有個笨方法，試試 注意表單整大點 private sub form mousemove button as integer,shift as integer,x as single,y as single if x 100 or...
vb題一道，求解疑，VB題一道，求解疑
假設陣列中的不是1 10，而是1 2n n可能為任意大於0的整數 你的寫法就沒有上面寫得通用，按簡化程度說，他的 比你少1行，但做了同樣一件事 n n 1 與你的n 11 i 是一樣的作用，正可謂異曲同工！一開始，它的n 10，i 1 而每一次迴圈，n n 1，那麼 n 就是 10，9，8，7，6 ...
vb分段函式程式設計錯誤求解，vb 乙個分段函式 程式設計錯誤 求解
private sub form click dim x as integer,y as integerx val inputbox 請輸入x值 if x 10 then y 2 x 3 else if 10 x 20 then y x x 5 else if x 20 then y lnx x e...