关于控件焦点的问题

zzzzh429 2008-09-17 06:21:53
我试着作了一个小程序,包含一些Button,TextBox,ListBox控件,其中TextBox控件数量只有1个。
我想在运行程序时,焦点自动定位到TextBox控件上,效果就是一开始运行程序光标会自动定位到TextBox中。

请问大家这个效果应该使用什么方法?
...全文
82 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
zzzzh429 2008-09-17
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 sunxinyu 的回复:]
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.TextBox1.Focus()
End Sub


因为,form_load 的时候界面已经画完了
[/Quote]
OK,已经学会了,多谢指点
sunxinyu 2008-09-17
  • 打赏
  • 举报
回复
当然,设置tabindex也是一个办法
sunxinyu 2008-09-17
  • 打赏
  • 举报
回复
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Me.TextBox1.Focus()
End Sub


因为,form_load 的时候界面已经画完了
zzzzh429 2008-09-17
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 ZengHD 的回复:]
VB.NET code Private Sub Form1_Shown(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Shown
TextBox1.Focus()
End Sub
[/Quote]
不知道为什么好像不起作用,我查阅了书籍应该也是这样,但是焦点不自动上TextBox控件
ZengHD 2008-09-17
  • 打赏
  • 举报
回复
    Private Sub Form1_Shown(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Shown
TextBox1.Focus()
End Sub
ZengHD 2008-09-17
  • 打赏
  • 举报
回复
把要定义的文本框的TabIndex设置为最小

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧