| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1491 人关注过本帖, 2 人收藏
标题:想让在文本框内输入完回车或按TAB键能移动到指定的控件中去,
取消只看楼主 加入收藏
yiyaozjk
Rank: 2
等 级:论坛游民
帖 子:231
专家分:30
注 册:2010-3-10
结帖率:51.67%
收藏(2)
已结贴  问题点数:20 回复次数:1 
想让在文本框内输入完回车或按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
yiyaozjk
Rank: 2
等 级:论坛游民
帖 子:231
专家分:30
注 册:2010-3-10
收藏
得分:0 
我已经在窗体中将Text1(0).到Text1(2)的index属性设置为0 1 2???还是没有实现呀????
2011-12-29 14:03
快速回复:想让在文本框内输入完回车或按TAB键能移动到指定的控件中去,
数据加载中...
 
   



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

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