【学生信息管理系统】之编译错误

程序员文章站 2022-04-25 23:09:02

...

1、编译错误：用户定义类型未定义

原因：未引用控件或代码错误

以下三种解决方法：

1）工程——引用——选中"Microsoft ActiveX Data Objects 2.6 Library"——点击“确定”

拓展：ActiveX Data Objects，简称ADO，访问数据库的一个接口，就是用来跟数据库交互的。

2）检查定义的代码是否有问题，要保证上下文的定义代码一致

3）"Ctrl+T"打开部件，添加“Microsoft ADD Data Control 6.0(OLEDB)”,点击“应用”——“确定”

2、编译错误：在End Sub、EndFunction或End属性后面只能出现注释

原因：End Sub、End Function后不能接句子

解决方法：若End Sub、EndFunction后边的句子有用，则移动位置；若没用，直接删除（简单粗暴）

3、编译错误：变量未定义

解决方法：将出现问题的代码名称用Dim定义

例：UserName="'

Dim UserName As String

4、编译错误：无效或不合格的引用

例：Set .mrc

解决方法：去掉“点”（画蛇添足）Set mrc

5、编译错误：子程序或函数中的属性无效

解决方法：删除出问题的语句

6、编译错误：未找到方法或数据成员

原因：未引用部件

解决方法：工程——部件——选中“Microsoft DataGrid Control 6.0(OLEDB)”——点击“确定”

7、编译错误：子程序或函数未定义

例：ExecuteSQL_Exit

解决方法：在上述语句后加“：”（马大哈）

8、编译错误：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就会报告错误。

解决方法：将出现问题的代码重新定义即可

9、编译错误：缺少子程序、函数或属性