以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  vbs里不需申明变量,为啥运行时提示编译器错误,类型不匹配  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=75961)

--  作者:tiantian2888
--  发布时间:2015/2/27 16:24:20
--  vbs里不需申明变量,为啥运行时提示编译器错误,类型不匹配
  Set adoConn=CreateObject("Adodb.Connection") \'连接数据库(数据指向是金字塔安装目录下的 test.mdb,也可以自己更改想要的路径)
  adoConn.Open"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\\投资\\gdhs.accdb"              
    trSqlread="select * from gdlb where stockcode=\'" & strcode &"\'"  
  set rstTmp = adoConn.Execute(trSqlread)

arr = rstTmp.GetRows
    For i = 0 To UBound(arr)
    if  isnull(arr(i,0)) then
      arr1(i)="1"
      msgbox "1"
    else
      arr1(i)=arr(i,0)
          MsgBox arr(i,0)
    end if     
     Next

运行到arr1(i), 提示编译器错误 ‘13’ 类型不匹配,不是说在FUNCTION里变量不需要申明吗? 这是什么原因。谢谢.

--  作者:王锋
--  发布时间:2015/2/27 16:52:57
--  
你用强制转换字符串函数强制转换一下类型试试
--  作者:pel46585
--  发布时间:2015/3/3 15:50:30
--  

不需要申明变量<>不需要申明数组,你的arr1是数组,不申明怎么电脑怎么分配数组空间啊。 

[此贴子已经被作者于2015/3/3 15:50:54编辑过]

--  作者:tiantian2888
--  发布时间:2015/3/3 22:21:44
--  
高手!