关于textbox的问题????? 怎么才能让textbox获得焦点时使得它其中的文本呈现全选的状态??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这样Me.Text1.SelStart = 0Me.Text1.SelLength = Len(Me.Text1.Text)Me.Text1.SetFocus Me.Text1.SetFocusMe.Text1.SelStart = 0Me.Text1.SelLength = Len(Me.Text1.Text) Private Sub Text1_GotFocus()With Text1.SelStart = 0.SelLength = Len(Text1)End WithEnd Sub Private Sub Text1_GotFocus()With Text1.SelStart = 0.SelLength = Len(Text1.Text)End WithEnd Sub Me.Text1.SetFocusMe.Text1.SelLength 建议你用combox控件实现你的功能更好!直接combox1.setFocus就可以被选中 SelStart = 0来晚一步 http://expert.csdn.net/Expert/topic/2303/2303407.xml?temp=.3497888中有自动生成代码的例子 Private Sub Form_Load()Text1.Text = "123456789"End SubPrivate Sub Text1_GotFocus()SendKeys "{home}+{end}"End Sub 对word文档中图表的操作? 取一个excel文件的MD5值,可是每次得到的都不一样 请教关于限制文本框只能数字输入问题 文本文件的写入 ActiveBar控件,免注册版,哪里有下??? vb在win2000下能调用汇编不?怎么调用? 有关CD-ROM ADO数据库连接问题! 关于用VB编写驱动HP打印机打印当前页的程序 怎样得到工程中的所有form syflw008谢谢你邮寄我的书 100分求解 水晶报表9.0的问题--关于子报表(在线等候)
Me.Text1.SelStart = 0
Me.Text1.SelLength = Len(Me.Text1.Text)
Me.Text1.SetFocus
Me.Text1.SetFocus
Me.Text1.SelStart = 0
Me.Text1.SelLength = Len(Me.Text1.Text)
With Text1
.SelStart = 0
.SelLength = Len(Text1)
End With
End Sub
With Text1
.SelStart = 0
.SelLength = Len(Text1.Text)
End With
End Sub
Me.Text1.SetFocus
Me.Text1.SelLength
直接combox1.setFocus就可以被选中
来晚一步
中有自动生成代码的例子
Text1.Text = "123456789"
End SubPrivate Sub Text1_GotFocus()
SendKeys "{home}+{end}"
End Sub