一,选择题
1、如果VB环境中缺少某个窗口,一般应从主菜单__C____的下拉菜单中找到相应的激活命令。(1分)
A、编辑
B、文件
C、视图
D、调试
2、启动Visual Basic后,VB为用户建立的第一个窗体是__B____。(1分)
A、Form
B、Form1
C、窗体1
D、窗体
3、不属于一个工程文件(*.vbp)里的文件是____A__。(1分)
A、*.txt文件
B、*.bas文件
C、*.cls文件
D、*.frm文件
4、与传统的程序设计语言相比较,Visual Basic最突出的特点是__C____。(1分)
A、结构化的程序设计
B、数据处理
C、面向对象的可视化编程
D、中文支持
5、文本框中的ScrollBars属性已设置为3-Both,但却没有水平和垂直滚动条的效果,原因可能是___B___。(1分)
A、文本框中没有内容
B、文本框的MultiLine属性为False
C、文本框的MaxLength属性为0
D、文本框的Locked属性是True
6、能够盛放其他控件,而且是最基本的对象是___A___。(1分)
A、窗体
B、图像
C、标签
D、文本
7、任何控件都具有的属性是____C__。(1分)
A、Picture
B、Caption
C、Name
D、AutoSize
8、窗体上有一个标签Label1和一个命名按钮Command1,当程序运行时每单击一次命令按钮,标签就向右移动一定距离。在Command1_Click()中能完成这个功能的命令为___D___。(1分)
A、Label1.Left = 100
B、
Label1.Left = Label1.Left - 1 00
C、Label1.Move 100
D、
Label1.Move Label1.Left + 100
9、要把一个Image控件对象设置成隐藏,应设置的属性是___A___。(1分)
A、Visible
B、Enabled
C、Default
D、Cancel
10、以下___B___是正确的For …Next结构。(1分)
A、
For x=1 To Step 10 …Next
B、
For x=3 To -3 Step -3 …N
x ext x
C、
For x=1 To x=10 …Next x
D、
For x=3 To 10 Step 3 …Ne xt y
11、能产生[10,32]之间随机整数的函数表达式为___B___。(1分)
A、Int(Rnd*22)+10
B、Int(Rnd*23)+10
C、Int(Rnd*22)+11
D、Int(Rnd*23)+11
12、程序如下:k = 0: Do Until k > 10: k = k + 1: Loop的循环体执行次数是___C___。(1分)
A、9
B、10
C、11
D、无数次
13、若要使标签控件显示时,不覆盖其背景内容,应设置的属性是___C___。(1分)
A、Forecolor
B、BackColor
C、BackStyle
D、BorderStyle
14、
Print Format(1234.234, "###.#####"); Format(1234.234, "######## .##")的显示结果是___A___。(1分)
A、1234.234 1234.23
B、123.23400 1234.234
C、123.23400 1234.23
D、1234.2341234.234
15、运行程序:
x = 2: For i = 1 To 10 Step 2: x = x + i: Next,x的值是___B___。(1分)
A、26
B、27
C、38
D、57
16、Cls方法可以清除窗体或图片框中的__C____。(1分)
A、在设计阶段使用Picture设置的
背景位图
B、在设计阶段放置的控件
C、在运行阶段产生的图形和文字
D、以上全部内容
17、如果想用Print方法将计算结果显示在窗体上,则必须保证属性值为True 的属性是___C___。(1分)
A、Enabled
B、Apperance
C、AutoRedraw
D、Moveable
18、窗体文件的扩展名__D____。(1分)
A、.bas
B、.vbp
C、.exe
D、.frm
19、以下关于MsgBox的叙述中,错误的是___D___。(1分)
A、MsgBox函数返回一个整数
B、通过MsgBox函数可以设置信息框中图标和按钮的类型
C、MsgBox过程语句没有返回值
D、MsgBox函数的第一个参数是一个
整数,该参数只能确定对话框中显示的
按钮数
20、能够通过标准工具栏打开的窗口是___C___。(1分)
A、代码窗口
B、设计器窗口
C、属性窗口
D、立即窗口
21、在下列逻辑表达式中,逻辑值为"真"的是__A____。(1分)
A、Not (1 > 2)
B、Not (3 + 4 < 4 + 6)
C、1 > 2 Or 2 > 3
D、2 > 1 And 3 < 2
22、下面关系运算中,输出结果为“True”的是___C___。(1分)
A、"1" + 2 = "12"
B、"1" + "2" = "3"
C、"1" & 2 = "12"
D、"1" & "2" = "3"
23、执行程序段:
Dim axs As Integer: axs% = 232: axs = 232.32: Print axs% ; axs,输出的结果是__B____。(1分)
A、232 232032
B、232 232
C、232.32 232.32
D、显示出错信息
24、假设变量iVar是一个整型变量,则执行赋值语句
iVar = "2" + "3" 之后,变量iVar 的值是__D__。(1分)
A、2
B、3
C、5
D、23
25、假设变量iVar是一个整型变量,则执行赋值语句iVar = "2" + 3之后,变量iVar 的值是___C___。(1分)
A、2
B、3
C、5
D、23
26、用户自定义数据类型时,其成员不能是___B___。(1分)
A、定长字符串和数组
B、变长字符串和数组
C、货币型和日期型
D、变长字符串和货币型
27、执行程序段:
a$ = "Visual Basic Programing": b$ = "Quick": c$ = b$ & UCase(Mid$(a$, 7, 6)) & Right$(a$, 11),变量c$的值为___D___。(1分)
A、Visual BASIC Programing
B、Quick Basic programing
C、QUICK Basic Programing
D、Quick BASIC Programing
28、某中心选拔身高T超过1.7米且体重W小于52.5公斤的学员,能正确表示该条件的布尔表达式是___C___。(1分)
A、T >= 1.7 And W <= 52.5
B、T <= 1.7 Or W >= 52.5
C、T > 1.7 And W < 52.5
D、T > 1.7 Or W < 625
29、m、n是整数,且n>m,在以下4个语句中,能将x赋值为一个m~n之间(含m ,n)的任意整数,即满足m≥x≥n的是___B___。(1分)<此题目有
错误,理论上B正确>
A、x = Int(Rnd * n) + m
B、x = Int(Rnd * (n–m + 1)) + m
C、x = Int(Rnd * m) + n
D、
x = Int(Rnd * (n-m)) + m
30、执行语句Print Format(32548.5, "###,##0.00"),输出结果是____D__。(1分)
A、32548.5
B、32,548.5
C、032,548.50
D、32,548.50
31、下列选项中,__D____不是字符串常量。(1分)
A、"你好"
B、""
C、"True"
D、#False#
32、下列不合法的常量形式是__C___。(1分)
A、"1O0"
B、100.0
C、1OE+0.5
D、Const G = 23 + 12
33、表达式Val(".123E2CD")的值是____B__。(1分)
A、.123
B、12.3
C、O
D、.123E2CD
34、下列符号中,属于Visual Basic合法变量名的是___A___。(1分)
A、x23
B、8xy
C、END
D、X8[B]
35、下列符号常量的声明中,__C____是不合法的。(1分)
A、Const a As Single = 2.6
B、Const a As String = "ab"
C、
D、Const a = "OK"
Const a As Double = Sin(1)
36、表达式"Turbo" + "C" > "True" + "Basic"的值是___A___。(1分)
A、True
B、False
C、Null
D、出错信息
37、执行MsgBox 123 + 123,信息框中可以出现__C___。(1分)
A、123 + 123
B、123123
C、246
D、显示出错信息
38、执行程序段:
m$ = "ABC": n$ = "abc": k$ = LCase$(m$): j$ = UCase$(n$) : Print Asc(k$ + j$),输出的结果是___D___。(1分)
A、abcabc
B、ABCABC
C、65
D、97
39、Single(单精度)型数据占___B___个字节。(1分)
A、2
B、4
C、8
D、10
40、变量未赋值时,数值型变量的值为___A___。(1分)
A、O
B、空串""
C、Null
D、没任何值
41、如果在图片框Picture1中装入一个图形,为了清除该图形(不删除图片框),应采用的方法是___C___。(1分)
A、选择图片框,在属性窗口中选择
Picture属性条,然后按回车键
B、选择图片框,然后按Del键
C、执行语
句Picture1.Picture = LoadPict ure("")
D、执行语
句Picture1.Picture = ""
42、Visual Basic的编程机制是___C___。(1分)
A、面向过程
B、面向对象
C、事件驱动
D、可视化
43、设n=10,执行n=IIF(n=3,n,-n)后,n 的值为___B__。(1分)
A、10
B、-10
C、3
D、-3
44、除了系统默认的工具箱之外,还可以通过___B___方法来增加控件。(1分)
A、执行“文件”菜单中的“添加工程”命令
B、执行“工程”菜单中的“部件”命令
C、在工具箱处执行其快捷菜单中的“添加选项卡”命令
D、执行“工程”菜单中的“添加窗体”命令
45、在设计工作状态,当双击窗体上任何一个控件时,打开的窗口是___D___。(1分)
A、窗体布局窗口
B、窗体设计窗口
C、属性窗口
D、代码窗口
46、有一个命令:Text1= "欢迎您!",表达方式中省略了对象的___B___。(1分)
A、方法
B、属性名
C、对象名
D、标题
47、窗体设计器是用于设计___D___。(1分)
A、窗体的代码
B、对象的属性
C、应用程序的代码
D、应用程序的界面
48、以下关于MsgBox的叙述中,错误的是___D___。(1分)
A、MsgBox函数返回一个整数
B、通过MsgBox函数可以设置信息框中图标和按钮的类型
C、MsgBox过程语句没有返回值
D、MsgBox函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数
49、在程序运行模式能够__A___。(1分)
大学VB考试题库 一、单项选择题 1、与传统的程序设计语言相比,Visual Basic最突出的特点是()。 A、结构化程序设计 B、程序开发环境 C、事件驱动编程机制 D、程序调试技术 2、赋值语句:a=123& MID("123456",3,2)执行后,a变量中的值是()。 A、"12334" B、123 C、12334 D、157 3、保存一个工程至少应保存两个文件,这两个文件分别是(B)。 A、文本文件和工程文件 B、窗体文件和工程文件 C、窗体文件和标准模块文件 D、类模块文件和工程文件 4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是(C)。 A、https://www.wendangku.net/doc/c12679359.html,="VisualBasic窗体" B、Form1.Title="VisualBasic窗体" C、Form1.Caption="VisualBasic窗体" D、Form1.Text="VisualBasic窗体" 5、为了装入一个VisualBasic应用程序,应当(D) A、只装入窗体文件(.frm) B、只装入工程文件(.vbp) C、分别装入工程文件和标准模块文件(.bas) D、分别装入工程文件、窗体文件和标准模块文件 6、赋给一个数组的数据类型一定要(A)。 A、相同 B、不相同 C、两可 D、都不对 7、下面正确的赋值语句是(C)。 A、x+y=30 B、y=π*r*r C、y=x+30 D、3y=x 8、VisualBasic 6.0集成环境的主窗口中不包括(C)。
A、标题栏 B、菜单栏 C、状态栏 D、工具栏 9、以下叙述中错误的是(C)。 A、Visual Basic 是事件驱动型可视化编程工具 B、Visual Basic应用程序不具有明显的开始和结束语句 C、Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性(计时器) D、Visual Basic中控件的某些属性只能在运行时设置 10、要使Print方法在Form_Load事件中起作用,要对窗体的(C)属性进行设置。 A、Backcolor B、ForeColor C、AutoRedraw D、BackStyle 11、若要使命令按钮不可操作,要对(A)属性进行设制。 A、Enabled B、Visible C、BackColor D、Caption 12、以下叙述中错误的是(B)。 A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、在设计VB程序时,窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。 D、一个工程默认的启动对象是Form1 13、Cls方法可以清除窗体或图片框中的(C)内容。 A、在设计阶段使用Picture设置的背景位图 B、在设计阶段放置的控件 C、在运行阶段产生的图形和文字 D、以上均可 14、设x=3,y=5,则以下表达式值为真的是 (C) A、(-3+5>x) And (y>0) B、(x<0) Eqv (y>0) C、(x>y) Or (y>0) D、x>=y And y>10 15、为了防止用户随意将光标置于控件之上,应将进行(D)设置。 A、将控件的TabIndex属性设置为0
所有填空题 1、VB6.0是运行于______操作系统环境下的一个快速可视化程序开发工具,用它进行程序设计,有两个基本的特点,即______和______。 答案:1:Windows9x/NT#Windows9x/NT#Windows9x\NT#Windows9x\NT#Windows9x#Windows NT#Windows9x#WindowsNT#windows9x/NT#windows9x/NT#windows9x\NT#windows9x\NT#windows9x#windows NT#windows9x#windowsNT 2:事件驱动编程#可视化设计 3:可视化设计#事件驱动编程 等级:1难度:1 知识点:VB知识点/VB简介 2、VB是一种面向______的可视化编程语言,它采用______的编程机制。 答案:1:对象 2:事件驱动 等级:1难度:1 知识点:VB知识点/VB的编程环境 3、在VB集成开发环境中,运行应用程序的方法有两种:______或______。 答案:1:编译运行模式#解释运行模式#编译运行#解释运行 2:解释运行模式#编译运行模式#解释运行#编译运行 等级:1难度:1 知识点:VB知识点/VB简介 4、VB的对象主要分为______和______两大类。 答案:1:窗体#控件 2:控件#窗体 等级:1难度:1 知识点:VB知识点/VB的对象、属性、方法和事件 5、VB中,用来描述一个对象的状态或特征的量称之为对象的______。 答案:1:属性 等级:1难度:1 知识点:VB知识点/VB的对象、属性、方法和事件 6、在VB中,最基本的对象是______。 答案:1:窗体 等级:1难度:1 知识点:VB知识点/VB的对象、属性、方法和事件 7、一个对象响应某个事件后所执行的操作是通过一段程序代码来实现,这段程序代码称______。 答案:1:事件过程 等级:1难度:1
一、单选题(每小题1分,共99 分) 1. 假定Picture1 和Text1 分别为图片框和文本框的名称,下列语句中不正确的是______ 。 A Picture1.Print 25 B Text1.Print 25 C Print 25 D Debug.Print 25 2. 在Visual Basic 中要将一个窗体从内存中释放,应该使用以下语句中的______ 。 A UnLoad B Stop C Close D Hide 3. 如果组合框ComBo1中已有10项数据,应使用语句______将数据"Mydata"插入到第5项。 A ComBo1.Insert "Mydata", 4 B ComBo1.Insert "Mydata", 5 C ComBo1.AddItem "Mydata", 5 D ComBo1.AddItem "Mydata", 4 4. 如果列表框List1中已有10项数据,应使用语句______将数据"Mydata"插入到列表框的第3项。 A List1.Insert "Mydata", 3 B List1.AddItem "Mydata", 2 C List1.AddItem "Mydata" ,3 D List1.Insert "Mydata", 2 5. 语句If x=1 Then y=1,下列说法正确的是____________。 A x=1和y=1为赋值语句 B x=1为赋值语句,y=1为关系表达式 C x=1为关系表达式,y=1为赋值语句 D x=1和y=1均为关系表达式 6. 删除列表框中指定的项目所使用的方法为______ 。 A Move B Clear C Remove D RemoveItem 7. 不论何控件,共同具有的属性是______________。 A ForeColor B Name C Text
题目描述 418 VB中,(B)控件对象在运行时一定不显示。A:Label B:Timer C:TextBox D:CommandButton 419 VB中,将Interval属性值设置为(D)时,计时器控件每隔5秒钟产生一个计时器事件。A:5 B:500 C:300 D:5000 420 VB中,可以弹出一个对话框的函数是(D)A:Int() B:Rnd() C:V al() D:MsgBox() 421 VB中,Rnd(B)函数的值不可能是(B)A:0 B:1 C:0.1234 D:0.00005 422 VB中,Int(5.9)的返回值是(C)A:3 B:4 C:5 D:6 423 "下面程序的运行结果是(B) Private Sub Command1_Click(B) Text1.Text = ""123"" Text2.Text = ""321"" a = Text1.Text + Text2.Text Print a End Sub" A:444 B:123321 C:321123 D:132231 424 VB中正确的循环语句是(B)A:For x=1 to step 10 B:For x=1 to 10 step 2 C:For x=1 to 10 step -1 D:For x=10 to 1 425 "下面程序的运行结果是(B) Dim a As Integer, b As Integer a=6 b=15 S=1+(a*b)/2 Print S" A:6 B:46 C:15 D:45 426 "VB中,执行下面的程序段后,b的值为(A) a = 100 b = 20 a = a + b b = a - b" A:100 B:120 C:20 D:80 427 "x=10 If x<=12 then y=2*x+6 Else y=x/2 End If 上述程序段中y的值是(A)" A:26 B:25 C:10 D:5 428 "下列程序段的运行结果是(C) x=3 Select Case x Case 5 Print ""优秀"" Case 4 Print ""良好"" Case 3 Print ""通过"" Case Else Print ""不通过"" End Select" A:优秀B:良好C:通过D:不通过 429 执行Do……Loop Until语句时(B)A:先判断后循环B:先循环后判断C:顺序执行D:其余说法都不对 430 VB中,定义a为整型变量的语句是(A)A:Dim a As Integer B:Dim a As Single C:Dim a As Date D:Dim a As Byte 431 对VB窗体中控件的操作错误的是(A)A:单击Delete键一次只能删除一个控件B:单击Delete键一次可以同时删除多个控件C:按住Shift键,依次单击每个要选择的控件,可以同时选中多个控件D:按住Ctrl键,依次单击每个要选择的控件,可以同时选中多个控件 432 VB中,多个语句写在同一行时,每个语句之间用(B)符号分隔。 A:, B:: C:. D:; 433 VB中,一条语句要分行书写,用(C)符号作续行符。A:“-”B:“+”C:“_” D:“…” 434 "下列VB程序段执行后x的值为(B)a=8 If a<9 Then x=9 End If Print x" A:8 B:9 C:0 D:1 435 在VB中,表达式9\4的结果是(B)A:2.5 B:2 C:3 D:40 436 在VB中,Int(23.512)的值为(D)A:-23 B:-24 C:24 D:23 437 VB中,定义a为实型变量的语句是(B)
程序填空〖第1题〗『程序填空』(1分)(题号:59) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- ' 功能:输入一个数,若大于0,则显示"+";若小于0, ' 则显示 "-";若等于"0",则显示"零"。 '------------------------------------------------------- Private Sub Command1_Click( ) x = Val Select Case x '**********SPACE********** Case is > 0 = "+" Case Is < 0 '**********SPACE********** = "-" '**********SPACE********** Case is = = "零" End Select End Sub 答案: 1). Case Is > 0 2). = "-" 3). Case 0 或 Case Else 或 Case Is = 0 〖第2题〗『程序填空』(1分)(题号:60) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能:输入任何一个英文字母x, ' 若x的值为"a","c","d-f" ,则显示x的大写字母; ' 若x的值为"m","o","p-z",则显示x的小写字母; ' 若x的值为其它的值,则显示xa(如输入的X的值是g,则显示ga)。 '------------------------------------------------------- Private Sub Command1_Click() x = '**********SPACE********** 【】 '**********SPACE********** Case 【】 = UCase(x) Case "m", "o", "p" To "z" = LCase(x) Case Else '**********SPACE********** 【】 End Select End Sub 答案: 1). Select Case x 2). "a", "c", "d" To "f" 3). = Trim(x) + "a" 或 = x + "a" 〖第3题〗『程序填空』
VB顺序结构及选择结构练习 一、单选题 1.在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程 Private Sub Command1_Click() b=5 c=6 Print a = b + c End Sub 程序运行后,单击命令按扭,其结果为(D) A)a=11 B)a=b + c C)a= D)False 2. 在窗体上画一个命令按扭(名称为Command1),然后编写如下事件过程 Private Sub Command1_Click(D) a=11 b=5 c=6 Print a = b + c End Sub 程序运行后,单击命令按扭,其结果为() A)a=11 B)a=b + c C)a= D)True 3.以下语句的输出结果是(B) a = Sqr(3) Print Format(a,”$$#### : ###”) A)$1.732 B)$$1.732 C)$1732 D)$$00001.732 4.以下程序段的输出结果是(D) a = Sqr(3) b = Sqr(2) c =a>b Print c A)-1 B)0 C)False D)True 5.以下语句的输出结果是(C) Print Format$ (32548.5,”000,000.00”) A)32548.5 B)32,548.5 C)032,548.50 D)32,548.50 1.假定有如下语句: answer$=MsgBox(“String1”,, “String2”, “String3”,2) 执行该语句后,将显示1个信息框,此时如果单击“确定”按扭,则answer$的值为(D)A)String1 B)String2 C)String3 D)1
序号题干答案 1 VB是一种面向对象的程序设计语言。对 2 VB通过窗体管理构成应用程序的各类文件的集合。错 3 VB支持弹出菜单,所谓“弹出菜单”是指单击鼠标后打开的 菜单。 错 4 Visual Basic程序的运行,仅能从某一窗体启动,如Form1 窗体。 错 5 Visual Basic程序的运行可以从Main()过程启动,也可以从 某 个窗体启动。 对 6 Visual Basic提供的几种标准坐标系统的原点都是在绘图区 域 的左上角,如果要把坐标原点放在其它位置,则需使用自定 义 坐标系统。 对 7 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件 任务. 错 8 Dim i, j as integer 表明i和j都是整型变量。错 9 Single 和Double型用于保存浮点数,在VB中定义单精度浮 点8位 ,双浮点16位. 错 10 Visual_basic是合法的变量名。对 11 可以用"&","+"合并字符串,但是用在数值变量时,"+"可能 会 将两个数值加起来。 对 12 某一过程中的静态变量在过程结束后,静态变量及其值可以 在 其它过程中使用。 错 13 全局变量用global或public关键字声明,且仅在通用声明 处可 以定义。 错 14 如果某子程序add用public static sub add()定义,则该子 程 序的变量都是局部变量。 错
15 设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2*A>C 的值是False。 错 16 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来 定义. 错 17 在VB中,运算 "ABCDE123A" Like "[a*a] " 的结果是True。错 18 在VB中,运算 "D" Like "[! A-Z]" 的结果是True. 错 19 在VB中,运算"ABA"Like"[a?a]"的结果是False。对 20 MsgBox()函数建立的消息框能显示信息也能输入信息。错 21 MsgBox()函数建立的消息框能显示信息也能输入用户的信 息. 错 22 Picture图片框既可用来显示图片和绘制图形,也可用Print 方 法来显示文字. 错 23 在框架控件内的几个单选按钮中,可有一个或多个单选按钮 的Value属性为True。(正确答案:只有一个) 错 24 *.bmp格式的图片,如果在autosize设为False的图片框, 它会 以图片框大小完整显示出来。 错 25 “菜单编辑器”中至少要填“名称”和“标题”这两个框, 才 能正确完成菜单栏的设计。 错 26 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 “工程”/“部件”载入或移去。 对 27 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始 角、 终止角的大小相关,而且与起始角、终止角的正或负相关。 对 28 Frame控件是一种容器控件,因此它可有它自己的坐标系. 错 29 Function函数有参数传递,并且一定有返回值。错 30 Image控件不能用作容器使用。对 31 Image控件使用的资源比Picture控件使用的多. 错 32 Line(500,500) – (2500,2500) 命令能够正确画出矩形。错 33 List1.Clear是清除List1的全部列表项,所以Clear是对象 的方法。 对 34 move方法的一般形式是:对象名.move A,B[,C,D],其中A指 Left ,C 指width. 错
《VB选择结构程序设计》教学设计 山东省临清市第二中学吴焕英 【案例背景】 高中信息技术新课程的实施,其课程目标定位于全面提升学生的信息素养,其课程的设置从知识与技能、过程与方法、情感态度与价值观三个方面实施这个课程目标。然而,众多的老师实施新课程后发现:教学内容的范围比以前更广泛了、课时远远不够、教学软硬件资源缺乏等诸多问题。因此,如何更有效地开展新课程教学,成为老师们迫切需要解决的问题。本教学案例从学生的实际情况出发,根据现有的数学、英语基础,结合简单的生活实例,引导学生进行探索式学习,问题从简单的英语口语入手,过渡到课题的研究学习。原本枯燥无味的VB程序设计,在简单、形象的生活实例下,激发了学生的思考与探索思维。这样的教学案例,值得我们反思研究、总结与完善。 【教材分析】 算法与程序设计是普通高中信息技术课程中选修模块之一,本模块旨在使学生进一步体验算法思想,了解算法和程序设计在解决问题过程中的地位和作用;能从简单问题出发,设计解决问题的算法,并能初步使用一种程序设计语言编制程序实现算法解决问题。 “选择结构”是教育科学出版社出版的高级中学课程标准实验教科书、算法与程序设计第二章第三节的内容,共分三课时,本课为第二课时。主要内容是用选择结构编写简单的程序解决具体问题。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上,理解了顺序结构的前提后提出的。 通过本课的学习,可以促进学生对问题解决方法和思想的理解与掌握,从而提升学生的问题解决能力,让学生在按照一定的流程解决问题的过程中,去体会和理解程序设计的思想,而且也为多分支选择结构的学习打下基础。 【学生分析】 高一的学生在数学课中已经有了算法和程序设计的基础,学生对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平,在教师的有效引导下,有能力进行自我探究,如果用一种学生比较感兴趣的,能够贴近学生日常生活的例子来分析选择结构的话,那么学生会比较感兴趣。 【教学目标分析】 通过教师引导学生去探究、发现技术背后所蕴含的技术价值和技术思想,使其获得知识与技能的同时,理解和掌握过程与方法,这样才能够学会认知,学会做事,乃至学会生活,提高终生学习的能力、分析解决问题的能力,满足其终身发展的需要,成为适应信息社会的公民。 因此本节课的目标有以下几项:
VB测验选择题真题精选
————————————————————————————————作者:————————————————————————————————日期:
VB考试真题精选,考前必备神器20 开通黄钻 21, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。(1分) A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量,在整个程序运行中一直存在。(1分) A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。(1分) A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时,不能使用( d )关键字。(1分) A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量,称为( b )。(1分) A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时,应该将该语句放在( b )。(1分)
VB 编程基础判断题(0错误 1正确) 1. Excel 可以处理电子表格数据,所以它是程序设计语言。答案: 0 2. 每种程序设计语言都有自己的语法和规则。答案:1 3. 使用VB 设计程序时,可以不用创建工程。答案:0 4. 通常状况下,我们会通过两种方法修改对象属性,一种是利用属性窗口,另一种是利用代码。答案:1 5. 在 VB 开发环境中,如果对象窗口工具箱工程资源管理器属性窗口和窗体布局窗口等被关闭,可以通过“视图”菜单再次打开。答案:1 6. 在VB 窗体中添加第一个标签控件后,该标签控件的Caption 标题属性设置的默认值是“command1”。答案:答案:0 7. 在VB 中,可以借助键同时选中多个对象。答案:1 8. 在VB 中,调整选中的多个控件的大小和位置时,要最后选中作为调整依据的控件。答案:1 9. 在VB 中,一个程序可能包含若干个不同的文件,但一定不包括工程文件和窗体文件。答案:0 10. 在VB 中,一个程序中的工程文件扩展名为vbp ,窗体文件扩展名为frm。答案:1 11. 在VB 中,要想让同一窗体上的3 个按钮控件的大小相同,可以使用“格式”菜单中的“统一尺寸”子菜单的“两者都相同”命令。答案:1 12. 在VB 中,标签一般用来显示信息,文本框用来接受用户输入的信息。答案:1 13. 在VB 程序中,被使用的窗体和控件统称为对象。答案:1 14. 在VB 中,属性窗口通常显示的是当前被选中的对象的具体属性。答案:1 15. 在VB 中,对象的“名称”和“Caption”是两种相同的属性。答案:0 16. 在VB 中,标签和命令按钮显示的文字由其“Text”属性确定,文本框中显示的文字由其“Caption”属性确定。答案:0 17. 在VB 中我们可以接触两种程序界面,一种是窗体中不带网格点的设计界面,另一种是带网格点的运行界面。答案:0 18. 属性窗口有两个选项卡,一个是按字母排序别一个是按类进行排,但都是用来显示某一对象的各种属性的。答案:1 19. 在VB 中,语句命令中的符号,都必须是英文字符。答案:1 20. 在VB 中,一个对象只能响应一种事件。答案:0 21. VB 的代码窗口包括对象名框事件过程名框和代码编辑区3 部分。答案:1 22. 在VB 中,125 是数值型数据,"125"也是数据型数据。答案:0 23. 在VB 中,可以使用“User & name”作为变量名。答案:0 24. 在VB 程序中,使用Option Explicit 后,如果再使用未加声明的变量,运行程序时会出现错误提示。答案:1 25. 在VB 中CStr 函数可以将数值型表达式的值转换成对应的字符串。答案:1
填空题 第1题表达式 1 and 0的值 ______________________ 答案: False 第2题把"Visual Basic程序设计"添加到列表框 lstBooks____________________________ 答案: lstBooks.AddItem "Visual Basic 程序设计" 第3题 For k=35 to 0 step 3 next k 语句的循环次数是_______________________答案:0 第4题 Val("123.55ab456")的值是多少 _____________________________ 答案:123.55 第5题每隔定时器控件的Interval属性值时间间隔,单位为毫秒,定时器会触发一次 ________________________事件 答案:Timer 第6题表达式(-3) And 8 的值为 _______________________. 答案:True 第7题 Print "x=" & (2=4) 的结果为 ________________________. 答案: x=False 第8题要使同一类型控件组成一个控件数组,必须要求_______________________. 答案: Name 相同或名称相同 第9题循环语句FOR K=1 TO 10 STEP –1控制的循环次数为___________________. 答案: 0 第10题设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为______________. 答案: False 第11题声明定长为10个字符变量Sstr的语句为______________________. 答案: Dim Sstr as String*10 或 Sstr as String*10 第12题在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是 ____________. 答案: VAL 或 Cint 第13题在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer, 则strVar、intVar与sngVar的数据类型分别是Variant、Variant和_____________________. 答案: Integer 第14题滚动条控件主要支持两个事件,它们是scroll和____________________事件. 答案: change 第15题所有控件都具有的共同属性是 ____________________属性. 答案: name 〖第16题〗Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为 ______. 答案: Picture1 〖第17题〗A和B同为正整数或同为负整数的VB 表达式为________________. 答案: A=INT(A)★AND★ B=INT(B)★ AND ★ A*B>0 〖第18题〗变量min@表示_______________类型的变量. 答案:货币数据变量或货币 〖第19题〗表达式 32\7 MOD 3^2 的值是____________________. 答案: 4 〖第20题〗把整型数1赋给一个逻辑型变量,则逻辑变量的值为___________________. 答案: True 〖第21题〗求x与y之积除以z的余数的VB表达式为_________________________. 答案: x*y★Mod★z 〖第22题〗以图片框Pic1的中心位置为圆心,以700为半径在Pic1上画一个圆的方法是 ______ 答案: pic1.Circle (pic1.width/2,pic1.height/2),700 〖第23题〗要使一个按钮设为默认按钮,应把此按钮的_____________属性的值设为True. 答案: Default 〖第24题〗在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的______________属性的值设置为True. 答案: MultiLine 〖第25题〗设置计时器控件只能触发 ____________________事件. 答案: timer 〖第26题〗VisualBasic6.0用于开发 ____________________环境下的应用程序. 答案: WINDOWS
卓资县职业中学实训学案 班级_____姓名_________科目: VB 程序设计主备:闫森审核:日期: 课题:选择结构程序设计实际应用(2) 实验目的: 1、掌握If语句的使用。 2、掌握Select Case语句的使用。 实验内容与过程 说第一步:独学(请同学们独立完成以下任务) 知识回顾: 1、单分支条件语句格式:①IF <表达式> THEN 语句块 End If ②IF <表达式> THEN 语句块 2、双分支条件语句格式: IF <表达式> THEN 语句块1 Else 语句块2 End If 任务1(基本设计题) 题目:一般网络游戏只允许成年人进入,你来编写一个根据 明 : 本 节 课 只 完 成 任 务 1 和 任 务 2 的 题 目 要 求 及 问 年龄判断是否成年的小程序。(规定成年人年龄>18周岁) 请你根据题意,利用双分支条件语句格式2种方法(单行和 多行)编写程序代码,并上机测试。 设计界面如下: 编写程序代码:
题 。课后作业下次实训务必完成。第二步:合作(问题)探究(对学、群学) 任 务 2. ( 提 高 设 计 题) 在 “ 神州号”程序中,需要判断飞船飞行状况。当飞船速度继续 加大时,飞船将达到第二宇宙、第三宇宙速度(见下表)试 编写程序,输入不同的飞船速度V,判断它的各种飞行状况, 显示出来 飞船速度V 单位 (km/s) 飞行状况情况 程序界面如下: 补充程序代码: Private Sub command1_click() Dim V AS single, n AS integer V= VAL(InputBox(“SPEED=”,”输入速度”)) <=V< 1--Move around Earth飞船绕 地球做匀速圆周运动 1 11 19<=V< 2--Move around SUN飞船离开 地球的控制 ,围绕太阳转 2 V> 3--Break gravitate of solar 飞船挣脱太阳引力飞出太阳 系 3 其它警告出错信息0
1.不论哪种控件,共同具有的属性是Name 2.要使某控件在运行时不可显示,应对其设置的属性是Visible 3.要是窗体在运行时不可改变窗体的大小和没有最大化、最小化按钮,需设置的属性是Borderstyle 4.当程序运行时,系统自动执行启动窗体的事件过程是Load 5.要判断在文本框中是否按下了Enter键,应在文本框的Keypress 事件中判断 6.要使标签控件显示时不覆盖其背景内容,要对其设置的属性是Backstyle 7.复选框的Value属性为0时,表示复选框未被选中 8.将数据项“语文”添加到列表框(list1)中成为第一项应使用的语句是“List1.Addltem”“语文”,“0” 9.执行下面的程序,列表框中的数据项有“1,3” Sub Form_Click() For i = 0 To 4 List1.AddItem i Next For i = 0 To 2 List1.RemoveItem i Next End Sub 10.如果列表框(list1)中没有被选定的项目,则执行List1.RemoveItem List1.ListIndex语句的结果是 D A.移去第一项 B.移去最后一项 C.移去最后加入列表的项 D.其他都不对 11.下列可以把当前目录下的图形文件Pic1.jpg装入图片框Picture1中的语句为“Picture1. Picture=Load Picture(“”Pic1.jpg””)” 12.假定在图片框Picture1中装入了一个图形,为了清除该图形(不是删除图片框)应采用的正确方法是“执行语句Picture1. Picture =Load Picture(“””’”)” 13.当组合框的Style属性值设置为2时,其为下拉式列表框 14.要使定时器无效应将Interval属性取值为0 15.假定定时器控件的Interval属性为1000,Enable属性为Ture,并且有下面的事件过程 Private Sub Timer1_Timer() Beep End Sub 计算机将发出Beep声的次数为 A.1000次 B.0次 C.1次 D.其他都不对 16.下面语句能正确地把列表框list1从1数起的第4项的内容设置为“aaaa”的是“List1.List(3)=””aaaa””” 17. 下面语句能正确地把列表框list1从1数起的第3项的内容设置为“aaaa”的是“List1.List(2)=””aaaa””” 18.在窗体上画一个文本框,为了在程序运行后隐藏该文本框,应使用的语句为Text1.Visible=False 19.在窗体上画一个文本框Text1和一个标签Label1,要求程序运行后,如果在文本框输入字符,则立即在标签中显示相同的内容,一下可以实现上述操作的事件过程的是 “Private Sub Text1_Change() Lebel1.Caption = Text1.Text
vb 练习题及答案 【篇一:vb 习题(含答案)】 lass=txt>1 、vb 程序中,通常不会产生错误提示的是( )。(1 分) a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段,双击窗体上任一空白处,打开的窗口是( )。(1 分) a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中,正确的说法是( )。(1 分) a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能,可以通过按下功能 键( )得到帮助。( 1 分) a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。( 1 分) a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。( 1 分) a、0 b 、1 c、2 d 、5 7、文本框没有( )属性(1 分) a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。( 1 分) a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中,定义x 为变体型变量的是( )。(1 分) a、dim x as double b 、dim x c、dim x! d 、x%=23
25、设有如下变量声明:dim testdate as date ,为变量testdate 正确赋值的表达方式是( )。(1 分) a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句,a=beijing :b=shanghai :print a,b 对其输出结果的描述中,正确的是( )。(1 分) a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a :a=b: b=t 执行后( )。(1 分) a、a 值为3,b 值为3 b 、a 值为3,b 值为5 c、a 值为5,b 值为5 d 、a 值为5,b 值为3 28、下列语句中,正确的是( )。(1 分) a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后, y 结果是( )。(1 分) a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) , 将显示一个输入对话框,在对话框的输入区中显示的信息是( )。(1 分) a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮,先后在两个输 入对话框中输入123 和321 ,窗体显示的内容是( )。(1 分) a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后,所产生的消息框的标题是 ( )。(1 分) a、aaa b 、bbb
1、下列叙述中,错误的是( A )。(1分) A、一条语句可以分为多行书写,但要在上行末加上VBCrLf B、在同一行上书写多条语句,应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。(1分) A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序,应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。(1分) A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中,正确的是( C )。(1分) A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。(1分) A、事件 B、属性 C、方法 D、变量 6、下列叙述中,不正确的叙述是( C )。(1分) A、注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。(1分) A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。(1分) A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后,系统为用户新建的工程起一个名为( A )的临时名称。(1分) A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时,双击窗体中的对象后,Visual Basic将显示的窗口是( C )。(1分) A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。(1分) A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件,可以利用“工程”菜单中的( B )命令(1分) A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口,一般应该从主菜单的( D )下拉菜单中寻找并打开。(1分) A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。(1分) A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时,如果窗体上没有显示网格会感到不方便,( c )可以使网格出现。(1分) A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中,某一事件对应的程序叫( b )。(1分)
目录 一、填空题 (2) 二、选择题 (5) 三、程序填空 (18) 四、阅读程序写结果 (25) 五、编程题 (31) 六、历年全国计算机二级等级考试真题(附答案) (33) 2006年4月全国计算机等级考试二级VB笔试试卷 (33) 2005年9月全国计算机等级考试二级VB笔试试卷 (43) 2005年4月全国计算机等级考试二级VB笔试试卷 (50) 2004年9月全国计算机等级考试二级VB笔试试卷 (57)
一、填空题 1、在程序中使用日期型数据时,必须用符号 将日期型数据括起来。 2、VB 集成发环境窗口,它包括了数个独立的窗口。除必须的"主窗口"外,常用的还有 窗口、 窗口、 窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。 3、在计算机上建立一个VB 应用程序的完整过程,一般分:建立用户界面的对象、对象属性的设置 、对象事件过程及编程、 程序的运行和调试 和 保存文件 五个步骤。 4、VB 中每个对象都有自己的属性, visible 属性决定控件是否允许可见。 5、在VB 对象的三要素中,可以把 属性 看作一个对象的性质,把 事件 看作对象的响应,把 方法 看作对象的动作。 6、VB 有三种工作模式,它们分别是 模式、 模式和 模式。 7、如果希望每0.6秒钟产生一个计时事件,那么应将InterVal 属性值应设置为 。 8、在VB 中,为了使一个控件在运行时不可操作,应将控件的 enable 属性设置为 false 。 9、为了防止用户编辑文本框内的内容,应将控件的 locked 属性设置为 true 。 10、当要使标签框的大小随着Caption 属性的值进行扩展或缩小时,应将该控件的 autosize 属性设置为 true 。 11、定义一个长度为8个字符的定长字符串变量(Ch5)的Dim 声明语句是 dim ch5 as string*8 。 12、VB 中拥有多个窗体的程序可用 load 语句窗体装入内存,用 unload 语句从内存中删除指定窗体. 13、在多窗体工程中,可用 show 方法显示一个窗体,用 hide 方法将一个窗体隐藏起来。 14、结构化程序设计方法,把程序的结构规定为 三种基本结构,它们是: 选择结构 、 选择 结 构 、 和 __循环结构_________三种基本结构。 15、VB 逻辑数据类型只有True 与False 两个值。当逻辑数据转换成整型数据时,True 转换为 ,False 转换为 。 16、VB 中依据变量的作用范围将VB 变量的作用范围分为三类,它们是: 局部 变量、 全局 变量和 窗体模块 变量。 17、VB 中,对控件(对象)一些属性的设置,即可以通过在 程序代码 中设置,也可以在 属性窗口 中设置,两种方法来设置。 18、在VB 中,静态数组声明中的下标只能是 常 量 。而动态数组Redim 语句中的下标还可以是已赋值 的变量。 19、产生100~200之间(含100和200)的随机整数的表达式是: 。 20、表达式4 AND 5 的运算结果是 4 。 21、VB 中,当KeyPress 事件发生时会返回一个按键 的 ASCii 值。 22、VB 中,用Option Base 1说明后,Dim A (5,5)定义的数组有 25 个元素。 23、表达式“12345”<>“12345”&“ABC ”的值 是 。 24、在Select case 结构中应至少包含一个 __Case____子句。 25、启动VB6.0时,VB6.0默认的工程类型是 标准EXE 程序 。 26、A=7,B=3,C=4,则表达式A MOD 3 +B^3/C\5的值为 2 。 27、若要求在菜单中包含分隔条,则设计时,在菜单的标题属性中应设置为 “— “ 。 28、在For ……Next 循环中,循环次数由循环控制变量的初值、终值与步长三个因素决定,其计算公式为 循环次数=INT (终值-初值)/步长+1 。 29、激活属性窗口的快捷键是 F4 。 30、字符串常量由任何ASCII 字符组成,在程序中,它必须由 双引号 括起来。