课题:分支结构教学时间:授课班级:教学目标:学会用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所示的看图程序,图的正中为图形框,单击"上图""下图"钮显示上幅、下幅图像.
要求写出完成该程序所要绘制的控件及需要重新设置的属性,并编写程序.
HostKvm,我们很多人都算是比较熟悉的国人服务商,旗下也有多个品牌,差异化多占位策略营销的,商家是一个创建于2013年的品牌,有提供中国香港、美国、日本、新加坡区域虚拟化服务器业务,所有业务均对中国大陆地区线路优化,已经如果做海外线路的话,竞争力不够。今天有看到HostKvm夏季优惠发布,主要针对香港国际和韩国VPS提供7折优惠,折后最低月付5.95美元,其他机房VPS依然是全场8折。第一、夏...
易探云怎么样?易探云香港云服务器比较有优势,他家香港BGP+CN2口碑不错,速度也很稳定。尤其是今年他们动作很大,推出的香港云服务器有4个可用区价格低至18元起,试用过一个月的用户基本会续费,如果年付的话还可以享受8.5折或秒杀价格。今天,云服务器网(yuntue.com)小编推荐一下易探云国内云服务器优惠活动,北京和深圳这二个机房的云服务器2核2G5M带宽低至330.66元/年,还有高配云服务器...
80vps怎么样?80vps最近新上了香港服务器、美国cn2服务器,以及香港/日本/韩国/美国多ip站群服务器。80vps之前推荐的都是VPS主机内容,其实80VPS也有独立服务器业务,分布在中国香港、欧美、韩国、日本、美国等地区,可选CN2或直连优化线路。如80VPS香港独立服务器最低月付420元,美国CN2 GIA独服月付650元起,中国香港、日本、韩国、美国洛杉矶多IP站群服务器750元/月...