关于TEXTBOX控件的一个问题。 怎样选定文本框中的内容,就像选中内容要复制那样,该用TEXTBOX控件中的什么属性。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 TEXTBOX.selstart=0TEXTBOX.sellength=len(TEXTBOX.text) text1.setfocustext1.SelStart = 0text1.SelLength = Len(text1.Text) txtObject.SelStart = 0 txtObject.SelLength = Len(txtObject.Text) TEXTBOX.selectstart=0TEXTBOX.selectlenth=len(TEXTBOX.text) If KeyCode = vbKeyRight Or KeyCode = 13 Then MSHFlexGrid1.Text = Text1.Text Text1.Text = "" MSHFlexGrid1.Col = MSHFlexGrid1.Col + 1 Text1.Left = MSHFlexGrid1.Left + MSHFlexGrid1.ColPos(MSHFlexGrid1.Col) + 40 Text1.Top = MSHFlexGrid1.Top + MSHFlexGrid1.RowPos(MSHFlexGrid1.Row) + 25 Text1.Width = MSHFlexGrid1.ColWidth(MSHFlexGrid1.Col) - 30 Text1.Height = MSHFlexGrid1.RowHeight(MSHFlexGrid1.Row) - 10 text1.setfocustext1.SelStart = 0text1.SelLength = Len(text1.Text)endif在这段代码中就是不行啊,奇怪了,帮忙解决一下。 把顺序颠倒一下text1.SelStart = 0text1.SelLength = Len(text1.Text)text1.setfocus 这一段代码是写在Text1_KeyDown(KeyCode As Integer, Shift As Integer)事件中的。如果我把 Text1.Text = MSHFlexGrid1.Text Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Text1.SetFocus写在COMMANDBUTTON中可以选定全部内容,但是写在Text1_KeyDown()事件中就是不能选定。 晕,这样当然不行了text1.SelStart = 0text1.SelLength = Len(text1.Text)放到GotFocus中试试看 晕倒,这样都不可以???with Text1 .selstart=0 .selLength=Len(.text) .Setfocusend with TEXTBOX.selstart=0TEXTBOX.sellength=len(TEXTBOX.text) vb的datagrid的问题 好几年没来CSDN了,成立了公司,选择了别的行业,感触多多,散分 想把一个文本里的数字代码转换为汉字怎么做? VB动态添加菜单出错 Win98和Win2000之间的传输问题?高分求救 散分 使用commondialog控件实现单片机上传数据的连续保存问题 救命!答辩的日子要到了,帮帮忙! WinSock方面问题 VB的提示说找不到对象FileSystemObject,请问怎么办? 我注册ocx成功,但是在部件中应用时提示dll错误 vb如何把一个图片发送到一网站的指定目录下!!
TEXTBOX.sellength=len(TEXTBOX.text)
text1.SelStart = 0
text1.SelLength = Len(text1.Text)
txtObject.SelLength = Len(txtObject.Text)
TEXTBOX.selectlenth=len(TEXTBOX.text)
MSHFlexGrid1.Text = Text1.Text
Text1.Text = ""
MSHFlexGrid1.Col = MSHFlexGrid1.Col + 1
Text1.Left = MSHFlexGrid1.Left + MSHFlexGrid1.ColPos(MSHFlexGrid1.Col) + 40
Text1.Top = MSHFlexGrid1.Top + MSHFlexGrid1.RowPos(MSHFlexGrid1.Row) + 25
Text1.Width = MSHFlexGrid1.ColWidth(MSHFlexGrid1.Col) - 30
Text1.Height = MSHFlexGrid1.RowHeight(MSHFlexGrid1.Row) - 10
text1.setfocus
text1.SelStart = 0
text1.SelLength = Len(text1.Text)
endif
在这段代码中就是不行啊,奇怪了,帮忙解决一下。
text1.SelStart = 0
text1.SelLength = Len(text1.Text)
text1.setfocus
如果我把
Text1.Text = MSHFlexGrid1.Text
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Text1.SetFocus
写在COMMANDBUTTON中可以选定全部内容,但是写在Text1_KeyDown()事件中就是不能选定。
text1.SelStart = 0
text1.SelLength = Len(text1.Text)
放到GotFocus中试试看
.selstart=0
.selLength=Len(.text)
.Setfocus
end with
TEXTBOX.sellength=len(TEXTBOX.text)