自定义录入界面之二，可否用键盘开启 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自定义录入界面之二，可否用键盘开启

共有11426人关注过本帖树形打印复制链接主题：自定义录入界面之二，可否用键盘开启

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47477 积分：251256 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/8/14 8:42:00 [显示全部帖子]

打开之后，可以用上下箭头定位的。

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47477 积分：251256 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/8/14 9:49:00 [显示全部帖子]

不可以

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47477 积分：251256 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2011/8/14 10:54:00 [显示全部帖子]

可以一次输入任意多列：

Dim tbl As Table = Tables("窗口1_Table1")
If tbl.Current IsNot Nothing Then
    Forms("窗口1").DropDownBox.Value = tbl.Current("产品名称")
    Dim r As Row =Tables("生产记录表").Current
    r("某列1") = tbl.Current("某列1")
    r("某列2") = tbl.Current("某列2")
    r("某列3") = tbl.Current("某列3")
End If
Forms("窗口1").DropDownBox.CloseDropDown()

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

主题：自定义录入界面之二，可否用键盘开启