关于VB提示ByRef参数类型不符的分析

在VB中执行过程或函数时，提示"ByRef参数类型不符"

分析问题主要由于对应参数的类型不符造成的。造成这种情况一般有几种情况：

1。传递参数未定义类型，如果参数在调用前未定义类型，系统自动将它定义为Variant类型，由于与过程或函数中的对就参数类型不相同，所以提示"ByRef参数类型不符"

2。传递参数类型已经定义，但由于定义方法不对，所以提示"ByRef参数类型不符"。具体情况如下：

当VB中如此定义变量时，将会出现以上错误信息的出现

Private Sub Command1_Click()
Dim i , j As Integer
i = 3
j = 4
Call get1(i, j)
Text1.Text = i
End Sub

Private Sub get1(ByRef para1 As Integer, para2 As Integer)
para1 = para1 + para2
End Sub

如果将 Dim i , j As Integer 改为

Dim i As Integer

Dim i As Integer

程序执行正常。也就是说，第一种方法的变量定义，只是对 J 做了定义，并未对前面的 I 进行定义

一般在过程和函数中定义参数时采用ByRef，则要求参数声明的类型和实际参数的类型完全相同，否则VB就会报告错误。