| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1491 人关注过本帖, 2 人收藏
标题:想让在文本框内输入完回车或按TAB键能移动到指定的控件中去,
只看楼主 加入收藏
yiyaozjk
Rank: 2
等 级:论坛游民
帖 子:231
专家分:30
注 册:2010-3-10
结帖率:51.67%
收藏(2)
已结贴  问题点数:20 回复次数:3 
想让在文本框内输入完回车或按TAB键能移动到指定的控件中去,
我的窗体里有三种控件,文本控件组\复选框组\MSFlexGrid 控件

1 文本控件组 从Text1(0).到Text1(2).我在窗体中将Text1(0).到Text1(2)的index属性设置为0 1 2, 但一引导窗体后还是不能使用TAB键移动到指定文本框内,而其他的复选框却能够正常按照TAB来移动,这是为何?为何不能TAB先在文本框内移动起呢???

2 有一个MSFlexGrid 控件,我单击这个MSFlexGrid控件只能选中第1列其它列都不能选中一样,点中了光标也会跳到第一列,这是要在哪里取消这种设置呀???是不是在属性里设置呀???

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode = 13 Then
  SendKeys "{tab}+{home}"
  End If
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
  SendKeys Chr$(9), True
End If
End Sub

Private Sub Form_Load()
  Me.Top = 50
  Me.Left = 50
  Option1(2).Value = True
  Me.KeyPreview = True
End Sub

Private Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)  
  If Index < 2 Then '最大值
    If KeyCode = 13 Then Text1(Index + 1).SetFocus
  End If
End Sub
搜索更多相关主题的帖子: 移动 文本框 
2011-12-27 17:36
wube
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:23
帖 子:1820
专家分:3681
注 册:2011-3-24
收藏
得分:20 
TabIndex

不要選我當版主
2011-12-28 17:34
yiyaozjk
Rank: 2
等 级:论坛游民
帖 子:231
专家分:30
注 册:2010-3-10
收藏
得分:0 
我已经在窗体中将Text1(0).到Text1(2)的index属性设置为0 1 2???还是没有实现呀????
2011-12-29 14:03
yaowm
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2012-2-14
收藏
得分:0 
index属性和Tabindex属性是两回事哦
2013-10-12 15:39
快速回复:想让在文本框内输入完回车或按TAB键能移动到指定的控件中去,
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.030115 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved