回 帖 发 新 帖 刷新版面

主题:关于用GRID输入记录的问题

我在一个表单里用表格对表进行记录输入,在表格下方放置了几个命令按钮,分别是添加、编辑等等,要求是当按添加按钮时,在表尾自动添加一条空记录然后等用户输入,添加命令代码是
APPEND BLANK
GOTO BOTTOOM
THISFORM.GRID1.SETFOCUS
现在有一个问题就是用了上面的命令后,等待输入的表格栏为蓝色为选定状态,这样我就还需要用鼠标点击一下让它变为光标状态(输入状态),我感觉有点麻烦而且还容易点到其它行,有没有办法当点击添加是对应的表格栏就出现光标并在没有输入完成时不能焦点不能离开此行.请那为高手指点.

回复列表 (共2个回复)

沙发

thisform.grid1.RecordSourceType= 1
thisform.grid1.RecordSource="数据表名"


*无需go bott ,Append blank后自动指向末记录。
APPEND BLANK
THISFORM.GRID1.Column1.text1.SETFOCUS  &&第一栏得到焦点

板凳

谢谢楼上这位朋友的回复,我试了不行和我原来的方法一样。

我来回复

您尚未登录,请登录后再回复。点此登录或注册