我要做一个文本框通过回车键聚集并选择其中字符的功能,如果输入错误或通过别的什么事件触发聚集也可以选择其中的字符,可是实现不了:
Private Sub text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
Text2.SelLength = Len(Text2.Text)
End If
End Sub
请大家指点!
Private Sub text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
Text2.SelLength = Len(Text2.Text)
End If
End Sub
请大家指点!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货