VB函数的参数传递问题!!!
请问以下哪有错 提示是sum(a)中的a有错 Private Sub Command1_Click() Dim a(10), i As Integer For i = 0 To 5 a(i) = i + 10 Next i Text2.Text = Sum(a) End Sub ------------------------------------------- Private Function Sum(a() As Integer) As Long Dim i As Integer Dim summ As Long For i = 1 To 5 summ = summ + a(i) Next i Sum = summ End Function
Dim a(10), i As Integer 第一句有问题,很简单的问题,因为这是vb6的规定,a没有被定义为integer,被定义成variant了,只有i被定义成了integer,把这一句改成 Dim a(10) as integer, i As Integer 全部定义好类型,一切ok了,以后要注意这个问题
Text2.Text = STR(Sum(a))
答:[3]按数组传递参数在VB6.0中,允许使用数组作为实参传递到子过程的形参中,数组传递必须采用地址传递的方式来传递参数详情>>
答:线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问:电脑安装了VB6.0,为什么打开方式里面没有VB程序选项,进安装好的VB里去关联...
答:打开方式最下面还有一个《选择程序》,点开后查VB的安装目录的EXE,找到后直接打开,下次就会在打开方式里查到了详情>>