一个简单的VB问题：怎样传递一个参数变量给功能函数？

Question

public function abc(strdata() as string，Minlength as long)
......
......
for i =0 to Minlength
FromSource(i)=strdata(i)
exit for
next
.........
......

Answer 1

还是上面的问题，我按你的作法作了，但VB提示类型不一致，主函数里应该写？(两个问号怎样填呢)Private FromSource(0 To 20) As String
Private Minlength As Integer
private strdata(?) as stringpublic sub aaa()
......
abc(?,Minlength)
......
end subpublic function abc(strdata() as string，Minlength as long)
......
......
for i =0 to Minlength
FromSource(i)=strdata(i)
exit for
next
.........
......
end function

Answer 2

abc(?,Minlength)
这里你传递的是什么？

Answer 3

主函数里应该写？(两个问号怎样填呢) 把这一行去掉！！！！！！！！！Private FromSource(0 To 20) As String
Private Minlength As Integer
'private strdata(?) as stringpublic sub aaa()
......
call abc(FromSource,Minlength)
......
end subpublic function abc(strdata() as string，Minlength as long)
......
......
for i =0 to Minlength
FromSource(i)=strdata(i)
exit for
next
.........
......
end function
================================================================ok?