VB实验三选择结构程序设计(伟奇)

VB实验三选择结构程序设计(伟奇)
VB实验三选择结构程序设计(伟奇)

实验报告

学院:专业:年级:

姓名:学号:实验室号:_______ 计算机号:

实验日期:年月日指导教师签字:成绩:

报告退发(订正、重做)

实验三、选择结构程序设计

一、实验目的

1、掌握If语句的使用。

2、掌握Select Case语句的使用及其与If语句的区别。

二、实验内容

1、请编一程序(程序界面如图3-1),用于根据输入的学生成绩查询对应的奖励情况,条件如下:三门总分不低于270分(含270),特等奖;三门总分240分(含240分)~270分(不含270分),优秀奖;总分低于240分,但某一单科成绩不低于95分,特别奖。

(a)(b)

图3-1

2、对任意输入的三个数按从小到大的顺序显示出来,运行结果参考图3-2。要求:程序中不得使用循环结构和转向语句;掌握两个数交换的方法。

图3-2

3、简单计算器的实现(界面参考图3-3a)。要求:使用Select Case语句和If语句;能进行+、-、*、/、\和Mod六种运算;有基本的数据合法性和运算符合法性检验报错能力(如图3-3b和图3-3c)。

(a)

(b)

(c)

图3-3

三、实验环境

硬件:PC 机

软件:Windows 操作系统;V isual Basic 6.0

四、实验步骤

1、(题目要求见内容部分,略) A 、界面设计: 1) 布局设计:按下图布局在主窗体Form1上放置三个标签(Label1、Label2和Label3),

四个文本框(Text1、Text2和Text3)和一个命令按钮(Command1)。

2) 按下表设置各对象属性。

3) 双击Command1,打开代码窗口编写代码。 B 、代码设计:

Private Sub Command1_Click()

' 变量声明:四个整型变量,分别存放三科成绩和总成绩。

Dim intScore1 As Integer, intScore2 As Integer, intScore3 As Integer

Dim intSum As Integer

' 接受输入,将三个文本框中的成绩分别转换成数值型数据,存入对应的变量中。

intScore1 = CInt (Text1.Text)

intScore2 = CInt (Text2.Text)

intScore3 = CInt (Text3.Text)

intSum = intScore1 + intScore2 + intScore3

' 输出总分

Label3.Caption = intSum

' 开始判断:总分>= 270吗?是,则用MsgBox弹出“获得特等奖”的通知。

If intSum >= 270 Then

MsgBox "您获得了特等奖!", , "获奖通知"

' 否则,继续判断:总分>=240吗?是,则通知“获得优秀奖”。

ElseIf intSum >= 240 Then

MsgBox "您获得了优秀奖。", , "获奖通知"

' 不是,继续判断:存在任意单科成绩>=95吗?是,则通知“获得特别奖”。

ElseIf (intScore1 >= 95) Or (intScore2 >= 95) Or (intScore3 >= 95) Then

MsgBox "您获得了特别奖。", , "获奖通知"

Else

MsgBox "您未获奖。", , "获奖通知"

End if

' 鼓励归并的获奖通知输出*。

End Sub

2、(题略)

A、界面设计:

1)按下图布局在主窗体frmSort上画出各所需控件。

2)属性设置(列表):

B、代码设计:

Private Sub cmdSort_Click()

' 声明3个整型变量,分别存放最小值、中间值和最大值。

Dim intMin%, intMid%, intMax

' 声明1个整形临时变量,用于交换过程。

Dim intTemp%

' 接受输入,未比较前不妨假定X

intMin = CInt (txtX.Text)

intMid = CInt (txtY.Text)

intMax = CInt(txtZ.Text)

' 比较前两个数,小的放入intMin,大的放入intMid。

If intMin > intMid then

' intMin中的数比intMid中的还大,开始交换。

intTemp = intMin

intMin = intMid

intMid = intTemp

End If

' intMid中已是前两数中较大者,与第三个数比较,确定大者(最大数)后放入intMax。

If intMid > intMax then

intTemp = intMid

intMid = intMax

intMax = intTemp

End If

' 现在intMin和intMid中的数都比intMax中的小,但哪个更小?还需再次比较。

If intMin > intMid Then

intTemp = intMin

intMin = intMid

intMid = intTemp

End If

' 比较结束,输出

txtMin.Text = CStr (intMin)

txtMid.Text = CStr (intMid)

txtMax.Text = CStr (intMax)

' 引导学生考虑更通用的代码:直接以字符串形式排序,并考虑更多个数的排序。

' 为下章的循环排序做铺垫性思考。

End Sub

3、(题略)

A、界面设计:

1)布局设计(作图):

2)

B、代码设计:

Private Sub cmdCalc_Click()

' 变量声明

Dim intOp1%, intOp2%, sngResult! ' 整数1,整数2和单精度结果

Dim strOpr$ ' 运算符

' 接受输入

intOp1 = CInt(txtOp1.Text)

intOp2 = CInt(txtOp2.Text)

strOpr = txtOpr.Text

Select Case strOpr ' 针对不同运算符选择不同的情况分支Case "+"

sngResult = intOp1 + intOp2

Case "-"

sngResult = intOp1 - intOp2

Case "*"

sngResult = intOp1 * intOp2

Case "/"

If intOp2 = 0 Then

MsgBox "分母为零,请重新输入。", vbCritical + vbOKOnly, "出错"

Else

sngResult = intOp1 / intOp2

End If

Case "\"

If intOp2 = 0 Then

MsgBox "分母为零,请重新输入。", vbCritical + vbOKOnly, "出错"

Else

sngResult = intOp1 / intOp2

End If

Case "MOD"

If intOp2 = 0 Then

MsgBox "分母为零,请重新输入。", vbCritical + vbOKOnly, "出错"

Else

sngResult = intOp1 / intOp2

End If

Case Else

MsgBox "无法识别的运算符,请重新输入。", vbCritical + vbOKOnly, "出错"

End Select

' 输出结果

txtResult.Text = CStr(sngResult)

End Sub

Private Sub cmdEnd_Click()

End

End Sub

五、实验调试与结果分析

(描述实验的调试过程,实验中发生的现象、中间结果、最终得到的结果,并进行分析说明,分析可能的误差或错误原因等)

六、总结

(说明实验过程中遇到的问题及解决办法;新发现或个人的收获;未解决/需进一步研讨的问题或建议新实验方法等)

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程序设计,在简单、形象的生活实例下,激发了学生的思考与探索思维。这样的教学案例,值得我们反思研究、总结与完善。 【教材分析】 算法与程序设计是普通高中信息技术课程中选修模块之一,本模块旨在使学生进一步体验算法思想,了解算法和程序设计在解决问题过程中的地位和作用;能从简单问题出发,设计解决问题的算法,并能初步使用一种程序设计语言编制程序实现算法解决问题。 “选择结构”是教育科学出版社出版的高级中学课程标准实验教科书、算法与程序设计第二章第三节的内容,共分三课时,本课为第二课时。主要内容是用选择结构编写简单的程序解决具体问题。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上,理解了顺序结构的前提后提出的。 通过本课的学习,可以促进学生对问题解决方法和思想的理解与掌握,从而提升学生的问题解决能力,让学生在按照一定的流程解决问题的过程中,去体会和理解程序设计的思想,而且也为多分支选择结构的学习打下基础。 【学生分析】 高一的学生在数学课中已经有了算法和程序设计的基础,学生对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平,在教师的有效引导下,有能力进行自我探究,如果用一种学生比较感兴趣的,能够贴近学生日常生活的例子来分析选择结构的话,那么学生会比较感兴趣。 【教学目标分析】 通过教师引导学生去探究、发现技术背后所蕴含的技术价值和技术思想,使其获得知识与技能的同时,理解和掌握过程与方法,这样才能够学会认知,学会做事,乃至学会生活,提高终生学习的能力、分析解决问题的能力,满足其终身发展的需要,成为适应信息社会的公民。 因此本节课的目标有以下几项:

心得体会数据库VB课程设计心得体会

三一文库(https://www.360docs.net/doc/c35819196.html,)/心得体会范文/心得体会数据库VB课程设计心得体会 数据库课程设计大赛的尘嚣渐渐远去,怀着对这次大赛的些许不舍,怀着对当初课程设计开始时候的豪情万丈的决心的留恋,怀着通过这次课程设计积累的信心与斗志,我开始写这篇*,为自己的足迹留下哪怕是微不足道但是对自己弥足珍贵的痕迹 并期望与大家共勉。 首先,让我的记忆追溯到大二暑假,在老大的指引下(老大劝我学https://www.360docs.net/doc/c35819196.html,),我接触到microsoft公司的.net产品。那个时候我已经学过vc和asp,因为windows程序设计实验的课的关系,接触过vb,但是没有专门去学他,因为习惯了c++里面的class,int,觉得vb的sub,var看着就不是很顺心。我是一个好奇心很强的人,突然看到了一个号称“.net是用于创建下一代应用程序的理想而又现实的开发工具”,而且主推c#语言,由于对c语言的一贯好感,我几乎是立刻对他产生了兴趣。我就开始了对c#的学习,任何语言都不是孤立存在的,所以数据交互是很重要的,暑假的时候我把我们这学期的课本数据库系统概论看了一遍。我记得以前用c语言编程的时候,数据是在内存中申请空间,譬如

使用数组等等。很耗费内存空间。这个时候就是数据库站出来的时候啦,于是我又装上了sqlserverxx,以前学asp的时候用的是access,那个时候只是照着人家做,理论是什么也不是很清楚。 通过一个暑假的学习,基本搞清楚了理论方面的东西,具体怎么用也不是很清楚。但是这为这学期的课程设计打下了铺垫。 来到学校后,随着这学期的数据库课程大赛开始了,我有一个看法就是我自己应该具备的能力不是我会多少,而是我应该具备快速学会东西的能力。遇到什么就学什么。我们有时候很容易被一些专业名词说吓着,包括什么建模,软件工程,数据分析,数据挖掘等等。我身边就有很多同学被这些纸老虎所唬住,而没有勇气去接触他们,总是说这个太难了之类的退堂鼓的话,他们低估了自己的潜力同时也压抑住了他们自己的好奇心。其实都是纸老虎,又不是什么国家科研难题,只是去用一些工具,发明工具是很难,但是用一个工具就容易多了,justdoit!我记得我做这个数据库之前,我们老师说要做好前期分析,我就在网上搜索用什么分析工具好。最后我选择了roseuml建模工具。在此之前,我脑袋里面没有软件建模的思想,什么uml建模对我而言就是一张空白的纸。但是真正接触后并没有想象的那么难,有什么不懂的上网去搜索,这是一个信息横流的世界,有google,baidu就没有不能解决的知识难题。以及后来的数据库分析的时候用到的powerdesigner也是一样。

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选择结构程序设计】选择结构程序设计

【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

选择结构程序设计题

选择结构程序设计 一、实验目的 1.熟练掌握关系表达式和逻辑表达式的使用。 2.熟练掌握嵌套的if语句和switch语句实现多分支结构程序设计。 3.掌握选择结构程序设计的方法。 4.继续熟悉跟踪调试程序的方法和过程。 二、实验内容及步骤 1.分析程序并上机运行验证结果。 #include void main() { int a,b,t; printf("请输入a,b的值:"); scanf("%d,%d",&a,&b); if(a>3,2 3,2>>3,2 } 思考: 从输入数据和运行结果分析程序的功能。 将“{t=a;a=b;b=t;}”改为“t=a,a=b,b=t;”,程序的功能改变了吗?为什么?一样的 将“if(a void main() { int a,b; printf("请输入a,b的值:"); scanf("%d,%d",&a,&b); if (b) printf("a/b=%d \n",a/b); //在确保b非零的情况下执行a/b运算 else printf("ERROR:Cannot divide by zero!\n"); } 提示: 程序的功能是实现两个整数相除。程序设计时应避免被零除的错误,所以“if(b)printf("a/b=%d \n",a/b);”就是在确保b非零的情况下执行a/b运算。 if(b)也可以写作if(b!=0)。 3.阅读、分析程序,记录结果,并上机运行验证结果。 #include void main() {

VB程序设计教程(第3版)课后实验答案最新版2

1、完成实验A(P.259)中的第1、 2、 3、5题。 2、参照第2章例2.6,建立一个类似记事本的应用程序,提供:(1) 剪切、复制和粘贴的编辑操作;(2) 字体大小的格式设置;此外,再对记事本的应用程序的功能进行一点扩允。 1.完成在实验B 顺序结构程序。(P.262)中的第1、2 、4 、5.、6题 2.完成实验C 选择结构(P.266)中的第1、2、4、5题 3.用上面实验B的第二题和实验C的第二题完成下面的实验报告。 1、完成实验D循环结构(P.268)中的第1、3、4、6题,其中第1题利用单循环结构显示如图D.1(P.268)所示的界面,而后将图形改为倒三角形。 2、选做实验E数组(P.271)中的第1、2、3题中的任意二题 3、以实验D中的第4题和实验E中的做完的某一题完成下面的实验报告。 A.1 Private Sub Command1_Click() Label3 = Text1 End Sub A.2 Private Sub Form_Load() Timer1.Interval = 0 End Sub Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub Private Sub Timer1_Timer() Call MyMove End Sub Sub MyMove() Label1.Move Label1.Left - 50 If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub A.3 Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub Private Sub Form_Load() Text1 = 0 End Sub A.5

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选择结构程序设计教学案例

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

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

实验4选择结构程序设计

实验4 选择结构程序设计 一、实验目的 1.掌握C语言中逻辑量的表示和使用方法。 2.掌握if语句及switch语句的使用。 3.熟悉各种表达式作为if语句及switch语句的条件。 4.了解Turbo C程序的基本调试方法。 二、实验内容 1.验证性实验 (1)分析程序的运行结果。 ①运行下列程序,输入1-7之间的任意数字,观察程序的运行结果。 #include void main() { int week; printf("Input(1-7):"); scanf("%d",&week); switch(week) { case 1:printf("Mon.\n"); break; case 2:printf("Tue.\n"); break; case 3:printf("Wed.\n"); break; case 4:printf("Tur.\n"); break; case 5:printf("Fri.\n"); break; case 6:printf("Sat.\n"); break; case 7:printf("Sun.\n"); break; default:printf("The input is wrong!\n"); } } ②运行5次下列程序,输入的数据分别是1,2,3,4,5,请观察每次的运行结果,并根据结果分析原因。 #include void main() { int n,a=0,b=0,c=0,d=0,k=0; scanf("%d",&n); switch(n) { case 1:b++;break; case 2:c++; case 3:d++;break; case 4:k++; default:a++; } printf("%d,%d,%d,%d",a,b,c,d,n); } (2)输入x的不同值,以下程序将求一给定“y=f(x)”函数的值。

VB学习心得体会

vb学习的心得体会 ————刘师桐 这学期选修了vb这门学科,想从学习中对计算机有更深刻的认知,也对我大学中的2级 考试奠定基础。那么谈谈这学期的学习中对vb的认知与心得体会。 vb全称为visual basic,就是微软公司推出的可视化编程工具msdn之一,就是目前 世界上使用最广泛的程序开发工具。vb提供的就是可视化的开发环境,我们可以象搭积木一样构建出程序的界面,而且vb提供了丰富的控件组,省去了我们自己写代码实现这些效果的麻烦,这样我们就能把更多的精力放在程序功能的实现上,所以vb学起来简单,用起来方便。因此, 我学了vb,并有了如下收获: 1.富业余生活。业余时间到处游手好闲的身影不见了,没事我肯定一动不动的坐在电 脑面前摆弄vb。就是啊,想想以前,真就是一无就是处,一会找人砍大山,一会找人 打游戏,一会就傻傻的坐在小板登上两眼无光,似就是厌倦了红尘。现在生活有了寄 托,就是vb给了我无穷的快乐,让我乐此不疲。 2、多了一门技术。vb就是一门计算机编程语言,也算就是一项知识含量较高的东西。采用的就是可视化程序设计。学习的这段时间,我明白了万事开头难,刚刚开始,遇到些困难没关系,慢慢来。编程就是一个不断学习,不断积累的过程,编程的乐趣也正就是存在于学习的过程中。我们每学一点,就赶快把它用到实际的程序中去,自己多学 多用多实践,水平才能不断提高,这就就是“学以致用”。多瞧多练就是我独门绝技,一般人我不告诉她:多瞧------别人的代码,即使瞧不懂也没关系,可以把这些代码输入到机子里 运行,然后根据运行结果去体会程序的思路与用途。 3、锻炼意志。编程可不就是一项轻松的活,尤其就是一个人开发制作软件时,那工作量 就多了。没有一定的坐功、细心程度及耐性那就是绝对做不到的。有时,把程序做完了需要调试运行,但就是就就是不能达到自已设计的效果与目的,那您得戴上放大镜找啊找啊,也许就就是因为一个符号或一个字母,您就得花上个几个小时,半天,甚至更长。越就是这样越不要灰心,应该放松心态,一点一滴的去查。只要有一颗永不退缩的心,我相信您一定能找到问题所在,最后一定能见到您开心的笑容,也一定能找到成功者的感觉。 通过这个学期的学习,对了vb这种高级语言有了初步的认知,对一些小的程序有了初步 的设计方案,能根据要求设计出想要的程序,锻炼了自己的创造性思维,就是培养逻辑思维的好方法,同时我经常瞧同学设计好的程序代码,包括教材上的例题程序,然后想想别人为什么这么计就能达到效果,我的设计能不能完成更多的功能,这样优秀了自己,帮助了自己,提高了自身 水平,同样,也欣赏了别人,对别人就是赞美,对自己就是帮助,总而言之,这学期的vb课程让 我收获了很多,我对下学期的计算机2级考试很有信心!!!篇二:vb学习心得体会vb学习心得体会 这学期选修了vb这门学科,想从学习中对计算机有更深刻的认知,也对我大学中的2级 考试奠定基础。那么谈谈这学期的学习中对vb的认知与心体会。 通过学习vb我基本学会了编辑一些小程序,掌握了一些基本的知识,得到了以下一些收获: 1.富业余生活。曾经业余时间到处游手好闲的身影不见 了,以前没事我肯定一动不动的坐在电脑面前摆弄电脑。就是啊,想想以前,真就是一无 就是处,一会找人砍大山,一会找人打游戏,一会就傻傻的坐在小板登上两眼无光,似就是厌倦 了红尘。现在有了vb,它给了我无穷的快乐,让我乐此不疲。 2、多了一门技术。vb就是一门计算机编程语言,也算就是一 项知识含量较高的东西。采用的就是可视化程序设计。学习的这段时间,我明白了万事开头难,刚刚开始,遇到些困难没关系,慢慢来。我们每学一点,就赶快把它用到实际的程序中去,自己多学多用多实践,水平才能不断提高,这就就是“学以致用”。只有这样我才呢学有所成 3、锻炼意志。编程可不就是一项轻松的活,尤其就是一个人

选择结构程序设计

第四章择路而行---选择结构程序设计 第一节路口诀择----条件语句 一、教学目标 1、掌握选择结构程序中常用的Qbasic语句。 2、掌握选择结构程序设计方法。 3、能利用选择结构程序设计解决简单的实际问题。 二、教学重点: 1.选择结构的语句及功能 2.选择结构中程序设计方法。 三、教学方法:讲授法,对比法,分组讨论法。 四、教学时间:2课时 五、教学教程: (一)引入新课:前面我们学习了顺序结构程序设计,利用顺序结构只能设计一些较简单的程序,如果要处理复杂的问题,就需要采用另外两种基本结构:选择结构和循环结构。选择结构,是一种常用的主要基本结构,是计算机科学用来描述自然界和社会生活中分支现象的重要手段。其特性是:无论分支多寡,必择其一;纵然分支众多,仅选其一。 (二)讲述新课 l 单行条件选择语句IF 1、单行结构条件语句IF…THEN…ELSE 格式:IF <条件> THEN <语句1> [ELSE <语句2>] 功能:最简单的条件选择语句,用来进行条件判断,使语句有条件的执行。 说明: 1)当<条件>为真(非零数)时,则执行<语句1>。 2)ELSE语句可以省略。 3)当<条件>为假(零)时,而且语句中有ELSE语句则执行<语句2>。 4)IF、THEN、ELSE必须在同一行上。 2、示例A、输入x的值,计算y的值。 REM 程序名为:eg1.bas INPUT “请输入x的值:”,x IF x>=0 THEN Y=1+X ELSE Y=1-2*X PRINT "Y=";Y END 例:求一元二次方程Ax2+Bx+C=0(A<>0)的实数根。 分析:写写出程序的流程图,参考流程图来写程序。 程序清单如下: INPUT A,B,C D=B*B-4*A*C IF D<0 THEN then X1=(-B+SQR(D))/(2*A) X2=(-B-SQR(D))/(2*A) PRINT “X1=”;X1, “X2=”;X2 ELSE PRINT “此方程无实根” END

《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 程序设计主备:闫森审核:日期: 课题:选择结构程序设计实际应用(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

c语言第4章 选择结构程序设计习题答案

第4章选择结构程序设计 习题(P111) 4.2 C语言中如何表示“真”和“假”?系统如何判断一个量的“真”和“假”? 答:C语言中用1表示真,0表示假;系统按照“非0为真,0为假”判断一个逻辑量的真假。 4.3 写出下面各逻辑表达式的值。设a=3,b=4,c=5。 (1)a+b>c&&b==c (2)a||b+c&&b-c (3)!(a>b)&&!c||1 (4)!(x=a)&&(y=b)&&0 (5)!(a+b)+c-1&&b+c/2 解:该题在求解过程中注意: 一、优先级。逻辑运算符(&&和||)低于算术运算符和关系运算符而高于赋值运算符,在逻辑运算符中,逻辑非最高,逻辑与其次,逻辑或最低; 二、逻辑表达式的求值规则。(P94) 所以得以上表达式的值分别为:(1)0 (2)1 (3)1 (4)0 (5)1 4.4有3个整数a、b、c,由键盘输入,输出其中最大的数。 分析:这是一个规模较小的求最值的算法,习题1.6用函数的方法实现。该题不用函数调用实现,但方法是最值,再依次和第二、第三个数比较得结果。其中都要用到单分支或双分支选择结构语句。 参考程序如下: main() { int a,b,c,max; /*定义4个整型变量,其中a,b,c存原始数据,max存最值*/ printf("\ninput the value of a,b,c:"); /*提示输入*/ scanf("%d%d%d",&a,&b,&c); /*格式符之间无分隔符,输入时可以以空格、回车、跳格分隔*/ if(a>b) max=a; else max=b; if(max

vb课程设计心得体会范文

vb课程设计心得体会范文 vb课程设计心得体会范文 vb课程设计心得体会范文1 经过近一个月的设计与制作,我们组的《20xx世界杯观战指南》终于完成了,现将过程中遇到的问题、获得的体会记录如下。 这次数据库课程设计中我主要负责用户登录、注册及数据库维护方面的设计。 1.Delphi是一款功能很强大的软件,其控件之多超出了我的想象,因此在运用时要借助很多资料。要学会查找和利用现有资料来解决问题 2.在设计中用到了很多SQL语句,因此对SQL及程序语句地掌握也是必不可少的。 3.后期的软件制作都是以前期的工作为基础的,因此在前期的需求分析及数据库设计阶段要认真、细致。 4.我们是三个人的小组,在设计过程要互相协调,合作。这样才能充分发挥每个人的作用。 vb课程设计心得体会范文2 首先了解到VB的特点,VB是在原来的Basic语言基础上发展而来的。Visual指的是可视的图形用户界面开发方法。不需编写大量代码去描述界面元素的外观和位置,只要把预先建立的对象添加到屏

幕上的某点即可。如果使用者诸多PAINT之类的绘图程序,则实际上已经掌握了创建用户界面的必要技巧。 BASIC指的是B语言,一种在计算机技术发展历史上应用得最为广泛的语言之一。VB在原来BASIC语言的基础上进一步发展至今包含了数百条语句,函数及关键词,其中很多和WINDOWS GUI有直接关系,VB不仅是可视语言,而且是面向对象的编程语言。其特点是概念多,实践性强,涉及面广。 之后,了解到一些基本的概念,含义。例如类,就是创建对象实例的模板包含了创建的属性描述和行为特征的定义。而此中的对象又是类的一个实例,继承了类的属性,方法,而VB中长用的对象有窗体,控件等。但我们在建立之前必须清楚对象的三要素:属性,方法和事件。而建立程序的步骤大致可分为: (1)启动程序,装载和显示窗体。 (2)窗体等待事件的发生。 (3)事件发生时,执行对应的事件发生过程。 (4)再重复(2)(3)的过程(5)最后直接遇到“END”结束语句结束程序的运行或按“结束”强行停止程序的运行。 再用VB创建一个应用程序,第一步骤是创建窗体,它是用户与应用程序进行交互操作的可视部分,窗体是创建界面的基本构造模块,也是创建应用程序所使用的对象。而后必要设置窗体的属性,从而构出窗体的外观,设置好的窗体,窗体就作为对象,能够对其定义的事件作出响应,这也是所谓的窗体事件,而窗体事件又包括窗体本

实验四-答案--选择结构程序设计讲课讲稿

实验四-答案--选择结构程序设计

实验四选择结构程序设计答案 实验时间:年月日【实验步骤】 一、程序调试练习 1、写出下列程序的运行结果: (1)ex4_1.c #include void main() { char ch; printf("input a character:"); ch=getchar(); if(ch>='A' && ch<='Z') ch=ch+32; printf("%c\n",ch); } 具体要求: ①从键盘上输入a,分析程序运行的结果。 ②从键盘上输入A,分析程序运行的结果。 ③从键盘上输入5,分析程序运行的结果。 程序运行结果: ①a ②a ③5 (2)ex4_2.c #include void main() { int x,y,z; printf("input x,y,z"); scanf("%d,%d,%d",&x,&y,&z); if(x

①从键盘上给x、y、z分别输入2,-1,2,分析程序运行的结果。 ②从键盘上给x、y、z分别输入3,5,2,分析程序运行的结果。 ③从键盘上给x、y、z分别输入-5,-3,2,分析程序运行的结果。 程序运行结果: ①z=2 ②z=3 ③z=0 (3)ex4_3.c #include main() { int x=1,a=0,b=0; switch(x) { case 0:b++; case 1:a++; case 2:a++;b++; } printf("a=%d,b=%d\n",a,b); } 程序运行结果: a=2,b=1 (4)ex4_4.c #include void main() { int x=1,y=0,a=0,b=0; switch(x) { case 1: switch(y) { case 0: a++; break; case 1: b++; break; } case 2: a++; b++; break; case 3: a++; b++;

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 '复制

选择结构程序设计练习题

选择结构程序设计练习题 1.逻辑运算符两侧运算对象的数据类型( ) A.只能是0和1 B.只能是0或非0正数 C.只能是整型或字符型数据 D.可以是任何类型的数据 2.下列运算符中优先级最高的是( ) A.< B.+ C.&& D.!= 3.能正确表示“当x的取值在[1,10]和[200,210]范围内为真,否则为假"的表达式是( ) A.(x>=1)&&(x<=10)&&(x>=200)&&(x<=210) B.(x>=1)||(x<=10)||(x>=200)||(x<=210) C.(x>=1)&&(x<=10)||(x>=200)&&(x<=210) D.(x>=1)||(x<=10)&&(x>=200)||(x<=210)

4.表示图中坐标轴上阴影部分的正确表达式是( ) A.(x<=a)&&(x>=b)&&(x<=c) B.(x<=a)||(b<=x<=c) C.(x<=a)||(x>=b)&&(x<=c) D.(x<=a)&&(b<=x<=c 5.判断char型量ch是否为大写字母的正确表达式是() A.‘A’<=ch<=‘Z’ B.(ch>=‘A’)&(ch<=‘Z’) C.(ch>=‘A’)&&(ch<=‘Z’) D.(‘A’<=ch)AND(‘Z’>=ch) 6.设x,y,z都是int型变量,且x=3,y=4,z=5,则下面表达式中值为0的是 () A.‘x’&&‘y’ B.x<=y C.x||y+z&&!y D.!(x

7.已知x=43,ch=‘A’,y=0;则表达式(x>=y&&ch<‘B’&&!y)的值是() A.0 B.语法错误 C.1 D.“假” 8.若希望当A的值为奇数时,表达式的值为“真”,A的值为偶数时,表达式的值为“假”,则以下不能满足要求的表达式是() A.A%2==1 B.!(A%2==0) C.!(A%2) D.A%2 9.设有:int a=1,b=2,c=3,d=4,m=2,n=2;执行(m=a>b)&&(n=c>d)后的值为() A.1 B.2 C.3 D.4 10.下列运算符中优先级最低的是( )优先级最高的是( ) A.? B.&& C.+ D.!=

相关文档
最新文档