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

来源：百度知道编辑：UC知道时间：2024/06/16 01:01:58

Private con As New ADODB.Connection
Private rs As New ADODB.Recordset
Private STR, SMDF, SMDFS, SLDF, SLDFS, ODBC_str As String
Private UserName As String
Private UserPwd As String
Dim connter As Integer '定义一个整型变量
Dim sql, workarea(4600) As String
Dim char As Byte
Dim Intext As String
Dim Intexts As String
Dim strtemp As String * 200
Dim StrName As String * 256
Dim Computer_str As String * 256
Dim db_str As String * 256
Dim Paths As String * 256

Dim YWJ, MWJ, L, L1 As String, S As String * 1, ASCIIN, i As Integer
Dim x As Integer
'提取计算机名和用户名
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

程序中缺少必要的部件或引用。

使用菜单项【工程】-【部件】，或者【工程】-【引用】，打开部件（或引用）的窗口，选择你程序中涉及的部件（或引用）。

上面代码中的
“Dim YWJ, MWJ, L, L1 As String, S As String * 1, ASCIIN, i As Integer ”
里面不能有星号“*1”。

VB用户定义类型未定义 vb用户定义类型未定义? VB提示用户定义类型没有定义编译错误：常数、固定长度字符串、数组、用户定义类型以及declare语句不允许作为对象模块的public成员？ VB中子程序,函数,用户定义类型在哪儿定义? 快速全盘文件查找的VB源代码如下,编译用户定义类型未通过,不知道如何修改,请赐教.谢谢急：VB编程时出现“用户定义类型未定义” VB编程时出现“用户定义类型未定义” 关于vb的问题用户定义类型未定义用户定义类型未定义