PB连接access后，空白框里的内容做条件后的查询按钮代码
2个回答
展开全部
string ls_name
ls_name =sle_1.text
dw_1.setfilter("name='"+ls_name+"'")
dw_1.filter()
ls_name =sle_1.text
dw_1.setfilter("name='"+ls_name+"'")
dw_1.filter()
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
String ls_name
ls_name = sle_1.Text
If Isnull(ls_name) Or Trim(ls_name) = "" Then
MessageBox("提示信息","请输入查询条件")
Return
End If
If dw_1.Retrieve(ls_name) < 0 Then
MessageBox("提示信息","查询出错！~r~n" + SQLCA.SQLErrText
Return
End If
是这个意思吧？
ls_name = sle_1.Text
If Isnull(ls_name) Or Trim(ls_name) = "" Then
MessageBox("提示信息","请输入查询条件")
Return
End If
If dw_1.Retrieve(ls_name) < 0 Then
MessageBox("提示信息","查询出错！~r~n" + SQLCA.SQLErrText
Return
End If
是这个意思吧？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
