1樓：匿名使用者
建立文字框text1輸入文字，
建立5個文字框text2~text6輸出，text1得到焦點時（即游標在text1內時）按f1-f5。
private sub text1_keydown(keycode as integer, shift as integer)
select case keycode = vbkeyf1 then '按下f1
case vbkeyf1 '按下f1
text2 = text1
case vbkeyf2 '按下f2
text3 = text1
case vbkeyf3 '按下f3
text4 = text1
case vbkeyf4 '按下f4
text5 = text1
case vbkeyf5 '按下f5
text6 = text1
end select
end sub
2樓：匿名使用者
建議你找本vb書先系統學習下。 即使現在告訴你了。你也只會生硬套用。
3樓：冰魄軒轅
private sub text1_keydown(keycode as integer, shift as integer)
if keycode = 112 then '按下f1clipboard.clear
clipboard.settext text1.textend if
end sub
vb中怎樣通過命令按鈕結束過程，vb中怎樣通過命令按鈕結束一個過程
按鈕時結束command1下面的過程？不一定能實現，因為command1按下了可能已經掛起，不讓你按command2了。如果非得要做，你可以這樣 外面 dim a as boolean command1 裡寫 if a then exit sub a 0 command2 裡寫 a 1 雙擊按鈕後，...
關於VB的問題
label中不能加入 建立一個listbox 一個picturebox 一個按鈕 如下 可自動調整大小 來適合 picturebox控制元件大小 picture1.print 廣東人 case 1 picture1.picture loadpicture picture1.print 山東人 cas...
關於VB的小問題，關於VB的一個小問題
有按鈕在flash中 on release 在vb2008 private sub s1 fscommand byval command as string,byval args as string messagebox.show args end sub private declare sub s...