Foxtable(狐表)用户栏目专家坐堂 → 奇怪的想法,不知道能不能实现?


  共有5678人关注过本帖树形打印复制链接

主题:奇怪的想法,不知道能不能实现?

帅哥哟,离线,有人找我吗?
sunion0769
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:99 积分:1155 威望:0 精华:0 注册:2012/9/30 10:20:00
奇怪的想法,不知道能不能实现?  发帖心情 Post By:2022/11/30 8:52:00 [只看该作者]

键盘中有1-9个数字,fox中有一个窗口(窗口中有一个文本框),有一个表A
如果按键盘数字1,文本框中则调用显示表A第1列第1排的值;
如果按键盘数字2,文本框中则调用显示表A第1列第2排的值;
如果按键盘数字3,文本框中则调用显示表A第1列第3排的值;
依次类推
不知道能实现不?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/30 9:03:00 [只看该作者]

实现不了。另外添加一个查询文本框,在查询文本框textchanged事件

dim d as integer = val(e.sender.text)
if d > 0 then
e.form.controls("要显示数据的文本框").text = tables("表A").rows(d-1)("第1列")
end if

 回到顶部
帅哥哟,离线,有人找我吗?
sunion0769
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:99 积分:1155 威望:0 精华:0 注册:2012/9/30 10:20:00
  发帖心情 Post By:2022/11/30 9:24:00 [只看该作者]

再请教一下,那能不能获取键盘按下的值?
比如我按了键盘的"A"键,messbox则显示"A";
如果我按了键盘的"D"键,messbox则显示"D";

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/30 9:28:00 [只看该作者]

keydown事件
MsgBox (e.KeyCode.ToString)

 回到顶部