回 帖 发 新 帖 刷新版面

主题:[已解决]关于查询结果输入表格的问题???急

我用下面这段文字进行查询

if empty(thisform.combo1.displayvalue)
    messagebox('请选择查询条件!',48,'操作失败!')
    thisform.combo1.setfocus
else
    Select * from kcbook where 状态= alltrim(thisform.combo1.displayvalue) into cursor lkcbook_c 
    thisform.grid1.recordsource='lkcbook_c'
endif 
  
查询的结果可以出来,但表格却无法看到中。在这段的后面加上
  
 BROWSE
后可浏览数据库结果正确,表格中也能看到。关掉浏览表格中的数据也没了,不知道是什么原因。高手指导一下。

回复列表 (共2个回复)

沙发

刷新表格行不行?
thisform.Refresh

板凳

if empty(thisform.combo1.displayvalue)
    messagebox('请选择查询条件!',48,'操作失败!')
    thisform.combo1.setfocus
else
    Select * from kcbook where 状态= alltrim(thisform.combo1.displayvalue) into cursor lkcbook_c
    thisform.grid1.recordsourcetype = 0
    thisform.grid1.recordsource='lkcbook_c'
endif

我来回复

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