不好意思,把text1.setfocus 放在Private Sub UserDocument_Show()里试试。
黑山老妖只有你说的对。谢谢!但是在模块声明的过程中怎么办。如下:'控件代码 Private Sub UserControl_Initialize() Text1.Text=LQ(B) End Sub'模快代码 Function LQ(B) Text3.SetFocus Text3.SelStart = 0 Text3.SelLength = 1 B=Text3.SelText End Function 不可用。 还有在控件代码中的其它事件和过程中怎么办? Text1.Setfocus 不可用啊。如果说VB本来就没有这个功能的话。我只有改写代码了。大家给我一个答复吧!! 谢谢你们了。
提示实时错误'5'
无效的过程调用或参数
不知道是不是编写控件的哪个属性没设置好?急呀各位大虾
我想这是因为该控件还没加载上,你就用text1.setfocus了.
如果想让form一运行.text1 就得到焦点;那就把text1的tabindex属性设为0.试试
text1.selstart=0
text1.sellength=length(text1.text)
或是text1.seltext
可能还是第一种用效,都试试吧。应该可以地
Private Sub UserControl_Initialize()
Text1.Text=LQ(B)
End Sub'模快代码
Function LQ(B)
Text3.SetFocus
Text3.SelStart = 0
Text3.SelLength = 1
B=Text3.SelText
End Function
不可用。
还有在控件代码中的其它事件和过程中怎么办?
Text1.Setfocus 不可用啊。如果说VB本来就没有这个功能的话。我只有改写代码了。大家给我一个答复吧!! 谢谢你们了。