For i = 0 To Rrs.Fields.Count - 1
Sign_Result.TextMatrix(0, i) = Rrs.Fields(i).Name
Next
sql = "select warecode,mname,quantity from Xs_V_ConsignBill where ConSignCode= "就不知道怎么样才可以把这个取得的值放到条件里面去...或者高手有什么更好的方法可以写出来
给我参考参考的...谢谢了.
Sign_Result.TextMatrix(0, i) = Rrs.Fields(i).Name
Next
sql = "select warecode,mname,quantity from Xs_V_ConsignBill where ConSignCode= "就不知道怎么样才可以把这个取得的值放到条件里面去...或者高手有什么更好的方法可以写出来
给我参考参考的...谢谢了.
解决方案 »
- 求一VB用4阶龙格库塔法解微分方程组的例子,最好有源码!谢谢!!
- 请教一个简单的问题
- VB与数据库连接不能放在模块中,请大家帮下忙,谢谢
- :),十万火急!
- 如何使用鼠标拖动没有标题栏的窗体。
- 简单的问题
- 高手在哪里????如何将avi视频文件中的某些幀抽出来,形成一个新的avi文件???????
- 驱动相关 100分求助
- @@@@@@@@@@@@@@大家好,回visual Basic论坛向大家问个好。@@@@@@@@@@@@@@@@@
- 晶晶的第三篇口水话:"VB调用API函数使窗口保持在最上层 "....(API相关)
- 如何解析出chinaren校友录发留言时的验证码? 大家快来帮忙或学习呀! ^_^
- 学生吃剩半个饼丢到垃圾桶 老师捡起当众咽下
Sign_Result.TextMatrix(0, i) = Rrs.Fields(i).Name
ConSignCode=ConSignCode & Rrs.Fields(i).Value & "=" & Rrs.Fields(i).Name & " or "
Next
sql = "select warecode,mname,quantity from Xs_V_ConsignBill where "& ConSignCode &"
ConSignCode=ConSignCode & Rrs.Fields(i).Value & "=" & Rrs.Fields(i).Name
不知道这里第二个的ConsignCode是什么意思呢?
mRow = Sign_Result.RowSel
mCol = Sign_Result.ColSel
Str = Sign_Result.TextMatrix(mRow, mCol)
End subsql = "select warecode,mname,quantity from Xs_V_ConsignBill where ConSignCode= "& Str &"
说=号附近有错误.如果这样写的话就没错.不过它只取到了空的值. ConSignCode ='" & str & ""'
"...from Xs_V_ConsignBill where ConSignCode ='" & str & "' ....."
注意但引号,要加的,将那个字符变量夹在中间
完整的是这样的:
假如str = "12345"
"...from Xs_V_ConsignBill where ConSignCode ='12345' ....."
mCol = Result_Grid.ColSel
str = Result_Grid.TextMatrix(mRow, mCol)
这个好像是取单元格的索引.但我想取的是里面的内容吖..不知道用什么方法可以取到里面的内容呢?