当前位置：文档库 › VB循环结构测试题及答案

VB循环结构测试题及答案

循环结构测试题(四)

一：选择题

1：以下（）是正确的for….next结构。

（A）f or x=1 to step 10 (B) for x=3 to –3 step -3 ….. …..

next x next x

(C ) for x=1 to 10 (D) for x=3 to step 3

re: …. ……

Next x next y If I=10 then goto re

2:下列循环语句能正常结束循环的是（）

（A）I=5 (B) I=1

do do

I=I+1 I=I+2 Loop until I<0 loop until I=10

do do

I=I-1 I=I-2 Loop until I<0 loop until I=1 3:下面程序段的运行结果为（）

for I=3 to 1 step –1

print spc(5-I);

for j=1 to 2*I-1 print “*”; next j print next I (A)

4下列程序在文本框输入“ABCD ”四个字符时，窗体上显示的是（）

private sub text1_change( ) print text1.text; end sub

(A) ABCD (B) ( C ) AABABCABCD

5哪个程序段不能分别正确显示1!,2!,3!,4!的（）

* * * * * * * * *

(B) * * * * *

* * * *

(D) * * * * *

* * * *

A B C D

(D) A

AB ABC ABCD

二：填空题

1：要使下列For 语句循环执行20次，循环变量的初值应当是：

for k=( ① ) to –5 step –2 2:下面程序段显示（ ② ）个“*”。

For I=1 to 5 For j=2 to I Print “*”; Next j Next I

3: 下列第40句共执行了（ ③ ）次，第41句共执行（④ ）次。

30 for j=1 to 12 step 3 40 for k=6 to 2 step –2 41

print j,k

（A ） for I=1 to 4

n=1

for j=1 to I n=n*j next j print n next i

（B ）

for I=1 to 4 for j=1 to I n=1 n=n*j next j print n next i

for j=1 to 4 n=n*j print n

next j

(D) N=1

J=1

Do while j<=4 n=n*j print n j=j+1 loop

42next k

43next j

4: 以下程序运行后，si,sj,I,j,k的结果分别是（⑤），（⑥），（⑦），（⑧），（⑨），（⑽）

private sub command1_click( )

for I=1 to 2

for j=1 to I

sk=0

for k=j to 3

sk=sk+1

next k

sj=sj+1

next j

si=si+1

next I

print si,sj,sk,I,j,k

end sub

5:下面程序运行后输出的结果是（⑾）

private sub command1_click()

for I=0 to 3

print tab(5*I+1);”2”+I;”2”&I;

next I

6:下面程序运行后输出的结果是（⑿）private sub command1_click()

a$=”*”;b$=”$”

for I=2 to 4

if I mod 2=0 then

x$=string(len(a$)+I,b$)

else

x$=string(len(a$)+I,a$)

end if

print x$;

next I

end sub

7: 执行下面程序，打印结果是（⒀）option explicit

private sub form_click( )

dim I as integer,j as integer

j=10

for I=1 to j step 2

I=I+1

J=j-I

Next I

End sub

8:输入任意长度的字符串，要求将字符顺序倒置，例如：将输入“ABCDEFG”变换成“GFEDCBA”

private sub command1_click()

dim a$,I%,c$

a=inputbox(“输入字符串”)

n=( ⒁)

for I =1 to ( ⒂)

c=mid(a,I,1)

mid(a,I,1)=( ⒃)

( ⒄)=c

next I

print a

end sub

9：找出被3，5，7除，余数为1的最小的5个正整数。

Private sub command1_click()

Dim countN%,n%

CountN=0

N=1

N=n+1

If ( ⒅) then

Print n

CountN=countN+1

End if

Loop ( ⒆)

End sub

10：某次大奖赛，有7个评委打分，如下程序对一名参加比赛者，输入7个评委的打分分数，去掉一个最高分，一个最低分数，求出平均分为该参赛选手的得分。

Private sub command1_click()

Dim mark!,aver!,I%,max!,min!

Aver=0

For I=1 to 7

Mark=inputbox(“输入第“&I&”位评委的打分”)

If I=1 then

Max1=mark

( ⒇)

else

if mark

( （21）)

elseif mark>max1 then

( （22）)

end if

( （23）)

next I

aver=(（24）)

print aver

end sub

11：由键盘上输入一个正整数，找出大于或等于该数的第一个质数。Private sub command1_click( )

Dim m%,x%,tag as Boolean

Tag=false

X=inputbox(“输入正整数”)

Do while not tag

M=2

Tag=( （25）)

Do while tag and (m<(x\2))

If x mod m=0 then ( （26）) else ( （27）)

Loop

If not tag then x=x+1

Loop

Print x

End sub

12：将一个正整数分解为质因数乘机，例如：234=2*3*3*13 private sub command1_click()

dim n%,factor%,first as Boolean

n=inputbox(“输入一个正整数”)

factor=2

first=true

do while ( (28) )

if first then

print n;”=”;factor;

else

print “*”;factor;

end if

((29) )

first=false

loop

factor=factor+1

loop until factor>n

end sub

测试题（四）答案

一）选择题

二）填空题

1：33

2：10

3: 4，12

4:2，3，2，3，3，4

5:2 20 3 21 4 22 5 23

6：**$$$****$$$$$

7:13-16

8:LEN(a),int(n\2),mid(a,n-I+1,1),mid(a,n-I+1,1)

9:n mod 3=1 and n mod 5=1 and n mod 7=1

until countN=5 或while countN<5

10：min1=mark ；min1=mark ；max1=mark aver=aver+mark ；(aver-max1-min1)/5 11:true；tag=true ；m=m+1

12: n mod factor=0 ；n=n\factor

VB循环结构测试题及答案

循环结构测试题(四) 一：选择题 1：以下（）是正确的for….next结构。（A）for x=1 to step 10 (B) for x=3 to –3 step -3….. ….. next x next x (C ) for x=1 to 10 (D) for x=3 to step 3 re: …. …… Next x next y If I=10 then goto re 2:下列循环语句能正常结束循环的是（）（A）I=5 (B) I=1 do do I=I+1 I=I+2 Loop until I<0 loop until I=10 (C) I=10 (D) I=6 do do

I=I-1 I=I-2 Loop until I<0 loop until I=1 3:下面程序段的运行结果为（） for I=3 to 1 step –1 print spc(5-I); for j=1 to 2*I-1 print “*”; next j print next I 4下列程序在文本框输入“ABCD ”四个字符时，窗体上显示的是（） private sub text1_change( ) print ; end sub (A) ABCD (B) ( C ) AABABCABCD * * * * (B) * * * * * * * * (C) * * * * * * * * (D) * * * * * * * * A B C (D) A AB ABC

5哪个程序段不能分别正确显示1!,2!,3!,4!的（）二：填空题 1：要使下列For 语句循环执行20次，循环变量的初值应当是： for k=( ① ) to –5 step –2 2:下面程序段显示（ ② ）个“*” 。 For I=1 to 5 For j=2 to I Print “*”; Next j Next I 3: 下列第40句共执行了（ ③ ）次，第41句共执行（④ ）次。 30 for j=1 to 12 step 3 40 for k=6 to 2 step –2 41 print j,k 42 next k （A ） for I=1 to 4 n=1 for j=1 to I （B ） for I=1 to 4 for j=1 to I n=1 (C) N=1 for j=1 to 4 (D) N=1 J=1 Do while j<=4

VB基本学习知识及其选择,循环结构习题集

一、VB 基本知识及选择、循环结构习题一、基本概念题（1）说明下列哪些是Visual Basic 合法的直接常量，并分别指出它们的类型。 100.0 %100 1E1 123D3 123,456 0100 “ASDF” “1234.5” #2004/10/7# 100# π &O78 &H123 True T -1123! 345.54# （2）下列数据哪些是变量，哪些是常量？是什么类型的常量？ Name “name” False ff “11/16/99” cj “120” n #11/12/2004# 12.345 （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）3211111 r r r + + （6） 110ln 45sin 10 ++++y x e ο （5）写出下列表达式的值：（1）123 + 23 Mod 10 \ 7 + Asc("A") （2）Int(68.555 * 100 + 0.4) / 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(-3.14159) （2）Fix(-3.14159) （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(-459.55) （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 表达式是。 A.Sin25 B. Sin(25) C. Sin(25o) D. Sin(25*3.14/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 （6）已知A=”12345678”，则表达式Val(Left(a, 4) + Mid(a, 4, 2))的值是。

VB循环结构测试题及答案

循环结构测试题（四）：选择题 1 ：以下（）是正确的for….nex结构。 (A) for x=1 to step 10 (B) for x=3 to -3 step -3 next x (C ) for x=1 to 10 re: … Next x If I=10 then goto re 2 :下列循环语句能正常结束循环的是( (A)I=5 do I=I+1 Loop until I<0 (C) I=10 do I=I-1 Loop until I<0 3 :下面程序段的运行结果为( ) for I=3 to 1 step -1 print spc(5-I); next x (D) for x=3 to step 3 next y ) (B) I=1 do I=I+2 loop until I=10 (D) I=6 do I=I-2 loop until I=1

for j=1 to 2*1-1 print “ * n ext j print next I 4下列程序在文本框输入B ）“* * ABCD ”四个字符时*窗体上显示D 是* （* * ） * * * ***** private sub text1_cha nge() print textl.text; end sub 2:下面程序段显示=i(② for j=1 to 4 For I=1 to n=n*j print n For j=2 j to I Print Next j Next I (A) ABCD (B) (D) A (C ) AABABCABCD AB 5哪个程序段不能分别正确显示 1!,2!,3!,4!的( ABC (A) 二：填空题 1:要使下列 for I=1 to 4 n=1 for j=1 to I n=n*j F(5

VB循环语句教案设计

浙教版高一信息技术VB循环语句教学设计省象山中学章婷红 315700 zthddsina. 一、设计思想本节课以一个小游戏导入，引导学生在解决游戏问题的过程中去探索其背后隐藏的算法思想，一个基本的程序结构――循环结构。学会使用循环语句是编程的基本功，因此本课对提高学生的阅读程序和编写代码能力有着非常实在的意义。循环语句是三种基本语句中难度最大的一个，为了降低学习难度，提高学生的兴趣，我用烧杯和量筒来比喻循环语句中累加器和累加量，使学生快速地理解了累加器的作用，并能正确算出这类程序的运行结果。会读程序之后还要会写，挑选一个好的例子非常重要，我选择了算麦粒画棋盘这个实例，既有经典的计算问题又有直观的画图功能，学生学习积极性比较高。任务的设置由算麦粒的填写部分语句到画棋盘的完全自己编写代码，对学生的要求逐步加深。二、教材分析本节容选自教育《算法与程序设计》第四章第三节。循环语句是程序三种基本语句之一，是学习程序设计的基础，同时也是后面六种算法的重要组成部分。《课程标准》和《学科教学指导意见》对本课的要：理解循环语句的作用，掌握循环语句的使用方法。要求学生能从问题出发，用循环语句编写程序，实现简单的算法。《学科教学指导意见》中三种语句的总课时建议为三课时。我考虑到循环语句是三种语句中难度最大的一个，并且要学习for 和do两种语句，后面六个算法中也基本上都要用到循环语句，所以非常重要。因此循环语句我安排了2课时，本节为第1课时，主要容为for语句，第2课时为do语句及循环综合实例。三、学情分析在此之前学生已经学习了算法的流程图、VB基础知识和基本操作及两种语句：赋值语句和选择语句，基本掌握了VB的编程环境。对于for语句，我的要学生先学会读程序，即计算出程序的运行结果，尤其要比较熟练地掌握累加器的作用。在此基本上还要能根据实例编写简单的循环结构的程序。对于读程序，大部分学生能模仿老师的例题分析完成计算。而根据实例编写程序，最主要的是找

微机vb选择题

1. 下列VB程序段的基本结构是( ) If x<=12 Then y=3x Else y=4x End If A.分支结构 B.顺序结构 C.循环结构 D.树形结构答案: A 2. 关于算法，说法不正确的是（） A.算法是程序设计的灵魂 B.解决问题的过程就是实现算法的过程 C.算法独立于任何具体的语言，VB 算法只能用VB语言来实现 D.算法的作用在于记录和交流人类解决问题的思想答案: C 3. if x>=10 then y=5*x else y=4*x 以上程序段属于（） A.顺序结构 B.分支结构 C.循环结构 D.流程结构答案: B 4. 在VB中,利用（）显示和编辑程序代码。 A.工程资源管理器窗口 B.窗体设计器窗口 C.代码编辑窗口 D.属性窗口答案: C 5. 下面保存VB程序的说法正确的是（) A.只保存窗体文件 B.只保存工程文件 C.分别保存工程文件和标准模块文

件 D.分别保存窗体文件和工程文件答案: D 6. VB中，数据类型整型用（）表示。答案: A 7. 数学式(2a-b)/(2a+b)在VB中的正确写法是（） A.(2*a-b)/(2a+b B.(2*a-b)/2*a+b C.(2a-b)/(2a+b) D.(2*a-b)/(2*a+b) 答案: D 8. 在VB中，当a=2，b=3时，表达式a>b的值是（） A. True C. 0 D. 1 答案: B 9. 下列程序段属于( ) Select Case x Case 1 ="优秀" Case 2 ="良好" Case 3 ="一般" Case Else ="较差" End Select A.顺序结构 B.分支结构 C.循环结构 D.流程结构答案: B 10.

VB程序设计FORNEXT循环结构教学设计

《VB程序设计For…Next循环结构》教学设计江苏省武进高级中学现代教育技术组吴涛一、教学目标设计本课内容的学习建立在学生已经学习过第五节《分支结构》的基础上，结合程序设计的三种基本结构，重点介绍循环结构For…Next展开的。在前面几节的学习中，问题比较简单，算法也不复杂，不画流程图也能比较清楚的描述出来。引入分支结构后，需要根据条件的真假，从两条路径中选择一条执行，算法逐渐复杂，流程图愈发显得重要，所以在介绍循环结构处理问题时时一定要配以流程图介绍。本课内容设计很多程序的分析，以及讨论程序执行结果，如果在教室里面上，写板书的时间就浪费了，但如果用多媒体演示教学，学生只有简单的理性和感性认识，而学生的实践操作这一环就缺少了，相应认知效果就不明显了，利用网络课件，学生可以自己浏览学习，自主下载认知分析。所以本课必须以课本知识为依托，以网络课件为辅助，以问题为导思，来培养学生的创新精神，提高学生自主学习的能力。故制定具体的学习目标如下：认知目标：1.掌握For-Next语句的格式和功能；2.理解For-Next语句的执行过程； 3.结合分支结构的内容学会使用For-Next语句实现计数循环。能力目标：1.培养学生利用网络作为工具，并在网络环境下自主学习的能力；2.培养学生提出问题、分析问题、解决问题的综合能力和创造性思维能力。二、本课内容及重点、难点分析作为程序设计循环结构的For…Next语句，其格式、功能、执行过程、执行结果、并利用它来解决问题、编制简单程序都是本课内容。学习重点：学会For…Next的格式及其含义，理解由For…Next编写的程序的过程、结果。学习难点：For…Next的格式及其含义，由For…Next编写简单的程序。三、教学对象分析 1、高二年级的学生已经在高一时学习过在网络环境下浏览、搜索、下载等知识，但很久不接触网络，操作已经生疏了，所以事先要对学生进行实际操作的针对性训练，能把网络上的文字数据下载到本地计算机上，如把VB程序段复制粘贴到VB程序环境中执行看结果等等。 2、分支结构的内容只有上过一次课，所以要求学生事先对上次课的内容做好充分

VB循环结构测试题及答案

V B循环结构测试题及答案 This model paper was revised by the Standardization Office on December 10, 2020

for j=1 to 2*I-1 print “*”; next j print next I 4下列程序在文本框输入“ABCD ”四个字符时，窗体上显示的是（） private sub text1_change( ) print text1.text; end sub (A) ABCD (B) ( C ) AABABCABCD 5哪个程序段不能分别正确显示1!,2!,3!,4!的（）二：填空题 1：要使下列For 语句循环执行20次，循环变量的初值应当是： for k=( ① ) to –5 step –2 2:下面程序段显示（ ② ）个“*”。 For I=1 to 5 For j=2 to I Print “*”; Next j Next I 3: 下列第40句共执行了（ ③ ）次，第41句共执行（④ ）次。 * * * * * * * * * (B) * * * * * * * * * (C) * * * * * * * * * (D) * * * * * * * * * A B C D (D) A AB ABC ABCD （A ） for I=1 to 4 n=1 for j=1 to I n=n*j next j print n （B ） for I=1 to 4 for j=1 to I n=1 n=n*j next j print n (C) N=1 for j=1 to 4 n=n*j print n (D) N=1 J=1 Do while j<=4 n=n*j print n j=j+1 loop

VB中循环结构之Do While-Loop、Do Loop-While语句

课题：第6课循环结构之Do While-Loop、Do Loop-While语句第课时课型：新授授课时间教学目标知识与技能 1、了解循环的概念，理解循环结构的基本思想 2、掌握Do While Loop、Do Loop Until语句的基本结构及区别 3、理解Do While Loop、Do Loop Until语句的执行过程 4、尝试采用循环结构编写简单的程序，解决实际问题过程与方法通过讲解分析、实践探究、归纳，逐步深化对循环思想和执行过程的理。情感态度与价值观通过学习运用循环结构处理解决问题，培养学生应用循环思想解决实际问题的思路和能力。教学重点1、理解循环结构的基本思想 2、理解Do While Loop、Do Loop Until语句的执行过程教学难点根据需要采用循环结构解决问题，并提炼出Do While Loop、Do Loop Until语句的基本结构学生理解Do While Loop、Do Loop Until语句的执行过程教学准备几个以Do While Loop、Do Loop Until语句组成的不同功能的程序教学过程设计教学内容师生教学活动设计备注栏（学生笔记栏）一、设疑导入（3分钟）同学们，上节课我们学习了For Next语句，并且用For Next语句编写了“显示乘法口诀表”我们都知道要让计算机重复做一件事时，可以使用循环结构。像我们上节课当中知道乘法表是从一一得一到九九八十一的循环次数。而在现实生活中却有很多问题是事先不知道循环次数的。例如：甲同学每天都坚持写读书笔记300字，问：甲同学多长时间可以写完读书笔记30 万字？心算：一天300，十天3000,100天30000,10000天30万字。可见一件小事要是坚持做，可以完成多么宏大的工程。乙同学，也坚持每天写读书笔记300字，但是他对自己的要求要高一些，第二天总比前一天多写10个字，问乙同学多长时间读书笔记的字数可以超过30万字?心算！@#￥%&*（乱了！）像这样的例子我们事先也不知道是多少天，算起来也烦心，但是如果交给VB 先生的话，就很简单。下面让我们进入今天的主题——循环结构之Do While-Loop、Do Loop-While语句。二、探索新知（4分钟）

vb循环结构选择题

一、选择题 1、无条件转移GoTo语句后面是（A） A、标号或行号 B、输出语句 C、输入语句 D、子过程 2、无条件转移GoTo语句后面的行号或标号以字母开头，后跟（A） A、冒号 B、分号 C、逗号 D、空格 3、无条件转移GoTo语句后面的行号或标号在同一过程中（A） A、必须唯一 B、可以重复 C、以数字开头 D、以汉字开头 4、while循环结构中的条件表达式取值为（A） A、True B、False C、True或False D、0 5、while循环结构中的条件表达式取值为（A）时执行语句组 A、True B、False C、True或False D、0 6、while循环结构中与（A）匹配使用，不能单独出现 A、Wend B、end C、loop D、next 7、Do…、、loop循环结构中的循环体执行的最少次数为（A） A、0 B、1 C、2 D、3 8、前测型Do…、、loop循环结构中的循环体执行的最少次数为（A） A、0 B、1 C、2 D、3 9、后测型Do…、、loop循环结构中的循环体执行的最少次数为（B） A、0 B、1 C、2 D、3 10、Do…loop循环结构中的Exit Do语句的功能是（B） A、退出整个程序 B、退出当层循环 C、退出最外层循环 D、退出所在子程序

11、Do…loop中使用while关键字时，条件为（B）执行循环体 A、False B、True C、0 D、假或真 12、Do…loop中使用until关键字时，条件为（A）执行循环体 A、False B、True C、0 D、假或真 13、Do…loop中使用while关键字时，条件为（A）终止循环 A、False B、True C、0 D、假或真 14、Do…loop中使用until关键字时，条件为（B）终止循环 A、False B、True C、0 D、假或真 15、For…Next循环结构中（C）用来控制循环变量 A、for B、step C、next D、to 16、For…Next循环结构中step用来控制（D） A、循环变量 B、循环变量初值 C、循环变量终值 D、循环变量增量 17、For…Next循环结构中循环变量初值大于终值时,步长为（A） A、负数 B、非负数 C、正整数 D、正数 18、For…Next循环结构中循环变量初值小于终值时,步长为（A） A、负数 B、负整数 C、正整数 D、正数 19、For…Next循环结构中next后的循环变量（A） A、可以省略 B、不可以省略 C、与for后的变量名可以不同 D、与for后的变量不是同一变量 20、For…Next中循环变量初值与终值间使用的关键字是（A） A、To B、In C、goto D、private 21、For…Next中循环变量初值与终值间使用的关键字是（A）

VB循环结构测试题及答案

循环结构测试题（四）一：选择题 1以下（）是正确的for….nex结构 (A)for x=1 to step 10 (B)for x=3 to -3 step -3 next x (C ) for x=1 to 10 re: … . Next x If I=10 then goto re 2:下列循环语句能正常结束循环的是( ( A)I=5 do I=I+1 Loop until I<0 (C)I=10 do I=I-1 Loop until I<0 3:下面程序段的运行结果为() for I=3 to 1 step -1 print spc(5-I); next x (D) for x=3 to step 3 next y ) (B) I=1 do I=I+2 loop until I=10 (D) I=6 do I=I-2 loop until

for j=1 to 2*1-1 print “ *' next j print n ext I ___________________ l l _________________________________________________ 4下列程序在文本框输入B)“* * ABCD ”四个字符时，窗体上显示的是**(* * ) * * * * *_* * * * * * * * * private sub text1_cha nge() * * print text1.text; end sub 2:下面程序段显示=i(②)个“ * ”。 for j=1 to 4 For I=1 to n 5n* pri nt n For n =2j to I Print Next j Next I 3:下列第40句共执行了（ ③）次，第41句共执行（④ ）次 (A) ABCD (B) (D) A (C )AABABCABCD AB 5哪个程序段不能分别正确显示 1!,2!,3!,4!的C ABC (A) 二：填空题 1:要使下列 for I=1 to 4 n=1 for j=1 to I n=n*j FO F X 语句循环执行 pri nt n 20次，循环变量 for k=( next i ① )to -5 step — for I=1 to 4 for j=1 to I n=1 n=n*j 的初值应当是: print n n ext i (B) ABCD (D) N=1 J=1 Do while j<=4 n=n*j pri nt n j=j+1 loop

程序设计语言VB单项选择题及答案

《程序设计语言VB》单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2. 在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4. 如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5. 控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6. 若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7. 在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性 D. 语句 8. 在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled

9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10. 设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11. 下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12. 语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13. 只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14. 下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15. 下列哪个符号不能作为VB中的变量名（）。 A. timefly B. pass4 C. min4max D. R[8] 16. 在窗体内声明的变量是（）。 A. 局部变量 B. 模块变量 C. 公共变量 D. 任意变量 17. 语句Dim x As Integer作用是:将x定义为（）变量。 A. 单精度型 B. 整型

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程序的基本结构——循环结构之For-Next语句

课题：程序的基本结构——循环结构之For-Next语句第课时课型：新授备课教师授课时间教学目标知识与技能 1、了解循环的概念，理解循环结构的基本思想 2、掌握For-Next语句的基本结构的写法循环变量，初值，终值和步长。 3、理解For-Next语句的执行过程过程与方法 1.通过分析问题，能准确找出循环变量、确定循环结束条件。 2.能利用For-Next语句解决简单的问题。情感态度与价值观 1.通过编写循环结构的程序，体会循环结构的执行过程。 2.通过利用循环思想解决问题，体会循环思想的重要性。教学重点1、理解循环结构的基本思想 2、理解For-Next语句的执行过程教学难点根据需要采用循环结构解决实际问题，并提炼出for语句的基本结构学生理解For-Next语句的执行过程教学准备几个以For-Next语句组成的不同功能的程序教学过程设计教学内容师生教学活动设计备注栏（学生笔记栏）一、设疑导入同学们，请先看这个图形(在窗体左边输出显示竖行排列的1，2，3，4，5)，如果用以前学过的程序设计语言怎样来编写它的程序呢？生（稍做思考，然后回答)：使用Print语句 P rint“1” Print“2” Print“3” Print“4” Print“5” 师：同学们做得很好，，如果想要显示1-10，或是1-100的数字呢？怎么做，难道就这样顺序写下去吗？这样编写是不是太繁琐了。如果能让计算机去完成这部分重复的内容，而我们只要告诉计算机重复操作的次数就可以了，这个愿望能否实现呢？通过我们今天学习的FOR—NEXT循环语句，就可以很容易的实现这个想法。

vb循环循环章节习题

Do循环练习 2.写下列程序运行结果。(1) s=0 I=1 While i<=5 S=s+i Print s; I=i+1 Wend (2) i=10 While 7-i Print I; I=i-1 Wend (3) s=0:n=1 While n

VB循环结构程序设计答案

实验4循环结构程序设计 2014年月日三、实验步骤及结果：（实验结果截图，代码拷贝过来。） 1容易题（1）阶乘和代码 Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i, n, s, a As Integer n = Val(TextBox1.Text) s = 0 求阶乘和！！！！ a = 1 For i = 1 To n a = a * i s = s + a Next Label2.Text = "1!+2!+3!+…+" & n & "!=" TextBox2.Text = s

~~End Sub End Class （2）奇数偶数之和~~

代码 Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim m, n, i, j, k, t As Integer If IsNumeric(TextBox1.Text) And IsNumeric(TextBox2.Text) Then m = Val(TextBox1.Text) n = Val(TextBox2.Text) If m > n Then t = m : m = n : n = t For i = m To n If i Mod 2 = 0 Then j = j + i Else k = k + i End If Next Label3.Text = "偶数的和为" & j Label4.Text = "奇数的和为" & k Else MsgBox("请输入合法的数据") End If

VB循环结构测试题及答案

~~V B循环结构测试题及答案文件管理序列号：[K8UY-K9IO69-O6M243-OL889-F88688]~~

for j=1 to 2*I-1 print “*”; next j print next I 4下列程序在文本框输入“ABCD ”四个字符时，窗体上显示的是（） private sub text1_change( ) print text1.text; end sub (A) ABCD (B) ( C ) AABABCABCD 5哪个程序段不能分别正确显示1!,2!,3!,4!的（）二：填空题 1：要使下列For 语句循环执行20次，循环变量的初值应当是： for k=( ① ) to –5 step –2 2:下面程序段显示（ ② ）个“*”。 For I=1 to 5 For j=2 to I Print “*”; Next j Next I * * * * (B) * * * * * * * * (C) * * * * * * * * (D) * * * * * * * * A B C D (D) A AB ABC ABCD （A ） for I=1 to 4 n=1 for j=1 to （B ） for I=1 to 4 for j=1 to I (C) N=1 for j=1 to 4 (D) N=1 J=1 Do while j<=4

VB循环结构程序设计4

VB循环结构程序设计（二）：Do循环Do循环语句一般用于解决循环次数未知的应用问题，如求素数、求最大公约数问题等，是根据某一条件来决定是否指行循环体。在本节课中，我们要学习如下内容： ⑴Do{While|Until}…Loop循环的语法及执行过程⑵Do…Loop{While|Until}循环的语法及执行过程 ⑶Do循环变量改变及循环条件的设置⑷两种Do循环语句的差异及执行流程 ⑹Do循环变量改变及循环条件的设置（一）Do循环语句语法 1.语句形式一，先判断后执行； Do {While|Until} <条件> 语句块 [Exit Do] 语句块 Loop 2.语句形式一：先执行后判断 Do 语句块 [Exit Do] 语句块 Loop {While|Until} <条件> 功能：形式1为先判断后执行，有可能一次也不执行；形式2为先执行后判断，循环体至少执行一次；Do与Loop配对 While：当条件，即当条件为True时，执行循环体 Until：直到条件，即直到条件为True时退出循环，否则执行循环体 Exit Do：循环体遇到该语句时，退出Do…Loop循环执行Loop语句后语句注意：要防止死循环，一般在循环体外设置循环变量，在循环体内用语句不断更改循环变量的值，从而有机会使循环条件成为真或假，退出循环。若出现死循环，可以使用Ctrl+Break键结束程序的执行。有时，根据需要，要人为设置死循环，如反复让计算机产生七个1-35这的随机数。这时，若用do While(条件)语句实现，可用如下语句： Do While .T … Loop （二）Do循环流程图【举例1】求两数最大公约数、最小公倍数 Dim m, n, r, t As Integer m = Val(Text1.Text) ‘取两个数M,N n = Val(Text2.Text) … If m < n Then 指定M>N t = n n = m m = t End If

VB循环结构,教学设计

篇一：vb程序设计fornext循环结构教学设计《vb程序设计for…next循环结构》教学设计江苏省武进高级中学现代教育技术组吴涛一、教学目标设计本课内容的学习建立在学生已经学习过第五节《分支结构》的基础上，结合程序设计的三种基本结构，重点介绍循环结构for…next展开的。在前面几节的学习中，问题比较简单，算法也不复杂，不画流程图也能比较清楚的描述出来。引入分支结构后，需要根据条件的真假，从两条路径中选择一条执行，算法逐渐复杂，流程图愈发显得重要，所以在介绍循环结构处理问题时时一定要配以流程图介绍。本课内容设计很多程序的分析，以及讨论程序执行结果，如果在教室里面上，写板书的时间就浪费了，但如果用多媒体演示教学，学生只有简单的理性和感性认识，而学生的实践操作这一环就缺少了，相应认知效果就不明显了，利用网络课件，学生可以自己浏览学习，自主下载认知分析。所以本课必须以课本知识为依托，以网络课件为辅助，以问题为导思，来培养学生的创新精神，提高学生自主学习的能力。故制定具体的学习目标如下：认知目标：1.掌握for-next语句的格式和功能；2.理解for-next语句的执行过程； 3.结合分支结构的内容学会使用for-next语句实现计数循环。能力目标：1.培养学生利用网络作为工具，并在网络环境下自主学习的能力；2.培养学生提出问题、分析问题、解决问题的综合能力和创造性思维能力。二、本课内容及重点、难点分析作为程序设计循环结构的for…next语句，其格式、功能、执行过程、执行结果、并利用它来解决问题、编制简单程序都是本课内容。学习重点：学会for…next的格式及其含义，理解由for…next编写的程序的过程、结果。学习难点：for…next的格式及其含义，由for…next编写简单的程序。三、教学对象分析 1、高二年级的学生已经在高一时学习过在网络环境下浏览、搜索、下载等知识，但很久不接触网络，操作已经生疏了，所以事先要对学生进行实际操作的针对性训练，能把网络上的文字数据下载到本地计算机上，如把vb程序段复制粘贴到vb程序环境中执行看结果等等。 2、分支结构的内容只有上过一次课，所以要求学生事先对上次课的内容做好充分的复习。四、教法设计演示法：把制作的网络课件所在的网址告诉学生，引导学生通观本次课所有内容；并从旧知识中获得启迪、从而解决问题；复习、提问、新知识的讲解。成果展示法：将学生通过对网页上程序下载到vb环境中执行的正确结果在全班展示，让学生获得成功的喜悦和认同，从而激发学生后续学习的热情。五、网络教学环境设计 1、使用自己制作的主页―――vb循环结构 2、学生的计算机上面都装有microsoft visual basic软件，可以把所制作的网页上的程序复制到本地计算机上面执行。 3、通过top2000教学控制系统向全体学生转播自己的观点、依据、学习成果等。六、教学过程设计 2、播放《分支结构》的多媒体课件以供复习之用； 3、学生回答复习提问中的三个问题； 4、学生带着问题进行新课内容自主学习； 5、讲解新课，指出重点；

相关文档

vb循环结构选择题

vb循环结构程序

相关文档

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

VB循环结构测试题及答案

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

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

vb控制结构综合练习

VB循环结构测试题及答案

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

vb循环结构练习题

VB循环结构测试题及答案

最新VB循环结构练习题资料

VB循环结构测试题及答案

程序设计语言VB单项选择题及答案

VB基本学习知识及其选择,循环结构习题集

程序设计语言VB单项选择题及答案

程序设计语言VB单项选择题及答案

vb基本知识及选择、循环结构习题(1)

vb循环结构选择题共24页

vb循环结构选择题

微机vb选择题

vb循环循环章节习题

最新文档

幼儿园小班科学《小动物过冬》PPT课件教案

2021年春新青岛版(五四制)科学四年级下册 20.《露和霜》教学课件

自然教育课件

小学语文优质课火烧云教材分析及课件

(超详)高中语文知识点归纳汇总

高中语文基础知识点总结(5篇)

高中语文基础知识点总结(最新)

高中语文知识点整理总结

高中语文知识点归纳

高中语文基础知识点总结大全

超详细的高中语文知识点归纳

高考语文知识点总结高中

高中语文知识点总结归纳

高中语文知识点整理总结

高中语文知识点归纳

高中语文知识点归纳(大全)

高中语文知识点总结归纳(汇总8篇)

高中语文基础知识点整理

化工厂应急预案

化工消防应急预案(精选8篇)