用此方法取值出错,如何解决,请各位老师指教,谢谢!!
Dim cpkh As String = Forms("代码采集").Controls("ComboBox1").Value
Dim cmd1 As New SQLCommand
Dim dt1 As DataTable
cmd1.C '外部数据源
Dim cmb1 As WinForm.ComboBox
cmd1.CommandText = "S ELECT StyleNo,CutFormID F rom {CutForm}"
dt1 = cmd1.ExecuteReader()
Dim dr1 As DataRow = cmd1.SQLFind("StyleNo = '" & cpkh & "'")
Dim cjdid As Integer = dr1("CutFormID")
MessageBox.Show(cjdid)
此主题相关图片如下:捕获15.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-5/201651314331459288.png)
[此贴子已经被作者于2016/5/13 14:38:32编辑过]