[求助] Cexp 动态表达式 Post By:2017/2/26 15:02:00 [只看该作者]
Dim kh As String = e.Form.Controls("客户").value Dim pp As String = e.Form.Controls("品牌").value Dim kuan As String = e.Form.Controls("款号").value Dim rq As String = e.Form.Controls("日期").value Dim exp As String exp = CExp("[客户] = '{0}' And [品牌] = '{1}' And [款号] = '{2}' And [日期] => #{3}#", kh,pp,kuan,rq) MessageBox.show(exp)