最正統的方法是把textbox1的tabindex屬性設為0(其他控件的tabindex不能是0)
創新互聯主營石屏網站建設的網絡公司,主營網站建設方案,手機APP定制開發,石屏h5小程序制作搭建,石屏網站營銷推廣歡迎石屏等地區企業咨詢
要在load事件里用textbox1.focus()也可以,但要先me.show(),否則不會起作用。因為控件得到焦點需要控件”可見可用“,在formload階段整個窗體是“不可見"的,需要強制使用me.show()。
你如果使用VB.NET,點擊其中一個“tab order”的圖標,此時您可以單擊每個控件的數字(越小越表示越容易被聚焦),NET默認就可以用Tab進行焦點切換(順序就是按照數字從小到大的順序)。 至于按Enter自動切換,您需要自行在支持按鍵的控件事件中(比如TextBox)的KeyPress事件中編寫代碼: private void textBox1_KeyPress(object sender, KeyPressEventArgs e)
{
if (e.KeyChar == 13)
{
XXX(控件).Focus();
}
}
最正統的方法是把TextBox1的TabIndex屬性設為0(其他控件的TabIndex不能是0)
要在Load事件里用TextBox1.Focus()也可以,但要先Me.Show(),否則不會起作用。因為控件得到焦點需要控件”可見可用“,在FormLoad階段整個窗體是“不可見"的,需要強制使用Me.Show()。
Public
Class
Form3
按下,顯示控件,并獲得焦點.
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
TextBox1.Visible
=
True
TextBox1.Focus()
End
Sub
判斷是否獲得焦點.
Private
Sub
Button2_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button2.Click
If
TextBox1.Focused
=
True
Then
MessageBox.Show("已經獲得焦點了.")
Else
MessageBox.Show("已經失去焦點了.")
End
If
End
Sub
失去焦點后自動陷藏.
Private
Sub
TextBox1_LostFocus(ByVal
sender
As
Object,
ByVal
e
As
System.EventArgs)
Handles
TextBox1.LostFocus
TextBox1.Visible
=
False
End
Sub
End
Class
方法如下:
1、打開例1.1創建的工程。
2、選擇窗體Form1并雙擊該窗體,出現窗體的調事件的過程代碼體。
3、在窗體調用的過程代碼體中編制如下過程代碼:
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、設置窗體Form1的SartUpPosition屬性為2-屏幕中心,這樣運行窗體可以發現,屏幕的大小與例1.6中通過屬性設置的大小是一致的。
方法和詳細的操作步驟如下:
1、第一步,打開VB軟件,然后在表單上添加兩個文本框,見下圖,轉到下面的步驟。
2、第二步,完成上述步驟后,分別設置兩個文本框的屬性,然后清除文本框的內容,見下圖,轉到下面的步驟。
3、第三步,完成上述步驟后,添加兩個命令按鈕,見下圖,轉到下面的步驟。
4、第四步,完成上述步驟后,分別設置兩個文本框的屬性,并分別命名為“左”和“右”,見下圖,轉到下面的步驟。
5、第五步,完成上述步驟后,雙擊名為“左”的命令按鈕以編輯其代碼,見下圖,轉到下面的步驟。
6、第六步,完成上述步驟后,雙擊名為“右”的命令按鈕以編輯其代碼,見下圖,轉到下面的步驟。
7、第七步,完成上述步驟后,運行程序,單擊命令按鈕,然后在文本框中觀察焦點變化,見下圖。這樣,就解決了這個問題了。
本文題目:vb.net控件得到焦點,vb中獲得焦點
轉載注明:http://m.kartarina.com/article20/heihjo.html
成都網站建設公司_創新互聯,為您提供網頁設計公司、用戶體驗、微信小程序、動態網站、定制開發、建站公司
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯