findright = "select Handle,round('" & ny2 & "',1) as Cy2, round(Line*sin('" & sita1 & "'-'" & angle & "'),1) as Ry1 from prefixture " & _
"where (round(Line*cos(Sita1-'" & angle & "')-'" & nx2 & "') between 0 and '" & MaxD & "') " & _
"and (Handle <>'" & handle & "')" & _
"and (round(abs(Angle-'" & angle & "'),2)=6.28 or round(Angle-'" & angle & "')=0)"这句话vb说我的round函数没有定义过,但是我直接写
select Handle from prefixture where round(Sita1,1)=98.2
在access中就找到了结果
这应该说明access中承认了round函数阿
究竟是什么原因呢?
谢谢
"where (round(Line*cos(Sita1-'" & angle & "')-'" & nx2 & "') between 0 and '" & MaxD & "') " & _
"and (Handle <>'" & handle & "')" & _
"and (round(abs(Angle-'" & angle & "'),2)=6.28 or round(Angle-'" & angle & "')=0)"这句话vb说我的round函数没有定义过,但是我直接写
select Handle from prefixture where round(Sita1,1)=98.2
在access中就找到了结果
这应该说明access中承认了round函数阿
究竟是什么原因呢?
谢谢
解决方案 »
- 在制作安装文件时,怎样制作一个自动建立数据源,而不用再到管理工具里去添加数据源的.EXIE程序
- 敬请专家进来讨论: VB通过结构间接传递地址给DLL的难题!!
- 请问vb中如何调试com组件 谢谢
- *** 如何拦截WINDOWS消息 ***
- 将一个xls文件中第i行输出另一个xls文件中(急)两天内帮我解决者再加200分
- 如何翻译此C++ API function 到 VB?
- 我用VB做的程序,请大家帮忙测试一下。谢谢
- Move and Resize Controls at Runtime Like the VB IDE (updated 2002/07/11)
- 如何在VB6中实现录音的功能
- 紧急求助!
- 各位前辈: 请进来指教一下
- 树型框如何添加背景图片?
findright = "select Handle," & round('" & ny2 & "',1) as Cy2,& round(Line*sin('" & sita1 & "'-'" & angle & "'),1) as Ry1 & "from prefixture " & _
"where (round(Line*cos(Sita1-'" & angle & "')-'" & nx2 & "') between 0 and '" & MaxD & "') " & _
"and (Handle <>'" & handle & "')" & _
"and (" & round(abs(Angle-'" & angle & "'),2)=6.28 & "or" & round(Angle-'" & angle & "')=0 & ")"
因为round是函数,而不是字符串,你认为呢?
to:forrestSun 复杂查询要是能写成query我就已经做了
大家帮忙啊
谢谢
Adodc1.RecordSource = "select Handle from prefixture where round(x2,1)=11082.6 "
我写了这样一句简单的也不可以
大家帮帮我啊