一个关于数组的问题急需解决

muzi · 发表于 2003-8-8 15:31:00

Public Function GetCommands(Command As String, Parameters As String) As Variant
Dim wCmd As New clsws_CommandInvokerService
GetCommands = wCmd.wsm_getCommands(Command, Parameters)
End Function
////wCmd.wsm_getCommands传入2个参数，然后返回一个二维数组，数组的行数不确定。我想让GetCommands得到这个数组？怎么办？比如强制转换可以吗？怎么做？

mccad · 发表于 2003-8-8 15:36:00

可以用UBound()和LBound()可判断哪一维的上标和下标，语法：
LBound(arrayname[, dimension])

muzi · 发表于 2003-8-8 16:48:00

谢谢，搞定了！

muzi · 发表于 2003-8-9 10:55:00

Public Function GetCommands(Command As String, Parameters As String) As Variant
Dim wCmd As New clsws_CommandInvokerService
GetCommands = wCmd.wsm_getCommands(Command, Parameters)
End Function
----------------------------------------------------------
wCmd.wsm_getCommands函数返回一个2维数组
我想让GetCommands函数也返回一个2维数组，如何写代码？
_________________________________
wCmd.wsm_getCommands(Command,Parameters)函数返回一个2维数组（从远程服务器得到），但用LBoand（GetCommands，1）可以返回2（测试中那个2维数组可以返回一个3*2的数组），但用LBoand（GetCommands，2）就不可以了。还有就是怎么才能把返回的数组赋给一个新的数组，比如Dim CommandLst(int x，2) As String ,其中x是取得的数组的行数，2是固定了的，x要从函数返回后才知道，就是用上面的LBoand取得。我测试中好象不可以这样做，比如我想去得GetCommands(0,1)或GetCommands(1,1)就会提示出错，那行代码显示红色。
我是用的平台是在Excel中的VB。
谢谢看完！急待回复！

*******************************************************************
还有，有人在VB中调用WEBDAV吗？比如commect web sever，copy local file to sever等，其中函数都写在一个用C++写的一个webdav.dll文件中，在VB中调用的时候怎么改写C的函数的传入参数？就是说一个C函数的一个参数是指针，在VB中调用时怎么写这个参数？？
*******************************************************************

muzi · 发表于 2003-8-9 20:40:00

我是从远程服务器上取得的数据，而且已经可以得到一个2维数组，我做过测试，是正确的。我给你的GetCommands函数里头的都函数都是正确的。我在测试中，比如服务器返回一个2*2的数组，在VB中调试的结果是可以得到所有的数据，是2行，但列下标变成一样的了，都是1

一个关于数组的问题急需解决

发表回复

精选推荐