Foxtable(狐表)用户栏目专家坐堂 → [求助]如何在执行代码keys.Enter后执行按钮的代码?


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

主题:[求助]如何在执行代码keys.Enter后执行按钮的代码?

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


加好友 发短信
等级:婴狐 帖子:37 积分:404 威望:0 精华:0 注册:2011/8/10 12:43:00
[求助]如何在执行代码keys.Enter后执行按钮的代码?  发帖心情 Post By:2011/8/17 21:44:00 [显示全部帖子]

有一个窗口,窗口中有一个Textbox控件和一个Button控件。请问,如何在TextBox控件中输入内容并按下回车键后直接运行Button控件中的代码?

原来FoxPRO中是这样的:
if keycode = 13
thisform.cmdok.click
endif


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


加好友 发短信
等级:婴狐 帖子:37 积分:404 威望:0 精华:0 注册:2011/8/10 12:43:00
  发帖心情 Post By:2011/8/17 22:18:00 [显示全部帖子]

感谢!
我没有使用 btn 变量,直接用 e.Form.Controls("Button1") 了,所以 TAB 精灵没找到 Performclick,嘿嘿

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


加好友 发短信
等级:婴狐 帖子:37 积分:404 威望:0 精华:0 注册:2011/8/10 12:43:00
  发帖心情 Post By:2011/8/18 9:39:00 [显示全部帖子]

有个问题:
假如按钮的click事件的代码是:

dim c as string = e.form.controls("TextBox1").value
messagebox.show("" & c & "","提示",MessageBoxButtons.OK)

如按狐爸提供的方式和代码,那么在文本框中输入字符并按下回车键后,messagebox显示的信息是空的!即:按钮代码中的变量 c 没有得到文本框中按下回车键之前输入的值!
再假如不在文本框中按回车键,直接点按按钮的话,messagebox显示的是在文本框中按下回车键之前输入的字符!

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


加好友 发短信
等级:婴狐 帖子:37 积分:404 威望:0 精华:0 注册:2011/8/10 12:43:00
  发帖心情 Post By:2011/8/18 10:03:00 [显示全部帖子]

搞定了,哈

 回到顶部