VB实验报告一 选择结构程序设计

合肥师范学院

《计算机基础与程序设计VB》实验报告实验一：选择结构程序设计

班级：

学号：

姓名：

实验日期：

一、实验目的和要求

1．掌握逻辑表达式及关系表达式的正确书写形式。

2．掌握IF语句单行和块书写格式及其正确使用（尤其注意ELSE 和ELSE IF）。

3．掌握多分支情况的控制（使用Select CASE语句）的使用及与多分支条件语句的区别。

二、实验内容

三、实验步骤

1．程序的界面设计。

2．程序主要代码。

3．运行结果。

5．实验总结。(可以从以下几个方面来总结：你在编程过程中花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)红色部分是提示，不用写在实验报告上

VB程序设计实验报告

《VB程序设计》实验单元二 实验报告 专业班级：新闻班姓名: ________________ 学号：—指导教师：完成时间：2013.5 一、实验题目 数组和自定义类型 二、实验环境 Visual Basic6.0 程序软件 三、实验目的 1.掌握数组的声明、数组元素的引用。 2.掌握固定长度数组和动态数组的使用差别。 3.掌握数组常用的操作和常用算法。 4.掌握列表框和组合框的使用。 5.掌握自定义类型及数组的使用。 四、实验内容 1.随机产生30—100 （包括30、100）的10个正整数，求最大值、最小值、平均值，并显示整个数组的只和结果。 2.随机产生20个学生成绩，统计各分数段人数。即0~59、 60~69、 70~79、80~89、90~100,并显示结果。

五、实验步骤 1.打开VB界面，建立工程 2.在窗体窗口设置界面 3?属性窗口控件对象属性设置 4.编写程序代码 5?运行程序及调试 6?程序建立，保存工程文件六、实验结果 第1题：

70 53 57 28 30 77 1 76 81 70最大值81 最小值1 平均值54.3 4 41 86 79 37 96 87 5 94 36 最大值96 最小值4 平均值56.5 52 76 5 59 46 29 62 64 26 27 :最大值76 最小值5 平均值44.6 82 82 58 98 91 22 69 98 24 53最大值98 最小值22 平均值67.7 10 99 67 1 57 10 10 79 28 4 最大值99 最小值1 平均值36. 5 29 38 30 94 97 40 27 16 16 64实验 r Q Forml 回

《VB程序设计》综合复习资料习题

《VB程序设计》综合复习资料习题

《VB程序设计》综合复习资料 第一章Visual Basic程序设计概述 一、填空题 1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。 2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。 3、执行“工程”菜单下的__________命令，可选择并添加ActiveX控件。 4、Visual Basic 6.0用于开发__________环境下的应用程序。 二、选择题 1、下面不是VB工作模式的是（） A．设计模式B．运行模式C．汇编模式D．中断模式 2、可视化编程的最大优点是（） A．具有标准工具箱 B．一个工程文件由若干个窗体文件组成 C．不需要编写大量代码来描述图形对象 D．所见即所得 3、下列不能打开属性窗口的操作是（） A．执行“视图”菜单中的“属性窗口”命令 B．按F4键C．按Ctrl+T D．单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是（） A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G 5、Visual Basic的编程机制是（） A．可视化B．面向对象C．面向图形D．事件驱动 三、简答题 1、代码窗口主要包括哪几部分？ 第 2 页共 32 页

2、在工程资源管理器窗口中，主要列出了哪三类文件？ 3、窗体布局窗口的主要用途是什么？ 4、VB的基本特点是什么？ 5、怎样理解可视化设计？ 6、怎要理解事件驱动编程？ 第二章简单的VB程序设计 一、填空题 1、设置是否可以用Tab键来选取命令按钮，应该用______________属性。 2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。 3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点。 4、设置控件背景颜色的属性名称是______________________。 5、所有控件都具有的共同属性是__________________属性。 6、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_______________。 7、VB中的每个对象（控件）都有一组特征，这组特征称为__________，我们通过修改它可以控制对象的外观和操作。 8、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_____________文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。 9、VB有三种工作模式，分别是设计（Design）模式、_____________和中断（Break）模式。 二、选择题 1、以下能够触发文本框Change事件的操作是（） A．文本框失去焦点B．文本框获得焦点 C．设置文本框的焦点D．改变文本框的内容 2、应用程序设计完成后，应将程序保存，保存的过程是（） A．只保存窗体文件即可 B．只保存工程文件即可 第 3 页共 32 页

《VB选择结构程序设计》教学设计

《VB选择结构程序设计》教学设计 山东省临清市第二中学吴焕英 【案例背景】 高中信息技术新课程的实施，其课程目标定位于全面提升学生的信息素养，其课程的设置从知识与技能、过程与方法、情感态度与价值观三个方面实施这个课程目标。然而，众多的老师实施新课程后发现：教学内容的范围比以前更广泛了、课时远远不够、教学软硬件资源缺乏等诸多问题。因此，如何更有效地开展新课程教学，成为老师们迫切需要解决的问题。本教学案例从学生的实际情况出发，根据现有的数学、英语基础，结合简单的生活实例，引导学生进行探索式学习，问题从简单的英语口语入手，过渡到课题的研究学习。原本枯燥无味的VB程序设计，在简单、形象的生活实例下，激发了学生的思考与探索思维。这样的教学案例，值得我们反思研究、总结与完善。 【教材分析】 算法与程序设计是普通高中信息技术课程中选修模块之一，本模块旨在使学生进一步体验算法思想，了解算法和程序设计在解决问题过程中的地位和作用；能从简单问题出发，设计解决问题的算法，并能初步使用一种程序设计语言编制程序实现算法解决问题。 “选择结构”是教育科学出版社出版的高级中学课程标准实验教科书、算法与程序设计第二章第三节的内容，共分三课时，本课为第二课时。主要内容是用选择结构编写简单的程序解决具体问题。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上，理解了顺序结构的前提后提出的。 通过本课的学习，可以促进学生对问题解决方法和思想的理解与掌握，从而提升学生的问题解决能力，让学生在按照一定的流程解决问题的过程中，去体会和理解程序设计的思想，而且也为多分支选择结构的学习打下基础。 【学生分析】 高一的学生在数学课中已经有了算法和程序设计的基础，学生对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平，在教师的有效引导下，有能力进行自我探究，如果用一种学生比较感兴趣的，能够贴近学生日常生活的例子来分析选择结构的话，那么学生会比较感兴趣。 【教学目标分析】 通过教师引导学生去探究、发现技术背后所蕴含的技术价值和技术思想，使其获得知识与技能的同时，理解和掌握过程与方法，这样才能够学会认知，学会做事，乃至学会生活，提高终生学习的能力、分析解决问题的能力，满足其终身发展的需要，成为适应信息社会的公民。 因此本节课的目标有以下几项：

《VB程序设计》习题答案-林卓然编著

《VB语言程序设计》教材 林卓然编著 《VB程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y)

VB课程实验报告

山西财经大学《程序设计（VB+Acces）》实验报告 ＊＊＊＊年＊月＊＊日实验题目1选择结构程序设计 选课课号2015-2016-2-N081002S00-08034- 学院 ＊＊＊＊＊ 学院 班 级 ＊＊＊＊＊＊＊ 姓名＊＊＊ 学 号 ＊＊＊＊＊＊＊＊＊ 理论课教师李平珍 上机指 导教师 李平珍 实验目的及要求： 1．掌握条件表达式和分支语句 2．正确使用If．．．Then．．．Else和If．．．Then．．．ElseIf等语句3．使用选择性控件实现程序应用 编写以下程序段： 求一元二次方程ax2+bx+c=0的根 设计一个四则运算计算器 实验的详细操作步骤、程序代码及运行截图： 一． Private Sub Command1_Click() Dim A As Single, B As Single, C As Single Dim R1 As Single, R2 As Single A = Val B = Val

If B ^ 2 - 4 * A * C < 0 Then MsgBox "该方程无解." ElseIf B ^ 2 - 4 * A * C = 0 Then R1 = -B / 2 / A MsgBox "该方程仅有一个根为" & R1 & "." Else R1 = (-B + Sqr(B ^ 2 - 4 * A * C)) / (2 * A) R2 = (-B - Sqr(B ^ 2 - 4 * A * C)) / (2 * A) MsgBox "该方程有两个根分别为" & R1 & "和" & R2 & "." End If End Sub 二． Private Sub cmdCal-Click() Dim x1 As Single,sign As String,x2 As Single X1=Val(txtA):sign=txtB:x2=Val(txtC)

vb程序设计试题(含答案)

第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C )

【vb选择结构程序设计】选择结构程序设计

【vb选择结构程序设计】选择结构程序设 计 [1]教学目的： 1、让学生了解选择结构程序 2、掌握逻辑量的概念 3、掌握关系表达式和逻辑表达式 4、了解IF 语句 [2]教学重点：选择结构程序和关系表达及逻辑表达式 [3]教学难点：选择结构程序的掌握 [4]教学方法：引入法 [5]教学工具： [6]教学内容： 教师活动 学生活动 引入： 例子1、从键盘输入一个数，如果是正数则输出这个数，否则输出信息“这个数是负数”。 例子2、用程序编写一个求学生的六门课程六课程的的平均成绩和总分的程序。 例子3、用程序编写一个二元一次方程的根（△>=0） 例子4、把10个职工的工资和打印出来

提问5：如果求1+2+3+4+5+……+100的和怎么办呢？ 提问6：如果求一个班所有学生的六门课程的平均成绩 提问7：如果所求方程的没有实根又怎么办呢？ 提问8：如果要我们打印100个职工的工资又怎么办呢？ 老师得出答案：这就不是顺序结构程序所能解决了。我们在前面已经学过选择结构，提醒学生回忆一下选择结构的流程图图略： 为了能很好的掌握选择程序结构的设计，先了解一些选择程序的基础。 学生做1 学生做2： 学生做3： 学生做4： 学生回答5 学生回答6 学生回答7 学生回答8 一、关系表达式和逻辑表达式 1、逻辑量的概念 逻辑量：在QBASIC中用-1，0，即真和假的表达法。 何时用到：在关系表达式中和逻辑表达式中用到。 当结构为真时是-1，结果是假时为0

例1：X+Y>Z当成立时为真即为-1， 当不成立时为假，即为0 例2：在例中： IFX>0 THEN PRINT X 2、关系运算符和关系表达式 关系：即运算量的关系。六种。>= 关系表达式：即用关系运算符把运算量联接起来的式子。例：A>B, X>=Y, MN等。例：X=Z 注意：赋值符号和关系符号要区分开。 LET A=5 B=A PRINT B=A，B，A 3、逻辑运算符号和逻辑表达式 逻辑运算符：NOT非AND与OR或 1）NOT即对某个运算量的逻辑值取反。 如：A>B为真时，则 NOT A 等于假 程序： A=3 B=4 PRINT A，B，NOTA>B,NOT AB THEN PRINT A

VB实验一 实验报告

实验报告一 课程VB程序设计实验项目Visual Basic环境 顺序选择程序设计(4学时) 成绩 专业班级 姓名学号实验日期 实验目的 （1）熟悉Visual Basic6.0集成开发环境 （2）掌握Visual Basic程序的开发过程，能够运行一个完整的Visual Basic程序（3）掌握选择控制结构（If、Select case）语句实现程序分支 （4）掌握控制结构相关控件（单选按钮、复选框） （5）能综合运用选择及循环控制结构解决较复杂的问题 实验内容 一、VB环境和顺序结构 【实验1】设计一个简单VB程序（10分） 它由一个窗体、一个文本框和3个命令按钮组成。窗体的标题为"Visual Basic 程序设计示例"，当用户单击命令按钮“显示”时，文本框中出现“欢迎使用Visual Basic 6.0”,窗体上显示“你好”，单击命令按钮“清除”时,清除文本框中显示的内容和窗体上的内容，单击命令按钮“结束”时，结束程序。 实验结果： 【实验1 代码】 【实验1 典型结果】 【实验2】编写程序，其功能为输入三角形的三边，求三角形的面积。计算公式为：

S=(a+b+c)/2，面积=sqr(s*(s-a)*(s-b)*(s-c)) （20分） 程序界面如下所示 实验结果： 【实验2 代码】 【实验2 典型结果】 【选做1】单击窗体时，随机产生一个三位正整数，然后逆序输出该数，产生的数与逆序数同时显示，结果如下所示,要求用两种方法实现（使用数字的逆序和字符串的逆序）（15分） 实验结果： 【方法1 代码】 【方法1 典型结果】 【方法2 代码】 【方法2 典型结果】

VB程序设计 试题与答案-1

《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。

VB选择结构程序设计教学案例

VB选择结构程序设计教学案例 摘要："选择结构"是高等教育出版社出版的中等职业学校计算机应用与软件技术专业教学用书,程序控制结构中的选择结构是第四章第三节的内容,共分三课时,本课为第一课时，主要内容是用选择结构编写简单的程序 关键词：程序设计 《VB选择结构程序设计》教学案例 江山职教中心计算机组吴建浩 【案例背景】 中等职业学校的Visual Basic程序设计是让学生学会一种较为简单的程序设计语言，其课程的设置从知识与技能，过程与方法，情感态度与价值观三个方面实施这个课程目标。然而，众多的老师实施新课程后发现：教学内容的范围比以前更广泛了、课时远远不够、教学软硬件资源缺乏等诸多问题。因此，如何进行更有效地开展新课程教学，成为老师们迫切认识的话题。本教学案例从学生的实际情况出发，根据现有的数学、英语基础，结合简单的生活实例，引导学生进行探索式学习，问题从简单的英语口语入手，过渡到课题的研究学习。原本枯燥无味的VB程序设计，在简单、形象的生活实例下，激发了学生的思考与探索思维。 【教材分析】 程序控制结构是中等职业学校计算机专业中必修模块之一，本模块旨在使学生进一步体验算法思想，了解算法和程序设计在解决问题过程中的地位和作用；能从简单问题出发，设计解决问题的算法，并能初步使用一种程序设计语言编制程序实现算法解决问题。 “选择结构”是高等教育出版社出版的中等职业学校计算机应用与软件技术专业教

学用书,程序控制结构中的选择结构是第四章第三节的内容,共分三课时,本课为第一课时.主要内容是用选择结构编写简单的程序。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上，理解了顺序结构的前提后提出的。 通过本课的学习，可以促进学生对问题解决方法和思想的理解与掌握，从而提升学生的问题解决能力，让学生在按照一定的流程解决问题的过程中，去体会和理解程序设计的思想，而且也为多分支选择结构的学习打下基础。 【学生分析】 高二的学生在数学课中已经有了算法和程序设计的基础，学生对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平，在教师的有效引导下，有能力进行自我探究，如果用一种学生比较感兴趣的，能够贴近学生日常生活的例子来分析选择结构的话，那么学生会比较感兴趣。 【教学目标分析】 通过教师引导学生去探究、发现技术背后所蕴含的技术价值和技术思想，使其获得知识与技能的同时，理解和掌握过程与方法、这样才能够学会认知，学会做事，乃至学会生活，提高终生学习的能力、分析解决问题的能力，满足其终身发展的需要，成为适应信息社会的公民。 因此本节课的目标有以下几项： 1、知识与技能：（1）掌握分支选择结构实现条件判断控制。 （2）能够运用分支选择结构设计编制程序解决问题。 （3）培养学生的逻辑思维能力，促进学生对问题解决方法的理解。 2、情感态度：通过趣味性教学，使同学们保持高涨的学习兴趣，在操作的同时获得成功的喜悦。 【教学重点难点】 教学重点：让学生学会使用VB语言的If分支语句，掌握分支判断程序结构，来解决实际问题，并且培养学生的探索、创新能力。 教学难点：对解决问题的方法和步骤的理解，并能根据实际问题写出程序代码。 教学关键点：利用学生已经掌握的数学知识，引导学生综合VB的三种程序结构，努力发挥学生的研究性学习能力，培养学生创造性思维和综合运用知识的能力。 【教学过程】

《VB程序设计》实验报告

台州学院 《VB程序设计》实验报告 实验1.1设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。Private Sub Command1_Click() Text1.Text = "欢迎使用VB！" End Sub Private Sub Command2_Click() Text1.Text = "" End Sub Private Sub Command3_Click() End End Sub 实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求： （1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不可用（图1-4）； （2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）； （3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示” Private Sub Command1_Click() Label1.Caption = "你好，张三！" Command1.Enabled = False End Sub Private Sub Command2_Click() Label1.Visible = False Command3.Enabled = True Command2.Enabled = False End Sub Private Sub Command3_Click() Label1.Visible = True Command2.Enabled = True Command3.Enabled = False End Sub 实验2.1 设计一个程序，运行时界面如图2-1所示。当单击“左”、 “右”、“上”、“下”按钮时，标签分别向左、右、上、下移动。 Private Sub Command1_Click() Label1.Left = Label1.Left - 100 End Sub Private Sub Command2_Click() Label1.Left = Label1.Left + 100 End Sub Private Sub Command3_Click() Label1.Top = Label1.Top - 100 End Sub Private Sub Command4_Click() Label1.Top = Label1.Top + 100 End Sub

VB程序设计考试题库 优质文档

优质文档VB程序设计考试题库——考试专用 1、题目：(事件)单击窗体(响应)用输入框输入一自然数，判断是"正数"、"负数或"零"，并根据输入的数用消息框显示"正数"、"负数”或"零"。 2、题目：(事件)单击窗体。(响应)求200~300之间既能被3整除又能被7整除的数。并求出所有数之和存入变量SUM中 3、题目：单击窗体。(响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100，结果输出在窗体上。 4、题目：(事件)单击窗体。(响应)在窗体上打印数列2/1,3/2,5/3,8/5,13/8…的前10项，并求其和，将和保存在变量s中。 5、题目：(事件)双击窗体。(响应)把一元钞票换成一分、二分和五分的硬币每种至少有一枚），求出其所有的换法，把结果输出在窗体上。将所有的换法的数目存入变量N中 6、题目：单击窗体。)求1!+2!+3!+4!+5!并将结果输出到窗体上。结果存入变量S中 7、题目：(事件)单击窗体。(响应)生成一个一维数组(10个数组元素依此为： ' 15、23、72、43、96、23、3、65、88、17 写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。将最大值，最小值，平均值分别存入变量Max,Min,Aver中 8、题目：(事件)单击窗体。(响应)在窗体上输出100~200之间的所有合数。求出所有数之和存入SUM中所谓合数是指自然数中能被1和本数整除以外,还能被其他数整除的数。 9、题目：(事件)单击窗体。(响应)求10~20之间所有素数的乘积并输出在窗体上。将结果存入变量L中。 10、题目：(事件)单击窗体。(响应)求1 - 1/2 + 1/3 - 1/4 + ……+ 1/99 - 1/100的值。将结果存入变量J中。 1题 n = InputBox("输入一个自然数") If n > 0 Then result = "正数" ElseIf n < 0 Then result = "负数" ElseIf n = 0 Then result = "零" End If MsgBox "输入的数据" & n & "为：" & result 2题 Dim i As Integer For i = 201 To 300 If ((i Mod 3) = 0) And ((i Mod 7) = 0) Then Print (CStr(i)) sum = sum + i End If Next Print sum 3题 Dim i As Integer

vb选择结构教案

卓资县职业中学实训学案 班级_____姓名_________科目： VB 程序设计主备：闫森审核：日期： 课题：选择结构程序设计实际应用（2） 实验目的： 1、掌握If语句的使用。 2、掌握Select Case语句的使用。 实验内容与过程 说第一步：独学（请同学们独立完成以下任务） 知识回顾： 1、单分支条件语句格式：①IF <表达式> THEN 语句块 End If ②IF <表达式> THEN 语句块 2、双分支条件语句格式： IF <表达式> THEN 语句块1 Else 语句块2 End If 任务1(基本设计题) 题目：一般网络游戏只允许成年人进入，你来编写一个根据 明 ： 本 节 课 只 完 成 任 务 1 和 任 务 2 的 题 目 要 求 及 问 年龄判断是否成年的小程序。（规定成年人年龄>18周岁） 请你根据题意，利用双分支条件语句格式2种方法（单行和 多行）编写程序代码，并上机测试。 设计界面如下： 编写程序代码：

题 。课后作业下次实训务必完成。第二步：合作（问题）探究（对学、群学） 任 务 2. （ 提 高 设 计 题） 在 “ 神州号”程序中，需要判断飞船飞行状况。当飞船速度继续 加大时，飞船将达到第二宇宙、第三宇宙速度（见下表）试 编写程序，输入不同的飞船速度V，判断它的各种飞行状况， 显示出来 飞船速度V 单位 （km/s） 飞行状况情况 程序界面如下： 补充程序代码： Private Sub command1_click() Dim V AS single, n AS integer V= VAL(InputBox(“SPEED=”,”输入速度”)) <=V< 1--Move around Earth飞船绕 地球做匀速圆周运动 1 11 19<=V< 2--Move around SUN飞船离开 地球的控制 ,围绕太阳转 2 V> 3--Break gravitate of solar 飞船挣脱太阳引力飞出太阳 系 3 其它警告出错信息0

VB程序设计实验报告

《VB程序设计》实验报告 专业：信息管理与信息系统 班级：1502班 学号： 姓名： 日期：2016年12月20日

一、实验题目：记事本程序的设计 二、实验目的 1、掌握菜单编辑器的使用方法。 2、掌握菜单事件的编程方法。 3、初步掌握多窗体程序设计方法。 三、实验内容与步骤 1、实验内容：设计一个记事本程序。 2、界面设计（贴出对象属性表和界面设计图）。 ①在窗体frmPad上添加一个文本框text1，并根据下表修改窗体及控件属性。 对象窗体属性设置 对象名属性值 FrmPad Caption “记事本” Text1 MultiLine True ScrollBars 2-Vertical Text 清空 ②使用菜单编辑器在窗体上建立菜单：选中窗体frmpad后，单击“工具”菜 单的“菜单编辑器”命令，弹出“菜单编辑器“对话框，如下图所示。 ③根据下表设置菜单。 菜单设置 菜单项标题菜单项名称快捷键其他属性编辑mnuEdit ···剪切mnuCut Ctrl+X ···复制mnuCopy Ctrl+C ···粘贴mnuPaste Ctrl+V

文本风格mnuStyle ···粗体（&B）mnuBold "复选"属性为True ···斜体（&I）mnuItalic "复选"属性为True 弹出菜单popMenu "可见"属性为True ···剪切popCut ···复制popCopy ···粘贴popPaste 设计好程序窗体如下图所示。 菜单编辑器

界面设计 3、编写程序代码。 Private Sub Form_Load() Text1.FontSize = 16 Text1.Text = "Visual Basic程序设计" mnuBold.Checked = False mnuItalic.Checked = False End Sub '剪切 Private Sub mnuCut_Click() Clipboard.Clear Clipboard.SetText Text1.SelText Text1.SelText = "" End Sub '复制

VB程序设计试题及答案一

V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 ……

VB程序设计试题及答案(一)

VB程序设计试题及答案（一） 一、单选题 1. 是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) =“欢迎使用VB” (B) ='欢迎使用VB' (C) =欢迎使用VB (D) ="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 … … Next x Next x

[整理]VB程序设计复习题及答案.

中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型

VB设计计算器实验报告

VB 设计计算器 实验报告 姓名: 专业: 学号: 二0 一一年十一月七日

设计功能完整的计算器，实现如下图所示按钮（除“ MC，“MR , “MS，“M+ ）及菜单功能，如图： 一、解题思路、分析： 对于我来说，设置一个完整的计算器是一个艰巨的任务，一开始想了一小段时间，自己试着编了一些，但就是无法达到一个完整的计算器，于是，就到网上去下载了一些有关计算 器的程序进行参考分析。首先先定义一些量，比如说前后两个操作数opl、op2，小数点是 否真存在的量DecimalFlag ，操作数个数NumOps上一次按键的类型等。接着对窗体进行初始化，同时设置所有变量为其初始。然后对各个键盘的命令进行编写程序，对0---9按键设 置为一个按键命令组，编写一个程序，同时加减乘除设置一个命令组，也编写一个程序，其 他按键都各自设置为一个命令，分别单独进行编写程序。同时在多个命令中都要对显示器中 的小数点进行分析，看它是否是真实存在。同时对于除法分母是否为0，也要加以考虑。 、源程序: Private Sub Form_Load() DecimalFlag = False NumOps = 0 LastI nput = "NONE" OpFlag ="" Text1.Text = Format(0, "0.") 'Decimal.Captio n = Format(0, ".") End Sub Opti on Explicit Dim Op1, Op2 Dim DecimalFlag As In teger Dim NumOps As In teger Dim LastInput 类型 Dim OpFlag Dim TempReadout ' 窗体的初始化过程 ' 设置所有变量为其初始值 前面输入的操作数 小数点仍然存在吗？ 操作数个数 指示上一次按键事件的 指示未完成的操作

《VB程序设计基础》模拟精彩试题

《VB程序设计》模拟试题 ●填空题 1.窗体模块的文件扩展名为 ___FRM_________ 、标准模块的文件扩展名为____BAS______ 、 类模块文件的扩展名为______CLS_______ 。 2.Visual Basic中数据类型可分为 _____标准数据类型________和用户自定义数据类型两大类，前者根据其取值的不同，可分为_____整型_________、 ______长整型_____、布尔型和 ____字符型_________。 3. Abs(-6.5)= _____6.5______；Int(-9.1)= ____-10_______。 4. "程序"& "设计"运算结果为 ___程序设计____ 。 5. Dim a, b as Boolean语句显式声明变量a是___变体___变量，b是___布尔__变量。 6. MsgBox函数的返回值中， VBRetry表示单击了____重试_____按钮，VBYes表示单击了___是_____按钮，VBNo表示单击了_____否____按钮。 7. 要加载窗体，可以在代码中使用___________语句，要显示窗体，可以在代码中使用___________方法，要隐藏窗体，可以在代码中使用Hide方法，要卸载窗体，可以在代码中使用___________方法。 8.对话框分为_________对话框和________对话框两种类型，其中_____________ 对话框最 常用。 9. 对象是Visual Basic应用程序的基本单元，它是由 ___类___创建的。在Visual Basic中可以用属性、 __方法___、___事件___ 来说明和衡量一个对象的特性。 10. 条件判断语句可以使用___If…then____________语句、 ____If…Then…Else______语句和 ______If…Then…ElseIf______语句。Select case 语句 11. 声明一个值为3.14的常量Pi的语句为___Const pi = 3.14______。 12. Do…Loop Until 循环结构中，当条件为____真____时结束循环。 13. 要显示弹出菜单，可以在代码中使用_____________事件。 14. 参数传递有__________方式、__________方式和命名传递方式，常量默认采用__________方式；变量默认采用__________方式；表达式默认采用__________方式。 15. 名称属性必须以一个__字母标点_开始并且最长可达40个字符,不能包括__符号___ 和 ___空格___。 16.Visual Basic的程序模块有3种：____窗体模块____ 、标准模块和 ____类模块____。 17.Visual Basic程序，按其语句代码执行的先后顺序，可以分为___顺序__结构、选择__结构和___循环____ 结构。 18.数组元素下标的下界默认为是_____________，如果要改变其默认值，应使用_____________。 ●判断题 （）1. Visual Basic运行程序的方法只有编译模式。 （）2. 语句Command1.visible=false 与Command1.enabled=false 是等价的。 （）3. InputBox函数和MsgBox函数一样，返回的是字符串。 （）4. 通过类模块，我们不可以根据需要建立自己的控件。 （×）5. 2.1E+5是合法的Visual Basic数据。 （）6. 根据占用内存方式的不同，可将数组分为常规数组和动态数组两种类型。 （√）7. x2是合法的变量名。 （）8. 按照文件的存取方式及其组成结构可以分为两种类型：文本文件和随机文件。