文档库 最新最全的文档下载
当前位置:文档库 › VB程序控制结构语法格式

VB程序控制结构语法格式

VB程序控制结构语法格式
VB程序控制结构语法格式

VB程序控制结构语法格式

一.选择控制结构

条件语句也称if语句,有两种结构:1单行结构;2块结构

1.单行结构,格式:If条件then

then部分

Else

else部分

如果“条件”为true,执行“then部分”,否则执行“else部分”

2.块结构,格式:If条件1then

语句块1

Elseif条件2 then

语句块2

……

Else

语句块n

End if

二.多分支控制结构

情况语句:也称为select case语句或case语句

格式:Select Case测试表达式

Case 表达式列表1

语句块1

[case 表达式列表2

[语句块2]]

……

[case else

[语句块n]]

End Select

情况语句以SelectCase开头,EndSelect结束,功能是根据“测试表达式”的值,从多个语句块中选择符合条件的一个语句块执行。

表达式列表:1、表达式[,表达式] 2,表达式to表达式3、is关系运算表达式,关系运算符

Case 2,4,6,8 case 1to 5 case is=12或caseis

三.For循环控制结构

For循环格式:

For循环变量=初值to 终值[step步长(步长=1时可省略)]

[循环体]

[Exit for]

Next[循环变量][,循环变量]……

四.当循环控制结构

格式:While条件

[语句块]

Wend

1.“条件”为一布尔表达式,当循环语句的功能是:先对“条件”进行测试,然后才决定是否执行循环体,

只有在“条件”为true时才执行循环体,如果条件从开始就不成立,则一次循环体也不执行。

2.如果条件总是成立,则不停地重复执行循环体(要有使循环趋于结束的语句)。

五.Do当循环控制结构

1. 格式:Do

[语句块]

[exit do]

Loop[while\until 循环条件]

Do ….Loop While 循环逻辑图Do ….Loop Until 循环逻辑图

No

2. 格式:D o[while\until 循环条件]

[语句块]

[exit do]

Loop

Do …While Loop 循环逻辑图Do …Until Loop 循环逻辑图

注意:

1. While 循环先判断条件是否成立,成立的情况下在执行循环体,do …while 不管条件是否成立先执行一次循环体再判断条件是否成立,就是说至少运行一次。

2. 和while 循环一样,如果条件总是成立,do 循环也可能陷入“死循环”,在这种情况下,可以用exit do 语句跳出循环,一个do 循环中可以有一个或多个exit do 语句,并且exit do 语句可以出现在循环体的任何地方。当执行到语句时,结束循环,并把控制转移到do 循环后面的语句,用exit do 语句只能从它所在的那个循环中退出

六. 多重循环

通常把循环体不含有循环语句的循环叫单层循环,把循环体内含有循环语句的循环称为多重循环。

《VB选择结构程序设计》教学设计

《VB选择结构程序设计》教学设计 山东省临清市第二中学吴焕英 【案例背景】 高中信息技术新课程的实施,其课程目标定位于全面提升学生的信息素养,其课程的设置从知识与技能、过程与方法、情感态度与价值观三个方面实施这个课程目标。然而,众多的老师实施新课程后发现:教学内容的范围比以前更广泛了、课时远远不够、教学软硬件资源缺乏等诸多问题。因此,如何更有效地开展新课程教学,成为老师们迫切需要解决的问题。本教学案例从学生的实际情况出发,根据现有的数学、英语基础,结合简单的生活实例,引导学生进行探索式学习,问题从简单的英语口语入手,过渡到课题的研究学习。原本枯燥无味的VB程序设计,在简单、形象的生活实例下,激发了学生的思考与探索思维。这样的教学案例,值得我们反思研究、总结与完善。 【教材分析】 算法与程序设计是普通高中信息技术课程中选修模块之一,本模块旨在使学生进一步体验算法思想,了解算法和程序设计在解决问题过程中的地位和作用;能从简单问题出发,设计解决问题的算法,并能初步使用一种程序设计语言编制程序实现算法解决问题。 “选择结构”是教育科学出版社出版的高级中学课程标准实验教科书、算法与程序设计第二章第三节的内容,共分三课时,本课为第二课时。主要内容是用选择结构编写简单的程序解决具体问题。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上,理解了顺序结构的前提后提出的。 通过本课的学习,可以促进学生对问题解决方法和思想的理解与掌握,从而提升学生的问题解决能力,让学生在按照一定的流程解决问题的过程中,去体会和理解程序设计的思想,而且也为多分支选择结构的学习打下基础。 【学生分析】 高一的学生在数学课中已经有了算法和程序设计的基础,学生对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平,在教师的有效引导下,有能力进行自我探究,如果用一种学生比较感兴趣的,能够贴近学生日常生活的例子来分析选择结构的话,那么学生会比较感兴趣。 【教学目标分析】 通过教师引导学生去探究、发现技术背后所蕴含的技术价值和技术思想,使其获得知识与技能的同时,理解和掌握过程与方法,这样才能够学会认知,学会做事,乃至学会生活,提高终生学习的能力、分析解决问题的能力,满足其终身发展的需要,成为适应信息社会的公民。 因此本节课的目标有以下几项:

vb三种基本结构练习题

vb三种基本结构练习题 1、计算圆的面积(顺序结构) dim r,s,c as single r=inputbox("输入r的值") s=3.14*r*r c=2*3.14*r print s print c 2、小明去买电池,2.5元一节,买电池超过10节,超出的部分按八折出售。输入小明买电池的数量,输出小明应付的钱数。(选择语句) dim a as integer dim q as single a=inputbox("输入小明买的电池数") if a>10 then b=25+(a-10)*2.5*0.8 else b=a*2.5 end if print b 3、求1+2+3+4+……+100的和。(循环语句) dim i,sum as integer for i=1 to 100 sum=sum+i next i print sum 4、输入数字n,求n!(n!=1*2*3*……*n)(循环语句) dim i,sum,n as long n=inputbox("输入n的值") sum=1 for i=1 to n sum=sum*i next i print sum

1、在窗体上任意位置画一个文本框和一个命令按钮,编写程序,当用户单击命令按钮时,文本框移动到窗体的左上角,并且文本框的大小是原来的2倍。 2、在窗体上任意位置画一个文本框和一个命令按钮,设置窗体的标题属性为“信息窗口”;命令按钮的标题属性为“确定”。编写程序,当用户单击命令按钮时,在文本框中显示“包头师范学院”,要求字体为隶书、加粗、加下划线、字号为20、颜色为红色。 3、在窗体上任意位置画两个命令按钮,分别设置它们的标题属性为:加载图片、显示信息。编写程序,当用户单击第一个命令按钮时,在窗体上加载一幅图片(图片自定)。当用户单击第二个命令按钮时,在窗体上打印信息“包头师范学院“。 4、例1: 在窗体上部设置一个文本框,文本框的下面设置 3 个命令按钮,其中左边按钮中标有“单击此按钮”,中间按钮中标有“清除”,右边按钮中标有“程序结束”。当程序运行时,用鼠标单击左边按钮时,屏幕上部的文本框中显示“欢迎使用vb 6.0”;如果单击中间按钮,则清除文本框中显示的内容;而如果单击右边的按钮,则结束程序。 5、例2 请根据题目要求,设计VB应用程序: 1、在窗体的上方并排分别创建一个标签控件label1和一个文本框控件 text1; 要求:①窗体的标题命名为“个人简介”、窗体背景颜色为黄色。 ②标签和文本框中显示的字体为隶书、样式为斜体、字体大小为三号的红色字。 2、在两个控件的下方并排创建两个命令按钮控件command1、command2,分别命名为:“姓名”、“单位”。 3、请编写事件过程代码,使得程序运行时,当鼠标按下“姓名”按钮时,将在标签中显示你的名字;当鼠标按下“单位”按钮时,将在文本框中显示你现在所在的系、级、班。 4、完成以上操作后以V1为窗体名保存在D盘自己的文件夹下 上机练习三 1、在窗体上画一个文本框控件,要求运行时在文本框中显示信息“包头师范学院”(form-load事件)。当用户在文本框中选中任意数量的字符时,在窗体上显示所选中的字符数、选中字符数的首字符数及选中的字符内容。 2、在窗体上画两个文本框控件,先在属性窗口中删除两个文本框中的初始text 属性值。要求当程序运行时,当在文本框1中输入任意一个字符时,同时在文本框2中显示出来,同时也在窗体中显示出来。 3、实现“减法器”功能。

VB基本知识及选择、循环结构习题

一、VB 基本知识及选择、循环结构习题 一、基本概念题 (1) 说明下列哪些是Visual Basic 合法的直接常量,并分别指出它们的类型。 %100 1E1 123D3 123,456 0100 “ASDF” “” #2004/10/7# 100# π &O78 &H123 True T -1123! # (2)下列数据哪些是变量,哪些是常量是什么类型的常量 Name “name” False ff “11/16/99” cj “120” n #11/12/2004# (3) 下列符号中,哪些可以是Visual Basic 的合法变量名 A123 a12_3 123_a a,123 a 123 Integer XYZ False Sin(x) 变量名 sinx π (4)把下列数学表达式写成Visual Basic 表达式: (1)5||z y x ++ (2)6)1(xy + (3)xy y x 310+ (4)a ac b b 242-+- (5)3211111r r r ++ (6)110ln 45sin 10++++y x e (5)写出下列表达式的值: (1)123 + 23 Mod 10 \ 7 + Asc("A") (2)Int * 100 + / 100 (3)#11/22/2004# - 10 (4)"ZXY" & 123 & "abc" (6)设a=7,b=3,c=4,求下列表达式的值: (1)a + 3 * c (2)a ^ 2 / 4 (3)a / 2 + 3 \ 2 (4)a Mod 3 + b ^ 3 / c \ 5 (7)写出下列函数的值: (1)Int (2)Fix (3)Sqr(Sqr(81)) (4)Len("Visual Basic 程序设计") (5)Int(Abs(99 - 100) / 2) (6)Sgn(7 * 3 + 2) (7)LCase("Hellow VB!") (8)Mid("Hellow VB!", 4, 3) (9)Left("Hellow VB!", 3) (10)Val("16个加23个") (11)Str (12)UCase("Visual Basic") 二、 选择题 (1)可以同时删除字符串前导和尾部空格的函数是 。 A. Ltrim B. Rtrim C. Trim D. Mid (2)函数Int(Rnd(1) * 10)是在哪个范围产生随机整数 。 A. (0,1) B. (0,9) C. (1,10) D. (1,9) (3)数学式子sin25o写成Visual Basic 表达式是 。 B. Sin(25) C. Sin(25o) D. Sin(25*180) (4)表达式16/4 – 2^3 * 8/4 Mod 5\2的值是 。 A. 14 B. 4 C. 20 D. 2 (5)数学关系式103<≤x 表示成正确的VB 表达式为 。 A. 3<= x <10 B. x >= 3 And x<10 C. x>=3 Or x<10 D. 3<= x And <10

vb控制结构综合练习

A) 0 B) 1 C) ””D) False 控制结构4.设a=6,则执行x=IIf(a>5,-1,0)后,x的值一、选择题为________。 种基本结构1.VB的3种结构化程序设计的3A) 5 B) 6 C) 0 D) –1 是________。5.下面程序段的运行结果是________。 A) 选择结构、过程结构、顺序结构cj=85 递归结构、选择结构、顺序结构B) 晉挠??吠敨?橤尽屁 过程结构、转向结构、递归结构C) 晉挠??吠敨?橤尽层 D) 选择结构、顺序结构、循环结构晉挠??吠敨?橤尽屃 2.段函数表用If语句示分晉挠??吠敨?橤尽屄3?1x?x?1?x)(f表________ ,以下?311x?x?晉挠??吠敨?橤尽居?示方法不正确。Print dj=;dj A) f=x^3+1A) dj=B B) dj=C C) dj=D D) dj=E 1 If x>=1 Then f=s^3- -B) If x>=1 Then f=x^31 If x<1 Then f=x^3+1 -1C) If x>=1 Then f=x^3 f=x^3+16.下列语句正确的是________。 D) If x<1 Then f=x^3+1 Else A) If K<3*N And k>N Then N=k^3 F=x^31-B) If K<3*N And k>N Then N=k3 。执行下面的程序段后显示结果是3.________ C) If K<3*N : k>N Then N=k^3 Private Sub Form_Click() D) If K<3*N And k>N Then N=k**3 Dim m ,则下列L=True,z=6.0,,7.设X=2.0y=8.0是的值为True中达BasicVisual 表式If m Then Print m Else Print m+1 。________ End Sub A) X+Z>Y AND L. B) NOT(YNOT L Private Sub Command1_Click() For I=1 To 4 C) NOT L OR (L=Y+X=Z) For J=0 To I D) Y+X>=Z+X AND (L AND FALSE) Print Chr(65+I); 2000元以上(含月收入在20008.要判断”的职元)”5000元)且元以下(不含5000 Next J ________。工,应使用的逻辑表达式是Print A) M>=2000 AND M<=5000 Next I B) M>=2000 OR M<=5000End Sub C) M>=2000 AND M<5000单击命令按钮后,运行结果________。D) M>=2000 OR M<5000A) BB B) A 9.下列程序段的执行结果为________。CCC BB -60)*Rnd+60)x=Int((69 DDDD CCC Select Case x EEEEE DDDD Case Is>90 牐湩? 优秀C) B D) AA Case 80 To 89 CC BBB 良好牐湩? DDD CCCC Case 60 To 79 EEEE DDDDD 牐湩?合格11.在窗体上画一个名称为Text1的文本框Case Else和一个名称为Command1的命令按钮,然后编写如下事件过程:不合格牐湩? Private Sub Command1_Click()End Select Dim i As Integer,n As Integer D) 合格C) 良好B) 优秀A) 不合格For i=0 To 50 .在窗体上画一个命令按钮,名称为10。然后编写如下程序:运行结果Command1 i=i+3 ________。n=n+1 If i>10 Then Exit For

VB程序设计试题及答案一

V B程序设计试题及答案(一) 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作,要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中,其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1,下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构,三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty,"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty,2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 ……

VB程序基本知识学案

主题:程序基本知识 数据类型、常量、变量、函数和表达式 一、点击考点: 1、知道常用的数据类型、变量、常量的含义;学会定义常量、变量的数据类型。 2、知道程序中运算符、函数、表达式的表示方式,能够转换数学表达式为程序接受的 表达式。 3、掌握程序包括的四部分。 二、学习目标: 1、掌握数据类型及其特点; 2、知道常量、变量的声明格式;学会定义常量、变量 3、知道程序中运算符、函数、表达式的表示方式,能够转换数学表达式为程序接受的表达式。 4、知道程序包括的四部分内容。 三、学习方式: 在老师引导下的自主学习,互相评价做题效果 四、考点注解 1、知道常用的数据类型、变量、常量的含义;学会定义常量、变量的数据类型。 (1)VB数据类型(阅读课本27页的表) (2)常量 在程序执行过程中,其值不能改变的量称为常量。常量可以直接用一个数来表示,称为常数(或称为直接常量),也可以用一个符号来表示,称为符号常量。 常量的定义格式如下: Const <常量名> [As 数据类型]=表达式 (3)变量 在程序执行过程中,其值可以改变的量称为变量。 1)变量的命名规则 ?变量名首字符必须是字母; ?变量名只能由字母、数字和下划线组成; ?变量名不能使用VB中的关键字(保留字); ?变量名在同一个作用域内必须唯一; ?变量名长度不超过255; ?变量的命名最好还应遵守一定的编程约定。 3)变量定义语句 Dim <变量名> As <类型> [, <变量名> As <类型>]… 2、知道程序中运算符、函数、表达式的表示方式,能够转换数学表达式为程序接受的表达式。 运算符是在代码中对各种数据进行运算的符号。例如,有进行加、减、乘、除算术运算的运算符,有进行与、或、非、异或逻辑运算的运算符。 表达式是由运算符和运算对象及圆括号组成的一个序列,它是由常量、变量、函数等用运算符连接而成的式子。表达式是构成程序代码的最基本要素。 1)赋值运算符 赋值语句的语法格式为:

VB程序的三种基本结构复习课教学案例

《VB程序的三种基本控制结构》 复习课教案 平桂高级中学陀君一、案例背景信息 模块:算法与程序设计 年级:高一年级 所用教材版本:粤教版《算法与程序设计》 学时数:1课时(40分钟) 二、教学设计: 1、教学目标: 知识与技能:能根据流程图正确区分VB程序的三种基本结构,并记住相关语句格式,能编写出简单明了的程序关键代码; 过程与方法:充分认识VB程序中三种基本结构的实用性,体会生活中算法的存在和精彩。 情感态度与价值观:培养学生在学习过程中积极思考、自我探究的能力和学以致用的意识。 2、教学重点:顺序、选择(分支)和循环三种基本结构的区分及其对应的VB 语句的使用。 教学难点:for循环结构,各类语句关键代码的编写。 三、教学实录 1.复习引入 师:我们之前学过VB的基本结构,通常程序有三种最基本的结构,是哪三种结构? 大部分学生在底下小声回答,师让某生回答,说:顺序模式、分支模式、循环模式。

师:分支模式也可称为? 部分学生:选择模式。 师:非常好,接下来看下这三种结构的流程图,然后分别指出这三个流程图是什么结构。(出示三种流程图结构) 2.正题 (1)顺序结构P38: 执行第一条语句后,必然从第二条语句继续,顺序执行所有的语句,直到执行完最后一条语句为止。 例1:例1、 a=1 b=2 c=a+b a=c-a b=c-a

最后,变量b的值是( 1 ) (2)选择结构(分支结构):P42 根据条件判断其是否成立,如果成立执行成立的分支;否则执行另一分支。其一般形式为: If 条件Then 语句序列1 Else 语句序列2 End If 单行形式为: If 条件Then 语句组1 Else 语句组2 例2、a =10 If a>=10 Then a=a+1 Else a=a-1 End If 该程序段运行后,变量a的值是( D ) A. 8 B. 9 C. 10 D. 11 【师读题,学生思考。请同学回答,让同学们思考a=5结果是多少】 (3)循环结构:P51 根据条件判断其是否成立,如果条件成立则重复执行循环体(循环结构中某语句序列),直到条件不成立,退出循环结构为止。 循环结构的常用形式为: for 循环变量= 初值to 终值[step 步长] [循环体] next [循环变量]

vb控制结构综合练习

控制结构 一、选择题 1.VB 的3种结构化程序设计的3种基 本结构是________。 A)选择结构、过程结构、顺序结构 B)递归结构、选择结构、顺序结构 C)过程结构、转向结构、递归结构 D)选择结构、顺序结构、循环结构 2.用If 语句表示分段函数 33 11 ()11x x f x x x ?-≥=?+=1Thenf=s^3-1 B)Ifx>=1Thenf=x^3-1 Ifx<1Thenf=x^3+1 C)Ifx>=1Thenf=x^3-1 f=x^3+1 D)Ifx<1Thenf=x^3+1Else F=x^3-1 3.执行下面的程序段后显示结果是________。 PrivateSubForm_Click() Dimm IfmThenPrintmElsePrintm+1 EndSub A)0 B)1 C)”” D)False 4.设a=6,则执行x=IIf(a>5,-1,0)后,x 的值为________。 A)5 B)6 C)0 D)–1 5.下面程序段的运行结果是________。 cj=85 Ifcj>90Thendj="A" Ifcj>80Thendj="B" Ifcj>70Thendj="C" Ifcj>60Thendj="D" Ifcj<60Thendj="E" Print"dj=";dj A)dj=B B)dj=C C)dj=D D)dj=E 6.下列语句正确的是________。 A)IfK<3*NAndk>NThenN=k^3 B)IfK<3*NAndk>NThenN=k3 C)IfK<3*N:k>NThenN=k^3 D)IfK<3*NAndk>NThenN=k**3 7.设X=2.0,y=8.0,z=6.0,L=True ,则下列VisualBasic 表达式中值为True 的是________。 A)X+Z>YANDL B)NOT(YNOTL C)NOTLOR(L=Y+X=Z) D)Y+X>=Z+XAND(LANDFALSE) 8.要判断”月收入在2000元以上(含2000元)且5000元以下(不含5000

《VB程序设计》课后题答案

第二章 一、问答题 1.叙述建立一个完整的应用程序的过程。 答:界面设计编写事件过程代码运行、调试保存文件 2.当建立好一个简单的应用程序后,假定该工程仅有一个窗体模块。问该工程涉及到几个文件要保存?若要保存该工程中的所有文件,正确的操作应先保存什么文件?再保存什么文件?若不这样做,系统会出现什么信息? 答:涉及到两个文件要保存。先保存窗体文件(.frm),再保存工程文件(.vbp)。若先保存工程文件,系统也会先弹出“文件另存为”对话框,要求把窗体文件先保存。 3.假定在W indows环境中,要保存工程文件时,若不改变目录名,则系统默认的目录是什么? 答:VB98 4.当标签框的大小由Caption属性的值进行扩展和缩小,应对该控件的什么属性进行何种设置? 答:将标签的Autosize设置为True. 5.VB6.0提供的大量图形文件在哪个目录下?若你的计算机上没有安装,则怎样安装这些图形文件? 答:VB6.0提供的图形文件在Graphics目录。 6.在VB6.0中,命令按钮的显示形式可以有标准和图形两种选择,这通过什么属性来设置?若选择图形的,则通过什么属性来装入图形?若已在规定的属性里装入了某个图形文件,但该命令按钮还是不能显示该图形,而显示的是Caption属性设置的文字,怎样改正?答:按钮Style的属性设置为Graphical(或1)。通过Picture属性来装入图形。不能显示图形是因为Style的属性设置为Standard(或0),只要改为Graphical(或1),一般还将Caption 属性的值设置为空。 7.标签和文本框的区别是什么? 答:文本是否可编辑。 8.当窗体上有三个文本框和一个命令按钮,若程序运行时,需把焦点定位在第三个文本框处,应对何控件的什么属性进行何种设置? 答:应对Text3控件进行Text3.TabIndex=0的设置。 9.简述文本框的change与keypress事件的区别。 答:文本框内容变化,change与keypress事件都会发生,所不同的是Keyprees还将返回一个Keyasii参数 10.当某文本框输入数据后(按了回车键),进行判断认为数据输入错,怎样删除原来数据?怎样使焦点回到该文本框重新输入? 答:假定文本框的名称为Text1,则事件过程如下: Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then If 出错条件判断成立Then Text1=””…先删除原来数据 Text1.SetFocus …焦点回到Text1 End If …… End If End Sub

VB控制结构——goto型控制语句

VB控制结构——goto型控制语句 一、goto语句 goto语句可以改变程序的顺序,跳过程序的某一部分去执行另一部分。或者返回已经执行过的某些语句使之重复执行。因此,用goto语句可以构成循环。 Goto语句的一般格式:goto [ 标号或行号] “标号”是一个以冒号结尾的标识符;“行号”是一个整型数。它不以冒号结尾。 例如:aa:是一个标号 100 是一个行号 Goto语句改变程序执行的顺序。无条件地把控制转移到“标号”或“行号”所在的程序行,并从该行开始向下执行。 需要注意的就是: (1)标号必须以英文字母开头,以冒号结束,而行号由数字组成,后面不能跟有冒号。Goto语句中的行号或标号在程序中必须存在,并且是唯一的,否则会产生错误。标号或行号可以在goto语句之前,也可在其之后。当在goto语句之前时,提供了实现循环的另外一种途径。 (2)V isual basic对goto语句的使用有一定的限制。它只能在一个过程中使用。 二、On--goto语句 On—goto语句类似于情况语句,用来实现多分支控制结构。它可以根据不同的条件从多种处理方案中选择一种,其格式为: On 数值表达式goto 行号列表或标号列表 On—goto语句的功能是:根据“数值表达式”的值,把控制转移到几个指定语句行中的一个语句行。“行号列表”或“标号列表”可以是程序中存在的多个行号或标号,相互之间需要用逗号隔开。例如: On x goto 20,35,aa,bb 该语句的执行过程是:先计算“数值表达式”的值,将其四舍五入得一整数。然后根据该整数的值决定转移到第几个行号或标号执行。如果其值为1,则转向第一个行号或标号所指出的语句行;如果为2,则转达向第二个行号或标号指出的语句行……依次类推。如果“数值表达式”的值等于0或大于“行号列表”或“标号列表”中的项数。程序找不到适当的语句行,将自动执行On—goto语句下面的一个可执行语句。 因为这个语句在一些工程量比较大的程序中,容易使程序变得混乱,所以我们应该尽量少用这些语句,并尽量用情况语句(select case)来代替。

VB程序设计-试题与答案-1

《VB程序设计基础》试题 一、选择题:(每空 2 分,共 20 分) 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言,构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”,表达式Right(S,1)+Left(S,1)+Mid(S,2,1)的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式,正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框,所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT(100*RND)产生的随机整数的闭区间是_____________。 A.[0,100] B.[1,100] C.[1,99] D.[0,99] 9. 一个数组说明为Dim a(0 to 5,1 to 5) As Integer,则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。

《第4章 VB控制结构》习题

《第4章VB控制结构》习题 一、填空题 1、结构化程序设计语言的三种基本控制结构是、、。 2、分支结构中的条件通常是表达式。 1、Select case语句执行哪一个分支的根据是与相匹配。 2、强制性退出Do…Loop循环的语句是,强制性退出For…Next循环的语 句是。 3、VB有三种工作模式,它们分别是、和。 4、VB可能遇到的错误有、和。 5、执行下面的程序段后,s的值为。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i 6、阅读程序,写出程序的运行结果box 。 Private Sub Form_Click() Dim k,Box as Ivteger For k=1 to 11 Select Case k Case 1,3,5,7,9,11 Box=Box+Int(k/2) Case 2,4,6,8,10 Box=Box+Int(k/3) End Select Next k Print “Box”;Box End Sub 7、运行时单击窗体,以下事件发生的次序是。 8、执行下列程序段后,x的值是。 n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n 9、阅读下列程序段: x = 0 For i = 1 To 4 For j = 1 To i x = x + 1 Next j, i 执行以上循环后,x 的值为。 10、执行下列程序段后输出的结果是。 s = 1

For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s; Next i 11、阅读下列程序段: m = 0 For i = 1 To 3 For j = 1 To i m = m + j Next j, i 执行以上的循环后,i和m的值分别为。12、运行下列程序段,其中“n=n+1”语句被执行的次数是。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next n Next m 13、窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() Sum = 0 For m = 1 To 3 Select Case m Case 1 a = 1 Case 2 a = 2 Case 3 a = 3 End Select Print a, Sum = Sum + a Next m Print Sum End Sub 运行时,单击按钮,输出结果是。 14、窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() a = 80: b = 50: c = 30 If a < b Or b > c Then b = c If b = c And a < c Then a = a - 30

VB程序设计——选择结构.

VB程序设计——选择结构 南京市九龙中学李李 ■教材分析 选择控制结构是程序的三个基本结构中的一个重要结构,计算机的逻辑判断能力就是通过选择结构来完成的。条件语句中的“条件”是用关系表达式、逻辑表达式来描述的。程序中能否实现正确的“选择”决定于关系表达式或逻辑表达式的正确描述。关系表达式与逻辑表达式是本节中教学的重点与难点。 用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上,理解了顺序结构的前提后提出的。通过本课的学习,可以促进学生对问题解决方法和思想的理解与掌握,从而提升学生的问题解决能力,让学生在按照一定的流程解决问题的过程中,去体会和理解程序设计的思想。 ■学情分析 学生在前面的课上对vb程序设计已经有了一定的基础,学生的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平,在教师的有效引导下,有能力进行自我探究,如果用一种学生比较感兴趣的,能够贴近学生日常生活的例子来分析选择结构的话,那么学生会比较感兴趣。 ■教学目标 1.知识与技能 1.了解选择结构的基本概念。 2.了解关系表达式与逻辑表达式的概念。 3.能利用VB中的条件语句实现简单的选择结构。 2.过程与方法 经历实践、分析、归纳,掌握IF语句的格式和功能。 3.情感态度与价值观 运用半成品加工策略,完善程序,发展学生思维的逻辑性及严谨的学习态度。 4.行为与创新 培养学生利用计算机的反馈作用进行探究学习的能力。 ■课时安排 安排1课时。 ■教学重点与难点 1.教学重点 让学生学会使用VB语言的If分支语句,掌握分支判断程序结构,来解决实际问题,

并且培养学生的探索、创新能力。 2.教学难点 对解决问题的方法和步骤的理解,并能根据实际问题写出程序代码。■教学方法与手段 讲述与讨论、实验与验证。 ■课前准备 教学课件、实例程序 ■教学过程

VB程序设计试题及答案(一)-vb程序设计答案

VB程序设计试题及答案(一) 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作,要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII 码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中,其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1,下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构,三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty,"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty,2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3

VB程序设计试题及答案(一)

VB程序设计试题及答案(一) 一、单选题 1、VB6、0就是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2、要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句就是正确的。 (A) Forml、Caption=“欢迎使用VB” (B) Forml、Caption='欢迎使用VB' (C) Forml、Caption=欢迎使用VB (D) Forml、Caption="欢迎使用VB" 3、若要使命令按钮不可操作,要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4、如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5、下面A 就是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6、以下关系表达式中,其值为False的就是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7、为了给x、y、z三个变量赋初值1,下面正确的赋值语句就是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8、VB提供了结构化程序设计的三种基本结构,三种基本结构就是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句就是 D 。 (A) If sex="男" And age=4O And InStr(duty,"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty,2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10、下列关于Do…Loop循环结构执行循环次数的描述正确的就是D 。 (A) Do While…Loop循环与Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环与Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次与Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行与Do…Loop Until循环至少执行一次 11、以下B 就是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… Next x Next x

VB程序语句与控制结构

第3章VB程序语句与控制结构 一个VB应用程序主要由用户界面和响应各事件的程序代码组成,程序代码是应用程序的核心。本章首先介绍程序代码设计的基础知识,再通过一些典型的例子,使大家逐步掌握编程的思路和技巧。VB虽然是面向对象的程序设计语言,但在代码设计中仍然支持结构化程序设计的三种基本结构,即顺序结构、选择结构和循环结构。本章将主要介绍数据的输入与输出、三种基本程序控制结构及语句。 3.1 数据的输入与输出 VB的输入/输出有多种形式,常用的输入方式有:使用键盘输入数据的函数InputBox 以及文本框等控件。常用的输出方式有: Print方法、MsgBox函数和过程以及图形框、文本框、标签等控件。有关控件的使用在其第六章中介绍,本节主要介绍InputBox函数、MsgBox函数与过程以及Print方法的使用。 3.1.1 InputBox函数 格式:InputBox(提示[,标题][,默认][,x坐标位置][,y坐标位置]) 功能:InputBox函数产生一个对话框,作为输入数据的界面,等待用户输入内容,当用户单击“确定”按钮或按回车键,函数返回输入的值,其值的类型为字符串(String)。 说明: (1)“提示”:必选项。字符串表达式,在对话框中作为提示信息显示,可为汉字。若要多行显示,必须在每行行末加回车符Chr(13)和换行符Chr(10)符或VB符号常数vbCrLf。 (2)“标题”:可选项。字符串表达式,在对话框的标题区显示;若省略,默认为应用程序名。 (3)“默认”:可选项。字符串表达式,当输入对话框中无输入时,则该默认值作为输入的内容。 (4)“x坐标位置、y坐标位置”:可选项。整型表达式,确定对话框左上角相对于屏幕左上角的x、y坐标,单位为twip。该项省略时,对话框出现在屏幕水平、垂直中间的位置。 【注意】 各项参数次序必须一一对应,除了“提示”一项不能省略外,其余各项均可省略,处于中间的默认部分要用逗号占位符跳过。 例如,运行如下代码段,结果显示如图3-1所示,当单击“确定”按钮后,变量strName 的值为“李林”。 Dim strName as String*20 Title = "InputBox函数示例" Msg1 = "请输入你的姓名" StrName=InputBox(Msg1,Title,,200,200) 图3-1 3.1.2 Msgbox 函数与过程 MsgBox用于输出数据,它会在屏幕上显示一个对话框。在对话框中显示消息,等待用

相关文档
相关文档 最新文档