还是一个比较简单的问题,请帮忙。 用 控件 数组。即 txtShow(Index)sub txtShow_Keypress(Index) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 所有text设成一个控件组,检测到回车键后是text2(index+1).setfocus,最后一个text2稍微作一点处理即可(比如用select case....)这样应该可以。 我的做法一直是从控件栏上拖过来text,用一个拖一个,他自己也不生成数组呀?你们是怎么做的呀?我知道用粘贴复制可以生成数组,不过我不喜欢那样用。 CRTL+c复制CRTL+V粘贴他会问你要不要生成控件数组 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 13 Then SendKeys "{Tab}" End IfEnd Sub前提条件是要把FORM的keypreview属性设为TRUE sub text1_keypress(ascii as integer)if ascii=13 thentext2.setfocusend ifend sub Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then SendKeys "{Tab}" End IfEnd Sub先要把FORM的keypreview属性设为TRUE VB DES加密算法。 这段代码哪里不对? 字节数组是怎么样转换成字符串的,请高手分析一下其中的规律 dll中的End问题 ADOX如何设置是否为空? 如何在状态栏里设置时间? 屏幕取词 怎么限制文本框的数据格式? 为什么程序只有在2000服务器版上可以运行?(可再加分,急) 初学者的问题:关于日期函数 血液样本已经交给大夫了...1小时后拿决定命运的血液报告单...这一小时我该干什么去呢?? 用ADODC控件怎样与设了密码的Access数据库连接
text2(index+1).setfocus,最后一个text2稍微
作一点处理即可(比如用select case....)
这样应该可以。
CRTL+V粘贴
他会问你要不要生成控件数组
If KeyCode = 13 Then
SendKeys "{Tab}"
End If
End Sub
前提条件是要把FORM的keypreview属性设为TRUE
if ascii=13 then
text2.setfocus
end if
end sub
If KeyAscii = 13 Then
SendKeys "{Tab}"
End If
End Sub
先要把FORM的keypreview属性设为TRUE