vbe怎样定义一个结构

[leeoscar]

Option Compare Database
Option Explicit

Public Type data
name As String
quality As String
quantity As Integer
intime As Date
outtime As Date
End Type
Dim ID As Integer

出现错误:在对象模块中不能定义公共用户定义类型

[dunkel]

说明

Type 语句只能在模块级使用。使用 Type 语句声明了一个用户自定义类型后，就可以在该声明范围内的任何位置声明该类型的变量。可以使用 Dim、Private、Public、ReDim 或 Static 来声明用户自定义类型的变量。

在标准模块中，用户自定义类型按缺省设置是公用的。可以使用 Private 关键字来改变其可见性。而在类模块中，用户自定义类型只能是私有的，且使用 Public 关键字也不能改变其可见性。

[leeoscar]

在窗体的编码里不行吗?