VB 关于类中声明全局结构体变量的问题

[LandY和C]

我用类不多，没经验。问题如下

比如此刻有一辆车。车有 车类型 ， 车牌 ， 出厂日期.......属性

我在模块中声明结构体类型，并定义全局结构体变量
---------------------------------------
private type tCar
CarType as string
CarID as string
end type

public Car as tCar
---------------------------------------
以上是没有问题的。
在其他窗体调用也没有问题
如：Car.type = "奔驰"
================================
但时现在我不想用模块做了，我想将他定义为一个类
我添加一个空白类，并命名为 cls_Car
在这个类中写到
private type tCar
CarType as string
CarID as string
end type

public Car as tCar '这里就开始报错了
----------------------------------------
编译都编译不过去，他提示public 全局声明无法使用自定义类型·······

这是为什么？求您给我解释一下其中的缘由。越仔细越好。我想学。
==========================================
以下是我试着用其他方法
在这个类中写到
public CarType as string
public CarID as string
-----------------------------------------
其他窗体中写到
dim Car as New cls_Car

Car.Cartype = "奔驰"
这是可以的，跟我理解的类一样。
========================================
还有一个问题 相信上面那个类中声明全局结构体的问题解决了
下面这个肯定也就解决了，他们两个报错的性质一样
假如此刻车上坐了人。那么 姓名 ，性别····就是他要有的属性
我在cls_Car中写到
private type tPerson
Name as string
Sex as Boolean
end type

private type tCar
CarType as string
CarID as string
Person() as tPerson '人数不确定，所以定义动态数组
end type

public Car as tCar
'以上也是我最终想要达到的目的，可是编译不过去
=================================

[LandY和C]

引用 1 楼 milaoshu1020 的回复:

我的解决方法是:把type改成类,把type成员变成类成员.

这样说的话，那得建多少类啊。
这不是关键，关键是动态的建类。比如乘客数量不确定。

[milaoshu1020]

引用 2 楼 weixin_44603568 的回复:

[quote=引用 1 楼 milaoshu1020 的回复:]
我的解决方法是:把type改成类,把type成员变成类成员.

这样说的话，那得建多少类啊。
这不是关键，关键是动态的建类。比如乘客数量不确定。

[/quote]
1. 类多不要紧,只要你勤快;
2. 不确定数量的可以用collection.
Private Person as New Collection
这样是弱类型的不但可以放Person类的对象,也可以放别的类的对象;
或者创建一个Collection类:
Private colPerson as new PersonCollection.
PersonCollection类里边重载Collection的属性和方法,入口处如add方法使用强类型的参数.
也可以.
在入口处

[milaoshu1020]

集合类可以参考这篇文章,NewEnum方法需要在菜单中找到该方法的属性,并修改该方法ID.
https://www.cnblogs.com/ayanmw/archive/2012/07/03/2575000.html

[milaoshu1020]

我的解决方法是:把type改成类,把type成员变成类成员.