1樓:匿名使用者
** option explicit
dim defs as string
private sub form_activate()defs = "請在這裡輸入" '定義提示字元command1.setfocus '給按鈕置焦點end sub
private sub text1_gotfocus() '文字框得到焦點
if text1 = defs then text1 = ""
end subprivate sub text1_lostfocus() '文字框失去焦點
if text1 = "" then text1 = defsend sub
2樓:匿名使用者
private sub text1_click()
text1.text = ""
end sub
3樓:匿名使用者
dim str
private sub form_mousemove(button as integer, shift as integer, x as single, y as single)
tooltiptext = str
end subprivate sub text1_click()str = tooltiptext
text1.tooltiptext = ""
end sub
關於vb程式設計實現:在文字框中每輸入乙個字元時,立即在窗體上輸出當前文字框中的內容。實驗步驟及指導如下
4樓:怖鬽魂魄
text1_change 事件
print text1 '這個就是在窗體上列印text1.text資料 ,text屬性是這個控制項預設的所以可以不寫
當text1的內容被改變時,就觸發這個事件
text1_lostfocus 事件
print "***" & text1 & "***" '想必應該不是 ;號吧...
當text1失去焦點時觸發這個事件,比如你按 清除 按鈕時,按鈕得到了焦點,text1則失去焦點
在計算機中 焦點是唯一的
command1_click 事件
cls '清除
text1.text = "" '賦值text1.text為空
text1.setfocus 'text1得到焦點
單擊這個按鈕時觸發
最後乙個就不用說了.....
而且不應該這樣用end......而是 unload me
5樓:匿名使用者
private sub text1_change() 』這個表示是text1_change()事件,本行表示事件過程的開始
print text1 '這個表示在窗體上顯示text1 的文字內容
end sub '本行表示事件過程的結束
private sub text1_lostfocus() 』這個表示是text1_lostfocus()事件,本行表示事件過程的開始
print "***"; text1; "***" '這個表示在窗體上顯示text1 的文字內容,內容左右各加3個「*」
end sub '本行表示事件過程的結束
private sub command1_click() 』這個表示是command1的單擊事件,本行表示事件過程的開始
cls '清除窗體上的顯示內容
text1.text = "" '清除文字框text1裡的內容
text1.setfocus '使得文字框text1獲得焦點,即游標處於該控制項裡
end sub '本行表示事件過程的結束
private sub command2_click() 』這個表示是command2的單擊事件,本行表示事件過程的開始
end '結束本程式的執行
end sub '本行表示事件過程的結束
事件是物件導向程式設計語言的乙個重要而基本的概念,是windows程式設計的最基本的途徑與方法。可以這麼說,編寫事件過程**是編寫最簡單最基本的基於 windows的應用程式的基本。
在vb6裡,提供的控制項,具有各種各樣的事件;
VB中如何輸入文字框文字輸入字元,在這字元後加上
private sub text1 change if len text1.text 4 then text1.text text1.text end sub 我精心寫了一段哦!現在針對的是text1這個控制元件只需要放一個text1控制元件在窗體上在複製這段 貼上執行就可以了。我想了3種方法,一個...
怎麼實現滑鼠點選input輸入框彈出日期選擇框
妖豔美好 最簡單的方式就是使用h5裡提供的新屬性,用法如下 如果你的專案裡不支援h5或者h5不適用,就只能自己用js來實現了 顯示在下面 顯示在右面 年 月 日 格式 月 日 年 格式 只能選擇2009 8 8以前的日期 只能選擇2009 8 18以後的日期 這2個文字框,前面的日期不能大於後面的日...
C中如何判斷標點符號,c 如何判斷文字框中的一串文字中是否含有某個字母或標點符號
方法1.正規表示式 bool regex.ismatch inputstring,模式 匹配英文中的標點符號。還要什麼標點符號自己往裡新增就是了。方法2.char and array.indexof array.indexof new char inputstring.tochararray 0 方...