课题:分支结构教学时间:授课班级:教学目标:学会用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所示的看图程序,图的正中为图形框,单击"上图""下图"钮显示上幅、下幅图像.
要求写出完成该程序所要绘制的控件及需要重新设置的属性,并编写程序.
BGPTO是一家成立于2017年的国人主机商,从商家背景上是国内的K总和有其他投资者共同创办的商家,主营是独立服务器业务。数据中心包括美国洛杉矶Cera、新加坡、日本大阪和香港数据中心的服务器。商家对所销售服务器产品拥有自主硬件和IP资源,支持Linux和Windows。这个月,有看到商家BGPTO日本和新加坡机房独服正进行优惠促销,折扣最低65折。第一、商家机房优惠券码这次商家的活动机房是新加坡...
香港服务器租用多少钱一个月?香港服务器受到很多朋友的青睐,其中免备案成为其特色之一。很多用户想了解香港云服务器价格多少钱,也有同行询问香港服务器的租赁价格,一些实际用户想要了解香港服务器的市场。虽然价格是关注的焦点,但价格并不是香港服务器的全部选择。今天小编介绍了一些影响香港服务器租赁价格的因素,以及在香港租一个月的服务器要花多少钱。影响香港服务器租赁价格的因素:1.香港机房选择香港机房相当于选择...
现在宝塔面板真的是越来越过分了,删除文件、删除数据库、删除站点等操作都需要做计算题!我今天升级到7.7版本,发现删除数据库竟然还加了几秒的延时等待,也无法跳过!宝塔的老板该不会是小学数学老师吧,那么喜欢让我们做计算题!因此我写了个js用于去除各种计算题以及延时等待,同时还去除了软件列表页面的bt企业版广告。只需要执行以下命令即可一键完成!复制以下命令在SSH界面执行:Layout_file="/w...