教学要求
要求掌握:1.管理软件菜单的构思方法。
2.菜单编辑器的使用及菜单的设计方法。
3.编写菜单控件代码及用MsgBox函数设计对话框
重点:软件菜单的设计,菜单控件代码的编写以及用MsgBox函数设计对话框。
难点:菜单控件代码的编写
1.设计:
单击“工具”→“菜单编辑器”命令,弹出“菜单编辑器”对话框;
“菜单编辑器”由菜单属性设置区、编辑区、显示区三部分组成。
→在“标题”栏中输入“文件(&F)”,在“名称”栏中输入“File”,建立“文件”主菜单项;
→单击编辑区的按钮,蓝条下移一行;
→单击编辑区的按钮,出现内缩符号“….”,表示可建立第一级子菜单;
→在“标题”栏中输入“新建(&N)”,在“名称”栏中输入“FileNew”,在“快捷键(S)”栏中选择“Ctrl+N”,建立“新建(&N)”子菜单项;同样,建立其它子菜单项;
2.实现菜单功能(设置程序代码)
设置运行计算器程序
双击Form1窗体,打开代码窗口→在“对象”下拉列表中选择Toolscal,在“过程”下拉列表中选择Click,输入代码:
PrivateSubToolscal_Click(IndexAsInteger)
ReturnValue=Shell("c:/windows/CALC.EXE",1)’运行计算器。
AppActivateReturnValue’激活计算器。
EndSub
设置“关于本软件”程序
PrivateSubAboutSoft_Click(IndexAsInteger)
MsgBox"本信息管理系统软件由ZhP工作室设计(C),xxxx-xxxxZhPingCrop.警告:版权所有,侵权必究。",64,"关于“信息管理”软件"
EndSub
VB语法:
–MsgBox函数:显示信息框。
调用方法:
⑴语句格式:MsgBoxprompt[,bottons][,title][,helpfile,context]
⑵函数格式:MsgBox(prompt[,bottons][,title][,helpfile,context])
参数1:设置消息框在显示的文字
参数2:设置消息的图标、按钮的种类和数目
参数3:设置消息框的标题
参数2是三组不同数的组合,分别表示按钮、图标,之间用“+”连接;
第一组(按钮)第二组(图标)第二组(缺省按钮)
值显示按钮值显示图标值缺省
确定16停的记号0第一个按钮
1确定、取消32问号256第二个按钮
2终止(A)、重试(R)、忽略(I)48惊叹号512第三个按钮
3是(Y)、否(N)、取消64字母i
4是(Y)、否(N)
文本框属性:
右击可以弹出快捷菜单。
Multiline多行属性:缺省值为False,只能输入单行文本。属性为True时,可以按回车键换行,在下一行输入文本。可以使用箭头、Home、End等移动文本。
ScrollBars滚动条属性:
0-None文本框无滚动条
1-有水平滚动条
2-有垂直滚动条
3-Both(水滚动条和垂直滚动条)8.5设计软件菜单这一教案您现在访问的是中国学科吧旗下教案网http://www.jsfw8.com/jafs/