if this.rowcount() > 0 then
this.selectrow(0,false)
this.selectrow(1,true)
this.setrow(1)
end if
9、在cb_all的Clicked事件加入：
dw_query.SetFilter('')
dw_query.Filter()
if dw_query.rowcount() > 0 then
dw_query.selectrow(0,false)
dw_query.selectrow(1,true)
dw_query.setrow(1)
end if
dw_query.SetFocus()
10、在cb_print的Clicked事件加入：
if messagebox("提示信息","确认打印？", question!,Yesno!,1) = 1 then
if PrintSetup () = -1 then
messagebox('出错信息','打印机设置出错！',Exclamation!)
return else dw_query.Print() end if
end if
11、在cb_exit的Clicked事件加入：
close(parent)
上一页 [1] [2] [3] [4] [5] [6] [7] [8]
|
