出现用户定义类型未定义

来源:百度知道 编辑:UC知道 时间:2024/05/22 07:53:59
Public Sub Add_TeamToTree(TreeView1 As TreeView, ByVal TmpKey As String)
Dim Bh As Long
Dim TmpNode As Node

Dim CurKey As String

Dim TmpArr_TeamName() As String
Dim TmpArr_TeamId() As Long
ReDim TmpArr_TeamName(0)
ReDim TmpArr_TeamId(0)

Bh = Val(Right(TmpKey, Len(TmpKey) - 1))

MyTeam.GetInfo (Bh)

MyTeam.Load_Team_ByUpper (Bh)

把程序在后面注上是哪句出错。哪个未定义。
义意是你用的那个没有定义...
在上面定义一次就可以啦。
例如说你的bh没定义。
就在上面写上。dim bh as string 定义长字符型

你得在窗体上放置一个TreeView控件,否则系统会提示你treeview类型未定义

Dim TmpNode As Node
Node类定义了吗?
MyTeam定义了吗?
如果用的是vs2005的话,过程头是没问题的,调用方法时要有个treeview。