copysqlstr = "Select * From T_copyrount Where "
For i = 1 To Grid2.Rows - 1
id = Trim(Grid2.TextMatrix(i, 1))
copysqlstr = copysqlstr & "F_thID = '" & id & "' Or "
Next i
copysqlstr = Left(copysqlstr, Len(copysqlstr) - 3)我想把表格种的记录复制,用上面的循环,可到了最后copysqlstr的值,怎么与循环内的copysqlstr的值相同,难道left不管用吗?我在最后一句的copysqlstr字符串改成copysqlstr1 = Left(copysqlstr, Len(copysqlstr) - 3),copysqlstr1的值还与copysqlstr相同,怎么回事啊?
For i = 1 To Grid2.Rows - 1
id = Trim(Grid2.TextMatrix(i, 1))
copysqlstr = copysqlstr & "F_thID = '" & id & "' Or "
Next i
copysqlstr = Left(copysqlstr, Len(copysqlstr) - 3)我想把表格种的记录复制,用上面的循环,可到了最后copysqlstr的值,怎么与循环内的copysqlstr的值相同,难道left不管用吗?我在最后一句的copysqlstr字符串改成copysqlstr1 = Left(copysqlstr, Len(copysqlstr) - 3),copysqlstr1的值还与copysqlstr相同,怎么回事啊?
解决方案 »
- vb 全局钩子的问题
- 各位高手,救急!!! 在 Vb中如何获取网络中所有Sql Server服务器的名字? 在线,急急急急急急急!!!!!!!
- 添加记录的问题。初学者,急!!!
- 求助高手一思路
- VB中关于数据库的一些操作
- 打印控件
- 在线等待:请给为大虾指点
- 有关*.dll文件的问题!
- 请问两个或多个字节的十六进制转化成十进制的最优算法?谢谢!!!
- 有两个问题,1、如何让菜单栏和窗体颜色一样,2、如何在关闭程序栏中看不到本程序运行(不是屏蔽CTRL+ALT+DEL,而是用这三个键后看不到进
- 紧急求助(在线等待)如何用vb的WinSock控件发送有附件的电子邮件 ??
- 如何在SQL-Server中动态的添加字段?谢谢!
msgbox len(copysqlstr)
msgbox right(copysqlstr,1)
msgbox right(copysqlstr,2)
msgbox right(copysqlstr,3)