VB菜单设计

利用菜单编辑器完成如图“颜色设置”的界面设计。

步骤一：菜单编辑器在哪里？

步骤二：建立一级菜单“菜单”（menu），二级菜单“改色”（changecolour）、退出（quit）以及三级菜单“红色”（red）、“绿色”（green）、“蓝色”（blue）。如图：

1.分别为三级菜单“红色”、“绿色”、“蓝色”添加代码：

2.为二级菜单“退出”添加代码如下：

vb练习题,电子版第13章多窗体程序设计

第十三章多窗体程序设计 教学要求： 了解多重窗体应用程序的适用范围与特点，掌握多重窗体应用程序建立的主要步骤；了解多重窗体程序的执行与保存特点，了解Visual Basic工程的结构特点（标准模块、窗体模块、Sub Main过程）；掌握闲置循环与DoEvents语句的用法。 知识点： 多重窗体应用程序；多重窗体应用程序的建立、执行、保存；Visual Basic工程的结构特点；闲置循环与DoEvents语句。 内容导航： 一、建立多重窗体应用程序 （一）多重窗体程序设计有关的语句和方法 1．Load语句。格式：Load 窗体名 2．Unload语句。格式：Unload 窗体名 3．Show方法。格式：[窗体名.]Show[模式] 4．Hide方法。格式：[窗体名.]Hide （二）建立界面 窗体的添加方法有如下4种： 方法一：单击“工程”菜单中的“添加窗体”命令； 方法二：用鼠标右键单击“工程资源管理器”的任何项目，在弹出的快捷菜单中选择“添加”，单击“添加窗体”命令； 方法三：单击工具栏中的“添加窗体”命令； 方法四：通过组合键Alt+P，F。 二、多重窗体程序的执行与保存 （一）指定启动窗体 在缺省情况下，应用程序中的第一个窗体被指定为启动窗体。应用程序开始运行时，此窗体就被显示出来。要改变启动窗体的执行方法如下： 从“工程”菜单中，选取“工程属性”命令，选取“通用”选项卡，在“启动对象”中，选取要作为新启动窗体的窗体，最后单击“确定”按钮。 （二）保存多窗体程序 为了保存多窗体程序，通常需要一下两步： 1．保存模块。 2．保存工程 （三）装入多窗体程序 装入多窗体程序和装入单窗体程序一样，只要打开工程文件，工程中包括的其他文件便会自动装入内存，而不用一一打开。 三、Visual Basic工程结构 Visual Basic工程分为3个层次：工程级（全局）、模块级和过程级，这对变量与类型的定义和使用都是很重要的。

vb程序设计的几个简单例子

Option Explicit Private Sub Command1_Click() Dim i%, j%, r! i = Val(Text1.Text) j = Val(Text2.Text) Picture1.Print i; j; Call gysh(i, j) Picture1.Print "最大公约数是" & i r = Val(InputBox("输入半径")) Call S(r) End Sub Public Function gysh(m As Integer, n As Integer) As Integer Dim t% Do t = m Mod n: m = n: n = t Loop While t <> 0 End Function Public function S(r!) Const pi = 3.1415926 S = pi * r ^ 2 MsgBox "圆面积为：" & S End function Public Function 定积分() End Function

Dim a() As Integer, i%, j%, n%, t% Private Sub Command1_Click() Picture1.Print "排序前的数组为：" n = V al(InputBox("请输入一个3到100的整数")) ReDim a(1 To n) Randomize For i = 1 To n a(i) = Int(Rnd * 100) + 1 Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next i End Sub Private Sub Command2_Click() Picture1.Print Picture1.Print "排序后的数组为：" For i = 1 To n - 1 For j = i + 1 To n If a(i) > a(j) Then t = a(i) a(i) = a(j) a(j) = t End If Next Next For i = 1 To n Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next End Sub

[论文]第11章vb菜单程序设计

[论文]第11章vb菜单程序设计 作业:P314 一，二题 P314 第三题的1，2 在前面所讲的各种操作中，事件的执行都是通过“事件驱动程序”完成的。那么，如果我们要设计菜单，该如何操作呢, 第11章菜单程序设计 看看WORD的菜单。 11.1 用菜单编辑器建立菜单 一、菜单类型 1. 下拉式菜单 例:单击“文件”菜单所显示的就是下拉式菜单。 2. 弹出式菜单 例:用鼠标右键单击窗体时所显示菜单是弹出式 菜单。 二、启动菜单编辑器的方法 有4种方法: (1) 执行“工具”菜单中的“菜单编辑器”命令。 (2) 执行热键 Ctrl+E (3) 单击标准工具栏中的“菜单编辑器”按钮。 (4) 在窗体上单击鼠标右键，从弹出的菜单中选 择“菜单编辑器”命令。 准备:打开cx1程序。 三、菜单编辑器窗口的组成

窗口分三部分:数据区、编辑区和菜单项显示区。 1. 数据区 (1) 标题:输入所建立菜单的名字及菜单中每个菜单项的标题。运行后可以看到标题。 注意:如果想在菜单中加一条分隔线，只需输入一个减号(-)。 (2) 名称:用来输入菜单名及各菜单项的控制名(相当于Name属性)，运行后可以看不到，用于编程。 (3) 索引:用来为控件数组设立下标。 (4) 快捷键:用来设置菜单项的快捷键。 (5) 协调位置:是一个列表框，用来确定菜单或菜单项是否出现或在什么位置出现。 0—None 菜单项不显示 1—Left 菜单项靠左显示 0—Middle 菜单项居中显示 0—Right 菜单项靠右显示 (6) 复选:当选择该项时，可以在相应的菜单项旁加上指定的记号(例如“?”) (7) 有效:用来设置菜单项是是否能被激活。如果未选中，则相应的菜单项变灰。 (8) 可见:确定菜单项是否可见。 2(编辑区(对菜单进行编辑) (1)左、右箭头:由来产生或取消内缩符号(菜单的降级升级)。 单击一次右箭头，产生4个点，菜单层次降一级。 单击一次左箭头，删除4个点，菜单层次升一级。 (2)上、下箭头:用来移动菜单项的位置。

完整word版,VB程序设计例题12例

索引 一、在窗体上画一个文本框，其名称为Text1，Text属性为空白。再画一个命令按钮，其名称为C1，Visible属性为False。编写适当的事件过程。程序运行后，如果在文本框中输入字符，则命令按钮出现。 二、计算圆的周长和面积：在窗体中添加一个文本框（Text1）和一个对应的标签（Label1），再添加两个命令按钮（Command1和Command2）和一个图片框（Picture1）。程序运行时，当单击Command1按钮后，计算圆的周长；当单击Command2按钮后，计算圆的面积；计算结果输出在图片框中。（要求在未输入半径前两个按钮呈灰色不可用。） 三、在窗体上添加三个文本框和对应的三个标签，标签的标题分别是“个位”、“十位”、“百位”。程序运行时，当单击窗体后，随机产生一个【100，999】区间内的整数，将它的个位、十位、百位数字分别显示在对应的文本框中。 四、设计一个计算程序：在窗体上添加四个文本框和四个对应的标签，标签的标题分别是“语文”、“数学”、“外语”、“平均成绩”，三个命令按钮，标题分别为“清除”、“计算”、“退出”。程序运行后，用户按“清除”按钮，则清除文本框中显示的内容，按“计算”按钮，则计算三科平均成绩，将计算结果显示在第四个文本框中（计算结果保留小数点后一位）。单击退出按钮则程序退出。 五、某税务部门征收所得税，规定如下：（1）收入200元以内，免征。（2）收入在200~400元，超过200元的部分纳税3%。（3）收入超过400元的部分，纳税4%。（4）当收入达5000元或超过时，将4%税金改为5%。编程序实现上述操作。 六、给定三角形的三条边的边长，计算三角形的面积。编写程序，首选判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。 七、编程求100以内的全部素数。 八、编程打印钻石图案。 九、输出杨辉三角形。 十、有一个数组，包含了10个不同的随机整数（20~90），要求计算出它们的平均值，并输出这个数组中最接近于平均值的数。 十一、在一个窗体上建有包含三个命令按钮的控件数组和一个文体框。编程实现当按下标题不同的命令按钮时，使文体框中文字的字体发生相应的变化。 十二、编程求1000以内的完全数。所谓完全数是指这样的自然数：它的各个约数（不包括该数本身）。如28=1+2+4+7+14就是一个完全数。

VB程序设计例题程序改错程序填空程序设计

'以下程序段用于输出杨辉三角:结果样式如图1 ' Private Sub Form_Click() Const n = 10 Dim arr(n, n) As Integer For I = 1 To n arr(I, I) = 1 '**********SPACE********** 【arr(I, 1) = 1】 Next I For I = 3 To n For j = 2 To I - 1 '**********SPACE********** arr(i, j) =arr(i-1,j-1)+arr(i-1,j) Next j Next I For I = 1 To n For j = 1 To I '**********SPACE********** 【print arr(I,j)】 Next j Print Next I End Sub Option Explicit '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目：用自定义函数的方法求sum（x），求当-1≤x≤1时，' sum（x）=x/2！+x^2/3!+x^3/4!+……+x^n/(n+1)!， ' 当x〉1或x〈-1时，函数值为0。当n〈=0时，输入数' 据错误。X、N都是由用户输入。 '------------------------------------------------ '注意：不可增加或删除程序行，也不可以更改程序结构 '------------------------------------------------ Private Sub Command1_Click() Dim s As Single Dim n As Integer, x As Single, k As Integer n = Val(InputBox("Please input a integer value:"))

VB可视化程序设计实例——小时钟

VB可视化程序设计实例——小时钟 本例专门针对程序设计初学者而设计，尤其适合第一次接触VB的学生学习。通过用VB来设计如图3.39所示的时钟程序，初步感受一下可视化和面向对象的程序设计过程。 图3.39 时钟程序运行效果 小时钟程序中包含窗体控件、标签控件和计时器控件等3个控件。窗体控件是小时钟程序运行时的窗口，标题栏上的标题是“时钟”，在右上角有最小化、最大化和关闭按钮。标签控件可以用来显示文本，本例中用来显示时间，如“9:48:57”。计时器控件每秒一次把计算机的当前系统时间显示到标签控件中，使得小时钟不停地运行。Array启动VB，首先显示“新建工程”对话框（图3.40），在选择“新建”选项卡中的“标 准EXE”项后，单击“打开”按钮，进入VB编程环境，如图3.41所示。 图3.40 “新建工程”对话框

图3.41 VB 可视化编程环境 除了标题栏、菜单栏和标准工具栏外，编程环境中还有工具箱、窗体和属性等窗口。 双击工具箱（图3.42）中的标签控件，在窗体Form1中放置可以显示文本信息的标签控件Label1，见图3.43。时钟的时、分和秒以后就显示在Label1中。拖曳Label1可以移动它，拖曳它的八个控制点，可以改变它的大小。 图3.42 工具箱 图3.43 label1控件 图3.44 计时器控件 双击工具箱中的计时器控件，在窗体Form1中放置计时器控件Timer1，见图3.44。计时器控件以一定的时间周期，调用一个事件。计时器控件只有在设计阶段出现在窗体上，程序运行时是不可见的，它的位置和大小无关紧要。 到目前为止，已经建立了窗体Form1、标签控件Label1和计时器控件Timer1等3个对象。下面，将设置它们的属性。 窗体窗口

第八章 程序设计VB

第八章程序设计VB 一、选择题 1、使用Visual Basic编程，通常会用到工具箱中的工具，我们把这些具称为（）。 事件 B、工具盒 C、控件 D、窗体 2、在VB中的表达式11*3的运算结果值是（） A、3 B、11 C、33 D、113 3、当我们编写好一个程序，把它保存起来时，“工程名”是用什么作为扩展名的（） A、*.frm B、*.vbp C、*.bas D、*.bat 4、下列变量中写法错误的是（） A、abc B、abc123 C、end D、sub 5、结束当前程序的语句是（） A、quit B、exit C、end D、sub 6、如果要把某个图片作为程序窗体的背景，下列方法中最合理的是（） A、直接修改窗体的Picture属性实现插入图片 B、在窗体中插入Image控件，再修改该控件的Picture属性插入图片 C、在窗体中插入PictureBox控件，再修改该控件的Picture属性插入图片 D、选择“插入”“图片”菜单命令实现 7、VB程序设计的完整步骤是（） A、可视性程序设计 B、代码程序设计 C、可视性程序设计和代码程序设计 D、界面设计 8、在Visual Basic环境下，当写一个新的Visual Basic程序时，所何等的第一件事是（）。 A、编写代码 B、新建一个工程 C、打开属性窗口 D、进入VB环境 9、要求改变窗体的标题时，应当在属性窗口中改变的属性是（）

A、Caption B、Name C、Text D、Label 10、窗体能响应的事件是（）。 A、ActiveFrom B、Drive C、Load D、Change 11、在以下事件过程中，Private表示（） Private sub lblabAbc_Change() …… End Sub A、此过程可以被任何其它过程调用 B、此过程只可以被本窗体模块中的其它过程调用 C、此过程不可以被任何其它过程调用 D、此过程只可以被本工程中的其它过程调用 12、下列控件中可以自动设置滚动条是（） A、复选框 B、框架 C、文本框 D、标签框 13、能够将文本框控件隐藏起来的属性是（）。 A、Clear B、Visible C、Hide D、New 14、能够改变复选框中背景颜色的属性是（）。 A、Value B、Fontcolor C、Backcolor D、Font 15、滚动条控件的Smallchange属性所设置的是（）。 A、当单击滚动条上滚动块时的移动量 B、滚动条中滚动块的最小移动单位 C、滚动条中滚动块的最小移动范围 D、滚动条控件无该属性 16、在设计一个计算器是，必须要使用的控件是（）。 A、滚动条 B、图片库 C、文本框 D、单选框 17、Visual Basic提供的选择框（ChechBox）可具有功能是（）。 A、多重选择 B、单一选择 C、选择多次 D、单选框 18、Visual Basic为命令按钮提供的Cancel属性是（）。 A、用来指定命令按钮是否为窗体的“取消”按钮 B、用来指定命令按钮的功能是停止一个程序的运行

VB程序设计答案

VB计算机答案 第1章Visual Basic简介 1. 要使计算机能够按人的要求完成一系列的操作，就要求计算机能够理解并执行人们给出 的各种命令，因此就需要在人和计算机之间制定一种二者都能识别的特定的语言，这种特定的语言就是程序设计语言。使用程序设计语言编写的、用来使计算机完成一定任务的、一系列命令的集合构成程序，编写程序的工作则称为程序设计 2. 机器语言可以在计算机上直接运行。 3. 翻译程序的作用是将源程序翻译成计算机能够理解并直接执行的目标程序；对高级语言 源程序进行翻译可以有解释方式和编译方式。解释方式不生成可执行程序。 4. 算法是指计算机解题的方法和步骤。 5. 可视化界面设计指的是：把设计界面的复杂性向编程人员隐蔽起来，编程人员不需要编 写大量的代码来描述界面，只需要使用系统提供的工具在界面上直接把各种对象“画” 出来，并设置这些对象的一些属性就可以了；事件驱动的编程机制指的是：编写程序时，针对不同对象的不同事件编写相应的代码段，每一个代码段只有当运行时在相应对象上发生相应的事件才被执行。 6. Visual Basic的3种工作模式是：设计模式、运行模式、中断模式。 7. Visual Basic中的控件可以分为3大类：内部控件、ActiveX控件、可插入对象。 8. ActiveX控件文件的扩展名是OCX。 9. 工程组文件的扩展名是vbg；工程文件的扩展名vbp；窗体文件的扩展名frm；标准模块 文件的扩展名bas；类模块文件的扩展名cls。 10. 在代码窗口的对象下拉列表中，窗体的名称总是显示为Form。 11. 在Visual Baisc中，要获取上下文相关帮助，只需要在上下文相关位置按F1键。 第2章Visual Basic简单工程的设计 一、填空题 1. 对象名.属性名 = 属性值 2. Myform.BackColor = vbBlue 3. 发生某一事件时要执行的代码；cmd1；Click；Form_Load 4. 对象名.方法名；Form1.Show；Picture1.Cls 5. 中央 6. Ctrl 7. Ctrl;Shift 8. Shift+“方向箭头”; Ctrl+“方向箭头” 9. vbp 10. 窗体 11. F5 12. 工程；工程1属性（“工程1”为当前工程名） 13. Top；Left；Width；Height 二、选择题 1．C 2．C 3．B 4．C 5．C 6．D 7．B 8．A；D 9．B 10．B 11．C 12．B 13．A 14．B 15．D 16．A 17．A 18．A 19．D;D 20．B 21．C 22．B 23．B 24．A 25．C

VB课后习题第11章习题及答案

习题十一及答案 习题十一 1．简答题 （1）Visual Basic有哪几种工作模式？ （2）Visual Basic中错误类型有哪几种？ （3）简要说明VB程序调试的主要方法和工具。 （4）“立即”窗口、“监视”窗口和“本地”窗口有什么区别？ 2．判断题 （1）在VB集成环境中只有运行程序才能发现程序错误。 ( ) （2）设置错误的捕捉陷阱，指在程序中可能出现错误的地方放置捕捉语句来捕获产生错误的语句。 ( ) （3）On Error Resume Next语句的功能是忽略错误，继续往下执行。 ( ) （4）VB程序中出现编译错误时，不会产生错误提示。 ( ) 3．选择题 （1）当语句不符合文法规则时，出现的错误是（）。 A）逻辑错误 B）运行时期错误 C）语法错误 D）以上都不对 （2）下列陈述中正确的是（）。 A）中断点只能在设计过程中设置。 B）中断点只能在执行过程中设置。 C）中断点可以在设计过程或在执行过程中设置。 D）中断点可以在设计过程中设置，也可以在执行过程或中断过程中设置。 （3）下列属性中，属于Err对象的有（）。 A） Number B） Caption C） Description D） Text 4．填空题 （1）设置断点的快捷键是。 （2）VB单步执行的快捷键是。 （3）错误码为11时表示发生的错误是。 5．编写一段程序，如果出现数组下标越界时，则给出错误的描述并结束程序的运行。 习题十一参考答案： 一、简答题 1．Visual Basic有哪几种工作模式？ （1）设计模式 启动Visual Basic后，即进入设计模式，在主窗口标题栏上显示“设计”字样。建立一 个应用程序的所有步骤基本上都在设计模式下完成，包括窗体设计、建立控件、编写程序代 码以及利用属性窗口设置属性值或查看当前属性值等。但在设计阶段不能执行程序，也不能 使用调试工具，只可设置断点。 应用程序可以直接从设计阶段进入运行阶段，但不可以进入中断模式。 （2）执行模式 执行“运行”菜单中的“启动”命令（或按下F5键、或单击工具条上的“启动”按钮）， 即进入执行模式，此时标题栏上原来显示“设计”的地方已被“运行”字样所代替。当整个 应用程序进入运行阶段后，开始执行程序代码。在运行阶段只可以执行代码，不能修改代码。 （3）中断模式

VB程序设计答案

VB程序设计答案 第一章习题参考答案 一、填空题 1、对象事件驱动 2、编译运行模式解释运行模式 二、简答题 1、简述VB的特点。 答：①可视化的程序设计方法 ②面向对象的程序设计思想 ③事件驱动的编程机制 ④结构化的程序设计语言 ⑤高度的可扩充性 ⑥强大的数据库访问能力 ⑦支持动态数据交换 ⑧支持对象链接与嵌入 2、简述VB的安装过程。 答：①向光驱中放入VB安装光盘； ②计算机将运行自动安装程序，若没有，执行VB目录下的Setup.exe； ③根据提示逐一回答问题，并点击“下一步”； ④点击“完成”； 2、如何启动VB。 答：三种方法： ①单击“开始”按钮，选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击； ②双击桌面上的VB6.0快捷图标； ③在“开始”菜单的运行对话框中输入命令来启动VB； 第二章习题参考答案 一、选择题： 1-10、DCACD BCBBC 11-20、BADCA BBAAB 21-29、AACBB CDDC 二、填空题 1．窗体、控件 2．属性值 3．属性窗口设置、代码窗口设置 4．事件过程 5．对象名、下划线、事件名 6．Form_Click 第三章习题参考答案

一、选择题 1、B 2、C 3、A 4、B 5、A 6、C 7、C 二、填空题 1、11 字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。String、Byte、Integer、Long、Single、Double、Currency、Boolean 、Date、Object、Variant 2、双引号(英文)、# 3、ASCII、1、2 4、public、通用、Dim、Static、Private、Static 5、&、+、+ 6、Now()、Time、日期型 三、解答题 1、(3) 2、(1 ) 3、（1）常量（关键字）（2）字符型常量（3）逻辑型常量（4）变量（5）字符串常量（6）变量 （7）字符串常量（8）变量（9）日期型常量（题目应是#11/16/1999#）（10）数值型常量（单精度） 4、31 5、（1）(1+y/x)/(1-y/x) （2）x^3+3*x*y/(2-y) （3）sqr(abs(a*b-c^3)) （4）sqr(s*(s-a)*(s-b)*(s-c)) 6、 7、（1）13 （2）17 （3）#1999-11-12# （4）zxy123ABC 8、（1）19 （2）8.16666666666667 （3）5．25 （4）2 9、（1）-4 （2）2 . 82842712474619 （3）-3 （4）49 （5）”hello”（6）He 7）16 （8）“-459.65”（9）5 10、（4） 11、（2） 12、（4） 第四章习题参考答案 一、选择题： 1—7: DAABBCD 二、填空题 1．500.00% 2．将字号扩大为原来的二倍 3． B 三、编程题（略） 1．文本框、标签和命令按钮的名称分别为text1、label1、command1 Private Sub Command1_Click() Label1.caption=text1.text Command1.caption=text1.text

vb程序的设计实例

vb程序设计实例 2009-5-22 15:37 提问者：淘淘的某在|悬赏分：20 |浏览次数：1688次 编写程序，设银行定期存款的年利率为：1年期2.25%，2年期2.43%，3年期为2.70%，5年期为2.88%（不记复利）。今有X元，5年以后使用，共有如下6中存法： ①存一次5年期； ②存一次3年期，一次2年期； ③存一次3年期，两次1年期； ④存两次2年期，一次1年期； ⑤存一次2年期，三次1年期； ⑥存五次1年期. 分别计算各种存法5年后到期的本息合计，如图所示 2009-5-22 17:06 最佳答案 Private Sub Form_Activate() '1年期2.25%，2年期2.43%，3年期为2.70%，5年期为2.88%（不记复利）。今有X元，5年以后使用，共有如下6中存法： Const x1 As Double = 0.0225, x2 As Double = 0.0243, x3 As Double = 0.027, x5 As Double = 0.0288 Dim x As Double x = Val(InputBox("")) Print "①存一次5年期,5年后到期的本息合计"; ss(x, 5, x5) Print "②存一次3年期，一次2年期,5年后到期的本息合计"; ss(ss(x, 3, x3), 2, x2) Print "③存一次3年期，两次1年期,5年后到期的本息合计"; ss(ss(ss(x, 3, x3), 1, x1), 1, x1) Print "④存两次2年期，一次1年期,5年后到期的本息合计"; ss(ss(ss(x, 2, x2), 2, x2), 1, x1) Print "⑤存一次2年期，三次1年期,5年后到期的本息合计"; ss(ss(ss(ss(x, 2, x2), 1, x1), 1, x1), 1, x1) Print "⑥存五次1年期,5年后到期的本息合计"; ss(ss(ss(ss(ss(x, 1, x1), 1, x1), 1, x1), 1, x1), 1, x1) End Sub Private Function ss(ByVal a As Double, b As Integer, c As Double) As Double ss = a + a * c * b End Function Private Sub Form_Load()

VB菜单设计

[教案] （十）菜单设计 授课方式：讲授法 授课学时：2学时 教学目的： 通过本次课的学习，学生应该掌握菜单编辑器的使用，掌握针对菜单命令响应事件的代码。 教学重点和难点： 1．会建立各种菜单并对菜单进行有效性控制 2．能编写代码 教学过程： 菜单设计 一、菜单设计器的使用 1．属性设置 2．编辑区域 3．显示区域 二、下拉菜单的设计 1．设计界面 2．代码编写 三、弹出式菜单的设计 1．设计界面 2．代码编写 [讲稿] （十）菜单设计 菜单的相关概念 1. 菜单的类型 –下拉菜单：常以菜单栏的形式出现在标题栏下面 –弹出菜单(快捷菜单)：独立于菜单栏而显示在窗体上的浮动菜单，其菜单项取决于按下鼠标右键时指针所处的位置。 2. VB中的菜单控件 –菜单和菜单项均看作是菜单控件

–菜单控件两个最重要的属性 名称(Name)：程序代码中用来引用菜单控件 标题(Caption)：出现在控件上的文本 –菜单控件只响应Click事件 10.1 菜单设计器的使用 打开菜单编辑器： –“工具→菜单编辑器” –工具栏“菜单编辑器”按钮 1. 常用属性 –标题：设置Caption属性 字符前加&，该字符成为访问键 只输入一个减号- ，创建分隔条 –名称：设置Name属性 注：对分隔条，也需定义名称 –索引(Index)：用于菜单控件数组 –快捷键、复选(Checked) –有效(Enabled)、可见(Visible)

2. 编辑菜单控件

10.2 下拉菜单的设计 方法：先通过菜单编辑器设计菜单，然后编写各菜单控件的Click事件过程。例：创建简易编辑器 (1) 设计菜单

在VB中添加菜单

在VB中添加菜单 在Windows应用程序中，我们可以方便地通过菜单进行操作。就像我们常用的办公软件WORD： 程序的功能菜单在VB中可以借助菜单编辑器方便地生成菜单，下面随着我一步一步地操作，为自己的应用程序添加一个菜单。 首先新建一个工程，然后将窗体标题修改为“菜单程序示例”，如图： 当然这不是必须的！ 在VB的菜单栏的“工具”菜单中选择“菜单编辑器”或直接点击快捷键CTRL+E打开。打开后的菜单编辑器是这样的： 此时还没有添加任何内容，下面我们为这个应用程序添加菜单内容，假设这个应用程序的菜单结构如下: 文件 ……新建 ……打开 ……保存 ……退出 编辑 ……剪切 ……复制 ……粘贴 帮助 ……关于前面有“……”标记的表示这是子菜单。现在我们就把这个结构用菜单编辑器来实现吧。 在打开的菜单编辑器的标题中输入“文件”，名称是供以后在程序中调用的，所以最好取个好记的与本菜单项相关的有意义的名称，我将它命名为“menu_File”，效果如图： 如果你用过WORD等程序，你会发现很多菜单上提供了一个快捷键，就是在菜单项的后面紧跟一对括号，其中指定一个字母，操作时只要用ALT键加上这个字母就可以打开这个菜单项了，如：文件(F)。这怎么实现呢？很简单，在上面的标题“文件”后输入“(&F)”就行了，试试吧。不要确定保存，我们还没有添加完呢。点击“下一个”按钮，将选择条移动到“文件”的下一行，然后用同样的方法输入“新建”菜单项，如果此时你点击保存，主窗口中将带有刚生成的菜单了，同时你也会发现“新建”菜单项和“文件”菜单项处于同一排，而不是以子菜单的形式生成在“文件”菜单项之内的，那怎么办呢？请仔细看看菜单编辑器中提供的各种功能吧（如图） 我们只要选中准备设置为子菜单的那一项（“新建”菜单项），点击上面的右箭头就行，点一次添加一级，如果点两次则是子子菜单，相应的菜单项前会用“…………”表示。用同样的方法把上面的菜单项添加到菜单编辑器中，效果如图： 在Windows应用程序中，有些菜单项被分隔条隔开，这样的效果怎么实现呢？我们在“文件”菜单中的“退出”菜单项上方添加一分隔条吧，选中“退出”菜单项，然后点击“插

测绘程序设计教案VB版第十一章

第十一章演示源程序§11-1 VB6.0测量程序菜单总体演示

VERSION 5.00 Begin VB.Form Form1 Caption = "Form1" ClientHeight = 3195 ClientLeft = 165 ClientTop = 855 ClientWidth = 7545 LinkTopic = "Form1" ScaleHeight = 3195 ScaleWidth = 7545 StartUpPosition = 3 '窗口缺省 Begin VB.Menu WYJL Caption = "外业记录" Begin VB.Menu SZCLJL Caption = "水准测量观测记录" Begin VB.Menu PTSZJL Caption = "普通水准记录" End Begin VB.Menu SDSZJL Caption = "四等水准记录" End End Begin VB.Menu SPFXJL Caption = "水平方向观测记录" Begin VB.Menu J6FXGCJL Caption = "J6方向观测法记录" End Begin VB.Menu J6CHFJL Caption = "J6测回法记录" End Begin VB.Menu LZF6 Caption = "-" End Begin VB.Menu J2FXGCJL Caption = "J2方向观测法记录" End Begin VB.Menu J2CHFJL Caption = "J2测回法记录" End End End Begin VB.Menu NYJS

VB编程实例精讲(150例)

ExcelVBA编程实例（150例） 主要内容和特点 《ExcelVBA编程入门范例》主要是以一些基础而简短的VBA实例来对ExcelV BA中的常用对象及其属性和方法进行讲解，包括应用程序对象、窗口、工作簿、工作表、单元格和单元格区域、图表、数据透视表、形状、控件、菜单和工具栏、帮助助手、格式化操作、文件操作、以及常用方法和函数及技巧等方面的应用。这些例子都比较基础，很容易理解，因而，很容易调试并得以实现，让您通过具体的实例来熟悉ExcelVBA编程。 ■分16章共14个专题，以具体实例来对大多数常用的ExcelVBA对象进行讲解； ■一般而言，每个实例都很简短，用来说明使用VBA实现Excel某一功能的操作； ■各章内容主要是实例，即VBA代码，配以简短的说明，有些例子可能配以必要的图片，以便于理解； ■您可以对这些实例进行扩充或组合，以实现您想要的功能或更复杂的操作。VBE编辑器及VBA代码输入和调试的基本知识 在学习这些实例的过程中，最好自已动手将它们输入到VBE编辑器中调试运行，来查看它们的结果。当然，您可以偷赖，将它们复制/粘贴到代码编辑窗口后，进行调试运行。下面，对VBE编辑器界面进行介绍，并对VBA代码输入和调试的基本知识进行简单的讲解。 激活VBE编辑器 一般可以使用以下三种方式来打开VBE编辑器： ■使用工作表菜单“工具——宏——Visual Basic编辑器”命令，如图00-01所示；■在Visual Basic工具栏上，按“Visual Basic编辑器”按钮，如图00-02所示；■按Alt+F11组合键。

图00-01：选择菜单“工具——宏——Visual Basic编辑器”命令来打开VBE编辑器 图00-02：选择Visual Basic工具栏上的“Visual Basic编辑器”命令按钮来打开VBE编辑器 此外，您也可以使用下面三种方式打开VBE编辑器： ■在任一工作表标签上单击鼠标右键，在弹出的菜单中选择“查看代码”，则可进入VBE编辑器访问该工作表的代码模块，如图00-03所示； ■在工作簿窗口左上角的Excel图标上单击鼠标右键，在弹出的菜单中选择“查看代码”，则可进入VBE编辑器访问活动工作簿的ThisWorkbook代码模块，如图00-04所示； ■选择菜单“工具——宏——宏”命令打开宏对话框，若该工作簿中有宏程序，则单击该对话框中的“编辑”按钮即可进行VBE编辑器代码模块，如图00-05所示。

第11章_对话框与菜单程序设计

第11章对话框及菜单程序设计 本章要求： 了解自定义对话框的使用。 掌握通用对话框的建立和常用属性、常用方法； 掌握利用菜单设计器来建立、修改菜单项的方法； 本章重点：通用对话框的使用、菜单的建立与使用本章重点：通用对话框的使用、动态菜单概述：“对话框”可以被看作一种特殊的窗体，它的大小一般不可改变，也没有“最小化”和“最大化”按钮，它只有一个“关闭”按钮（有时还包含一个“帮助”按钮）。 VB提供了三种解决方案： 系统预定义的对话框（InputBox和MsgBox） 用户自定义对话框 通用对话框控件。 11．1对话框程序设计 11.1.1 由普通窗体创建自定义对话框对话框窗体与一般窗体在外观上是有区别的，需要通过设置以下属性值来自定义窗体外观。 1．BorderStyle属性 窗体的BorderStyle属性值设置为3（VbFixedDoubleialog） 此目的是取消最大化和最小化按钮。 2．ControlBox属性属性值为True时窗体显示控制菜单框，为False时不显示。 例11-1 建立一个用户登录对话框 运行结果如下： 11.1.2 使用对话框模板窗体创建对话框 Visual Basic6.0系统提供了多种不同类的“对话框”模板窗体，通过“工程”菜单中的“添加窗体”命令，即可打开“添加窗体”对话框。用户可以选择的对话框有“关于”对话框、对话框、登录对话框、日积月累、ODBC登录、选项对话框6类等，

11.1.3 通用对话框程序启动时，一般没有通用对话框控件，因此，为了使用通用对话框，需要把通用对话框控件添加到工具箱，操作如下： 1．打开通用对话框 通用对话框可以提供6种形式的对话框，通过设置Action 属性值或调用Show 方法来建立不同类型的对话框。如下表： 打开通用对话框的方法与Action 属性设置 如果在过程中显示某种类型的对话框，只需要在过程中输入： 通用对话框控件名.[方法名]或者通用对话框控件名.action=[属性值]即可。 通用对话框的属性页 在设计时，可能通过属性窗口设置通用对话框的属性设置控件属性，通常使用通用对话框的属性页设置相关属性。 注：加入通用对话框后，选中，而后在属性设计页选Custom ，则出现属性对话框设置属性窗口。 打开对话框可以用来指定文件所在驱动器、文件夹及文件名等。如果要显示打开对话框，则只需要在过程中输入: 通用对话框控件名.showopen 或者通用对话框控件名.action=1 例11-2 显示图片示例 类型 Action 属 方法 “打开”对话框 1 ShowOpen “另存为”对话框 2 ShowSave “颜色”对话框 3 ShowColor “字体”对话框 4 ShowFont “打印”对话框 5 ShowPrinter “帮助”对话框 6 ShowHelp Dialog FileN Fil FilterI Defaul 工程/部 选定Microsoft CommDialog Control 6.0 确 选定部件标

第七章 vb6.0菜单的设计与多文档界面

第七章菜单的设计与多文档界面 7.1 菜单简介 大多数Windows应用程序都有一个菜单栏，它总是处在窗体标题栏的下面，并包含一个或 多个菜单标题。单击每个菜单标题都会弹出一个下拉菜单，在下拉菜单中包含有菜单项、分隔条和子菜单标题。 有的菜单项可以直接执行，有的菜单项执行时则会弹出一个对话框。所有的Windows应用程序都遵循以下3个约定： 凡是菜单名称后有一个省略号的，均表示在单击该选项后会弹出一个相应的对话框，在 用户作出相应的回答后，该项功能就以用户所给予的信息去执行。例如，单击【打开】选项，则弹出【打开】对话框，用户可从中选择要打开的文件。 凡是菜单名称后有一个小三角的，则表示它是一个子菜单标题，子菜单标题并不能直接 执行，仅仅扮演一个“容器”的角色。当鼠标指针移动到子菜单标题上时，会自动弹出子菜单。例如，将指针移动到【发送】选项，就会弹出子菜单。 菜单名称后不包含L述两种符号者，表明该菜单项所代表的命令可直接执行。例如，单 击【关闭】选项，则将关闭当前打开的文档。 另外，有的菜单项名称后还显示相应的键盘访问键和快捷键。访问键允许同时按下Alt 键和一个指定字符来打开一个菜单。一旦菜单打开，通过按下访问键即可选取菜单项。在菜单项的标题中，访问键表现为一个带下划线的字母，如【打开】命令的访问键为0.当打开【文件】菜单后，按下0键即可执行【打开】命令。快捷键出现在相应菜单项的右边，例如，【打开】命令的快捷键是Ctrl+O，无论【文件】菜单是否打开，只要按下Ctrl+O组合键，即可 执行【打开】命令。 由于所有Windows应用程序都遵循上述约定，因此，在创建菜单时，也应该遵循这些约定。例如，如果某菜单项的执行结果是弹出一个对话框，则应该在该菜单项后加上省略符（…）.此外，要使应用程序简单好用，还应该将菜单项按其功能分组。例如，与文件有关的命令【新建】、【打开】和【另存为】都列入了【文件】菜单。 同一菜单中不同类型的选项之间还使用分隔条分隔开来。分隔条作为菜单项间的一个水 平行显示在菜单上。在包含较多菜单项的菜单上，经常使用分隔条将各项划分成一些逻辑组。【文件】菜单，使用分隔条将其菜单项分成6组。 7.2 菜单编辑器简介菜单编辑器是VB提供的一个用于设计菜单的工具，它使看似复杂的菜单创建变得非常简单。使用菜单编辑器可以创建出新的菜单或编辑已有的菜单。打开【工具】菜单，执行【菜单编辑器】命令，将出现如图7.3所示的【菜单编辑器】对话框。也可以通过单击工具栏上的【菜单编辑器】按钮来打开该对话框。其中各主要 选项的含义如下： 标题：该文本框用来输入菜单名，这些名字出现在菜单栏或菜单之中。如果想在菜单中 建立分隔条，则应在该文本框中输入一个连字符“一”.为了能够通过键盘访问菜单项，可在 一个字母前插入&符号。例如，“新建（&N）”.在运行时，该字母带有下划线（&符号是不 可见的）.如果要在菜单中显示&符号，则应在标题中连续输入两个&符号。 名称：该文本框用来输入菜单名称。在代码中就是以该名称来访问菜单项的，它不会出 现在菜单中，这与其他控件的名称是一样的。 索引：可指定一个数字值来确定控件在控件数组中的位置。该位置与控件的屏幕位置无关。 快捷键：可在该列表框中为命令选择快捷键。

VB程序设计教程(第四版)课后答案

VB课后习题答案 第一章习题参考答案 一、填空题 1、对象事件驱动 2、编译运行模式解释运行模式 二、简答题 1、简述VB的特点。 答：①可视化的程序设计方法 ②面向对象的程序设计思想 ③事件驱动的编程机制 ④结构化的程序设计语言 ⑤高度的可扩充性 ⑥强大的数据库访问能力 ⑦支持动态数据交换 ⑧支持对象链接与嵌入 2、简述VB的安装过程。 答：①向光驱中放入VB安装光盘； ②计算机将运行自动安装程序，若没有，执行VB目录下的Setup.exe； ③根据提示逐一回答问题，并点击“下一步”； ④点击“完成”； 2、如何启动VB。 答：三种方法：

①单击“开始”按钮，选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击； ②双击桌面上的VB6.0快捷图标； ③在“开始”菜单的运行对话框中输入命令来启动VB； 第二章习题参考答案 一、选择题： 1-10、 DCACD BCBBC 11-20、BADCA BBAAB 21-29、AACBB CDDC 二、填空题 1．窗体、控件 2．属性值 3．属性窗口设置、代码窗口设置 4．事件过程 5．对象名、下划线、事件名 6． Form_Click 第三章习题参考答案 一、选择题

1、B 2、C 3、A 4、B 5、A 6、C 7、C 二、填空题 1、 11 字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。String、Byte、Integer、Long、Single、Double、Currency、Boolean 、Date、Object、Variant 2、双引号(英文)、# 3、 ASCII、1、2 4、 public、通用、Dim、Static、Private、Static 5、 &、+、+ 6、 Now()、Time、日期型 三、解答题 1、(3) 2、(1 ) 3、（1）常量（关键字）（2）字符型常量（3）逻辑型常量（4）变量（5）字符串常量（6）变量 （7）字符串常量（8）变量（9）日期型常量（题目应是#11/16/1999#）（10）数值型常量（单精度） 4、31 5、（1）(1+y/x)/(1-y/x) （2）x^3+3*x*y/(2-y) （3）sqr(abs(a*b-c^3)) （4）sqr(s*(s-a)*(s-b)*(s-c)) 6、