[求助]焦点转移不起作用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]焦点转移不起作用

共有4044人关注过本帖树形打印复制链接主题：[求助]焦点转移不起作用

有点甜

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/7/15 22:36:00 [只看该作者]

以下是引用xokxiao在2014-7-15 22:33:00的发言：

那是截图后,为了说明ComboBox1就标了1,其他标2\3\4,

其实是没有值

ComboBox4有值

[此贴子已经被作者于2014-7-15 22:33:59编辑过]

那就不可能，例子发上来。

xokxiao

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：190 积分：1312 威望：0 精华：0 注册：2014/6/28 18:07:00

Post By：2014/7/15 22:38:00 [只看该作者]

以下是引用有点甜在2014-7-15 22:36:00的发言：

那就不可能，例子发上来。

换一个传上来

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

[此贴子已经被作者于2014-7-16 0:40:23编辑过]

有点甜

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/7/15 22:41:00 [只看该作者]

没有外部数据源，打不开你的窗口测试。

xokxiao

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：190 积分：1312 威望：0 精华：0 注册：2014/6/28 18:07:00

Post By：2014/7/16 0:41:00 [只看该作者]

以下是引用有点甜在2014-7-15 22:41:00的发言：
没有外部数据源，打不开你的窗口测试。

换了一个

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

[此贴子已经被作者于2014-7-16 1:42:52编辑过]

逛逛

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：1693 积分：12117 威望：0 精华：7 注册：2013/7/11 10:52:00

Post By：2014/7/16 8:00:00 [只看该作者]

你只在一个控件的事件中写了代码，当然不会执行

你要么在所有需要执行的控件中都写上代码

要么在窗口事件中写上代码

有点甜

小大 16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/7/16 9:09:00 [只看该作者]

哦，代码

If e.KeyCode=keys.enter Then
    If Forms("窗口1").Controls("ComboBox1").Text IsNot Nothing Then
        e.Form.Controls("ComboBox4").Select
    End If
    If Forms("窗口1").Controls("ComboBox1").Text ="" Then
        MsgBox("请选择其他分类!",64,"提示")
        e.Form.Controls("ComboBox3").Select
    End If
    e.cancel = True
End If

下一主题 >> << 上一主题

总数 16 上一页 1 2

主题：[求助]焦点转移不起作用