可视化程序设计(VB)之数据窗体设计器的使用实例
数据窗体设计器的使用步骤如下:
(1)首先执行“文件”菜单中的“打开数据库”菜单项,打开“使用可视化数据管理器步骤实例”帖子中建立的“student.MDB”数据库,这时在“实用程序”菜单中的“数据窗体设计器”菜单项变为可用的。
2)执行“实用程序”菜单中的“数据窗体设计器”菜单项,出现“数据窗体设计器”(
对话框。在“窗体名称(不带扩展名)”框中输入“stud”,在“
记录
混凝土 养护记录下载土方回填监理旁站记录免费下载集备记录下载集备记录下载集备记录下载
源”组合框中选择“学生
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
”,这时“可用的字段”列表框中列出学生表的所有字段,单击“>>”按钮将其全部移到“包括的字段”列表框中。
(3)单击“生成窗体”按钮,当所有字段消失后,数据窗体被加入到当前的工程中。
(4)单击“关闭”按钮,关闭“数据窗体设计器”对话框。此时在工程中生成的数据窗体如图1所示。以“frmstud”文件名保存该窗体。
图1 自动生成的窗体
实际上,该窗体是VB自动生成的,其中包括5个标签(分别为对应字段的字段名)、5个文本框(分别用于输入各字段的值)、5个命令按钮(标题分别为“添加”、“删除”、“刷新”、“更新”和“关闭”,对应的命令按钮名字分别是cmdAdd,cmdDelete,cmdRefresh,cmdUpdate和cmdClose)和一个Data控件(名字为Data1,Data控件在下节中介绍)。在这些命令按钮上分别设计以下Click事件过程:
Private Sub cmdAdd_Click()
Data1.Recordset.AddNew
End Sub
Private Sub cmdDelete_Click()
'如果删除记录集的最后一条记录
'记录或记录集中唯一的记录
Data1.Recordset.Delete
Data1.Recordset.MoveNext
End Sub
Private Sub cmdRefresh_Click()
'这仅对多用户应用程序才是需要的
Data1.Refresh
End Sub
Private Sub cmdUpdate_Click()
Data1.UpdateRecord
Data1.Recordset.Bookmark = Data1.Recordset.LastModified
End Sub
Private Sub cmdClose_Click()
Unload Me
End Sub
(5)单击“工程”菜单中的“工程1属性”菜单项,出现“工程属性”对话框。在“启
所示,可以通过命令按动对象”组合框中选择“frmstud”,然后运行工程。这时窗体如图2
钮执行相应的数据表操作。
图2 运行后的数据窗体
我们可以对生成的窗体进行修改,使之更美观,操作更方便,如图3所示,是对上面自动生成的窗体进行修改的结果,其中将“性别”文本框和“民族”文本框改为组合框,便于数据输入。
图3 改进后的数据窗体