Access数据库技术与应用教程教学课件 赵义霞 第9章 模块的设计.pptVIP

9.6.2 自定义数据类型 3．在标准模块中建立自定义数据类型 例9-29：在标准模块建立自定义数据类型，在窗体中使用自定义数据类型。 （1）新建“模块2”→定义数据类型student如下： Type student xh As String * 6 xm As String xb As String * 1 End Type 9.6.2 自定义数据类型 （2）新建窗体win9-29。 （3）窗体中建立3个文本框→“名称”分别为：t1、t2、t3→附加标签的“标题”分别为：学号、姓名、性别。 （4）建立命令按钮→“名称”为：c1→“标题”为：确定。 （5）按钮c1的click事件代码如下： Dim a As student a.xh = t1 a.xm = t2 a.xb = t3 MsgBox 学号: a.xh 姓名: a.xm 性别: a.xb （6）转到窗体视图→分别在文本框输入数据→单击命令按钮，消息框显示文本框的值。 9.6.2 自定义数据类型 4．在类模块中建立自定义数据类型 在类模块建立自定义数据类型，要放在“通用-声明”区； 并且在type前加private关键字。