VisualBasic 程序设计 VB6教程

《VisualBasic 程序设计 VB6教程》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualBasic教程VB控制结构结构化程序设计的基本控制结构有3种，即顺序结构、选择结构和循环结构。由这3种基本结构还可以派生出“多分支结构”。自然语言已知x=5，y=2x+3，z=3y+5x+9,求z的值是多少？开始X=5Y=2x+3Z=3y+5x+9结束顺序结构开始语句1语句2语句n…结束自然语言已知X=6，如果X>5，那么Y=8x+12,否则，Y=8x-5，请问Y的值是多少？开始结束X>5？Y=8x+12PrintyY=8x-5是否X=4选择结构开始结束变量初始化条件为真吗？语句块T条件判断语句的下一条语句语句块FTrueFalse自然语言求1+2+3+4+……+100的值是多少？

2、开始X=1:sum=0Sum=sum+xX=x+1Printsum结束循环结构开始结束变量初始化循环体的下一条语句循环体For循环While循环Do循环不同自然语言已知X=15，如果X>5，那么Y=8x+12,否则，Y=8x-5，请问Y的值是多少？开始结束X>5？Y=8x+12PrintyY=8x-5是否X=15如果X>5，那么Y=8x+12,否则，Y=8x-5ifThenElseX>5Y=8x+12Y=8x-5选择结构通过条件语句来实现。条件语句也称If语句，它有两种格式，一种是单行结构，一种是块结构。选择控制结构其一般格式为：If条件1Then语句块1[ElseIf条件2Then语句块2]

3、[ElseIf条件3Then语句块3][Else语句块n]EndIf块结构条件语句自然语言已知X=15，如果X>5，那么Y=8x+12,否则，Y=8x-5，请问Y的值是多少？开始结束X>5？Y=8x+12PrintyY=8x-5是否X=15流程结构图根据（EndIf)开始结束变量初始化If条件1?Then(1)语句nT(then)F(else)If条件2?Then(2)T(then)F(else)If条件n？Then(n)T(then)F(else)…else流程结构图根据（EndIf)开始结束X=15X>5Y=8x+12语句nT(then)F(else)X=5Y=8x-5T(then)F(e

4、lse)Y=8xIfx>5Theny=8x+12ElseIfx=5Theny=8x-5Elsey=8xEndIf语言:例如：当单击窗体时，输入x的值，若x大于0，那么在窗体是输出y＝1，否则如果x等于0，那么在窗体上输出y=0,否则在窗体上输出y=-1。Y=10-1(x>0)(x=0)(x<0)Ifx>0theny=1elseifx=0theny=0elsey=-1endif块结构语句的功能是：如果“条件1”为True，则执行“语句块1”；否则如果“条件2”为True，则执行“语句块2”；……否则执行“语句块n”。这里的语句块可以是一个语句，也可以是多个语句。当有多个语句时，可以分别写在多行里

5、；如果写在一行中，则各语句之间用冒号隔开。流程结构图根据（EndIf)开始结束变量初始化If条件1?Then(1)语句nT(then)F(else)If条件2?Then(2)T(then)F(else)If条件n？Then(n)T(then)F(else)…else说明：（1）格式中的“条件1”、“条件2”等都是逻辑表达式，通常数值表达式和关系表达式看作是逻辑表达式的特例。当“条件”是数值表达式时，非0值表示True，0值表示False；当“条件”是关系或逻辑表达式时，-1表示True，0值表示False。Ifx>0andx<100then……Ifx=0then……If100and0then…

6、…（2）块形式条件语句的执行过程是：先测试“条件1”，如果该条件为True，则执行Then后面的“语句块”；如果“条件1”为False，则VB顺序测试每个ElseIf子句中的“条件”，当发现某个“条件”为True时，就执行与其相关的Then后面的“语句块”；如果所有ElseIf子句的“条件”都不为True，则执行Else后面的“语句块n”。在执行了Then或Else后面的语句块之后，程序退出块结构条件语句，继续执行EndIf后面的语句。开始结束变量初始化If条件1?Then(1)条件判断语句的下一条语句T(then)F(else)If条件2?Then(2)T(then)F(else)If条件n

7、？Then(n)T(then)F(else)…else（3）块结构与单行结构条件语句的主要区别：Then后面的语句（注释语句除外）是否和Then在同一行上，若在同一行上，则为单行结构，否则为块结构。对于块结构，必须以EndIf结束，单行结构没有EndIf。（4）在块结构条件语句中，ElseIf子句的数量没有限制，可以根据需要加入任意多个ElseIf子句。其一般格式为：If条件1Then语句块1En