课题:分支结构教学时间:授课班级:教学目标:学会用if…else…endif语句编写简单的程序,并会调试它教学重点、难点:运算规则IF语句的用法Msbox()等函数的涵义及用法教学过程用前面介绍的语句已能编写出顺序执行的简单程序.
但在用计算机解决实际问题时,有时需要先对某个条件进行判断,然后根据判断的结果进行不同的操作.
例如:求三个数中的最小数,用流程图表示如图6-2,图中包含有两个判断框.
其中第一个判断框是根据给定的条件"ab、x"b"等都是合法的关系表达式.
关系运算符及其示例见表6-10.
表6-10关系运算符含义相当的数学符号关系表达式示例=等于=x=0>大于>x*y>x+y不等于≠X0>=大于等于≥x>=105(x=3,y=-2)其值为False如果是字符串,则按字符的ASCII码从左到右一一比较,即首先比较两个字符串的第一个字符,其ASCII码值大的字符串大,如果第一个字符相等,则比较第二个字符,依此类推,直至出现不同的字符为止.
如果两个字符串的长度相等,且每一个相应位置上字符都一样,就认为两个字符串相等.
如果两个字符串长度不相等,但一个字符串是另一个字符串的前部,则长度大的字符串大.
例如:"VB">"VISUALBASIC"其值为False"Basic"="Basic"其值为True"Windows">"Window"其值为True二、行If语句行If语句是指在一行中写完的If语句,它的一般格式为:格式一:If条件Then语句执行这种形式的If语句时,首先对条件进行判断.
若条件成立,则执行Then后面的语句;若条件不成立,则执行If语句后继程序行的语句.
格式二:If条件Then语句1Else语句2执行这种形式的语句时,先进行判断,若条件成立,则执行语句1;否则执行语句2.
【例6-5-1】输入三个不相同的数,求出其中最小数.
算法设计见第一节,流程图如图6-2,程序代码如下:'求三个数中的最小数PrivateSubForm_Click()DimaAsSingle,bAsSingle,cAsSingleDimminAsSinglea=InputBox("输入a","输入框")b=InputBox("输入b","输入框")c=InputBox("输入c","输入框")Ifab(已知a=3,b=4)②x+1>=10(已知x=7)③i0Theny=1Elsey=0End⑶写出下列程序的执行结果.
PrivateSubForm_Click()DimxAsSingleLetx=38Ifx50"EndIfEndIfEndSub⑷从键盘输入三个数,输出其中绝对值最大的数,画出流程图.
⑸设C盘\BMP目录下有15个BMP格式图像文件:XXX01.
BMP、XXX02.
BMP、XXX03.
BMP、……、XXX15.
BMP.
设计一个界面如图6-24所示的看图程序,图的正中为图形框,单击"上图""下图"钮显示上幅、下幅图像.
要求写出完成该程序所要绘制的控件及需要重新设置的属性,并编写程序.
关于半月湾HMBCloud商家之前也有几篇那文章介绍过这个商家的产品,对于他们家的其他产品我都没有多加留意,而是对他们家的DC5机房很多人还是比较喜欢的,这个比我们有些比较熟悉的某商家DC6 DC9机房限时,而且半月湾HMBCloud商家是相对便宜的。关于半月湾DC5机房的方案选择和介绍:1、半月湾三网洛杉矶DC5 CN2 GIA同款DC6 DC9 1G内存 1TB流量 月$4.992、亲测选择半...
第一、香港服务器机房这里我们可以看到有提供四个大带宽方案,是全向带宽和国际带宽,前者适合除了中国大陆地区的全网地区用户可以用,后者国际带宽适合欧美地区业务。如果我们是需要大陆地区速度CN2优化的,那就需要选择常规的优化带宽方案,参考这里。CPU内存硬盘带宽流量价格选择E3-12308GB240GB SSD50M全向带宽不限999元/月方案选择E3-12308GB240GB SSD100M国际带宽不...
关于HostDare服务商在之前的文章中有介绍过几次,算是比较老牌的服务商,但是商家背景财力不是特别雄厚,算是比较小众的个人服务商。目前主流提供CKVM和QKVM套餐。前者是电信CN2 GIA,不过库存储备也不是很足,这不九月份发布新的补货库存活动,有提供九折优惠CN2 GIA,以及六五折优惠QKVM普通线路方案。这次活动截止到9月30日,不清楚商家这次库存补货多少。比如 QKVM基础的五个方案都...