VB程序设计讲课6章.pptVIP

VB程序设计讲课提纲 Visual Basic6.0 程序设计 浙江大学理学院 讲课人：朱静芬 Email:zjfzju@zju.edu.cn 主要内容(选择结构程序设计) If条件语句 Select Case 条件函数 选择结构又称条件结构： 根据某个具体的条件的分析、比较和判断，决定完成相应的操作； 使用If语句来实现； 包括单行结构条件语句和块结构条件语句 要求重点掌握If语句的含义与结构； If条件语句 单分支条件结构（If...Then语句） 双分支结构（If...Then...Else语句） 多分支结构（If…Then…ElseIf语句） If语句的嵌套 1．单分支条件结构（If...Then语句） 执行过程：首先计算条件表达式的值，如果结果为True，则执行语句块1，否则，执行语句块2。 示例: 编写一个程序， 当我们单点鼠标左键，屏幕上显示“欢迎使用VISUAL BASIC!”，当第1次单击鼠标左键，以黑体显 示；第2次单击鼠标左键，以宋体显示；第3次单击鼠标左键，以隶书显示；第4次 则清屏并还原成初始状态(nFlag=1)。 (多分支选择结构.vbp) 示例: 输入任一点的坐标（X，Y），判断该点位于哪个象限。 在平面直角坐标系中，点所在的象限有以下4种情况： X0 ，Y0 点位于第一象限内 X0， Y0 点位于第四象限内 X0， Y0 点位于第二象限内 X0， Y0 点位于第三象限内 X=0或Y=0 位于原点，给出提示“该点不在任何象限内”。 (判断象限.vbp) 示例: 键盘输入计算机、英语、专业课成绩，求平均成绩。平均成绩大于等于90时，显示优秀，大于等于60时，显示合格，否则显示不合格。(02-06-01-01.vbp) 键盘输入三个整数到变量nA、nB、nC，将三个整数从小到大给予输出。 (02-06-01-02.vbp) 求解一元二次方程：aX·X＋bX＋c＝0。其中a、b、c由键盘输入。(改进一元二次方程.vbp) 示例: P168 例7.2 单击窗体，分别轮流以楷体、宋体、隶书显示欢迎!两字。并在隶书显示后，再单击窗体将清除窗体文字。（02-06-02-01。vbp） 键盘输入计算机文化课的成绩，显示评定成绩。 成绩为180 - 200，则显示：优； 成绩为160 - 179，则显示：良； 成绩为140 - 159，则显示：中； 成绩为120 - 139，则显示：及格； 成绩为120以下，则显示：不及格。 （02-06-02-02.vbp） 生肖.vbp 条件函数 IIf 函数 应用举例 猜数游戏。由计算机任意设置一个1~100之间的整数，然后让用户猜出这个数是多少。 说明： 为了引导用户猜中由计算机设置的随机数，可以在猜数的过程中给以适当的提示。即在每次猜完之后，计算机显示相应的提示信息，用户可以根据这些信息继续猜，逐步接近要猜的数，直至猜中。当用户猜的数与目标数之间相差不超过2时，提示“接近了”；相差不超过10时，提示“有些远”；相差超过10时，提示“太远了”。 猜数游戏.vbp 编程计算某年某月某日是星期几 该程序大致可分为三部分： （1）输入部分：输入年、月、日，可通过InputBox函数来实现。 （2）计算部分：用来完成对输入的日期是星期几的计算，因此它是本题的关键。在这一部分应解决以下几个问题： ①判断平年、闰年。 凡是能被4 整除但不能被100整除的年份为闰年，如1980年。 凡是能被400整除的年份为闰年，如2000年。 除以上两种情况以外的其余年份都是平年。 ②计算总天数。 总天数的计算公式为：总天数=平年累积值+闰年累积值+月累积值+日期 ③计算星期几。查阅有关资料可知，1899年12月31日是星期日，因此可把week的值定为1；week的初值加上总天数并对7取模，所得的余数即为星期几。 （3）输出部分：把计算结果以适当的格式输出。 计算某年某月某日是星期几.vbp * * 用 If...Then 结构有条件地执行一个或多个语句。单行语法和多行块语法都可以使用： （1）If 表达式 Then 语句块 （2）If 表达式 Then 语句块 End If 下面两个例子等价： （1）If todayDate Now Then todayDate = Now （2）If todayDate Now Then todayDate = Now