此案例要求用Excel VBA 制作学生成绩管理系统,其中,系统有登录窗体界面、浏览查询数据、成绩输入以及统计总分、平均分等功能。
(1) 将Sheet1、Sheet2、Sheet3工作表分别改名为“浏览”、“主界面”和“用户表”。将工作簿文件另存为“学生成绩管理.xlsm”,保存类型要选择“Excel启用宏的工作簿(*.xlsm)”
(2) 选择菜单“开发工具”|“Visual Basic”,进入VBA编辑窗口。右击工程资源管理器中的“ThisWorkbook”,在弹出的快捷菜单中选择“查看代码”。输入以下代码,如图2.87所示。
Private SubWorkbook_Open()
Application.Visible= False
系统登录.Show
Application.Caption= "我的程序"
Sheets("主界面").ScrollArea = "$A$1"
End Sub
(3) 在VBA编辑窗口中,选择菜单“插入”|“用户窗体”,修改窗体的Name(名称)和Caption属性都为“系统登录”。按照如图2.88所示窗体设计图,利用工具箱加入各个控件。其中“登录信息”为框架Frame1,修改其Caption属性为“登录信息”;操作员用户(登录信息下面一行)选择使用复合框ComboBox1;密码(操作员用户下面一行)使用文字框TextBox1输入,为