09vb模拟测试卷
浙江省09年春二级vb考试试卷及答案
浙江省2009年春二级VB考试试卷及答案2009年春浙江省高等学校计算机等级考试试卷(二级Visual Basic) 试题1 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】输入n后，计算并显示下列表达式的值。
1?1111????? 234n运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示，按“计算”按钮后的界面如下图右所示。
【程序】Dim n As Integer Private Sub Form_Load() Command1. (1)End Sub Private Sub Text1_(2)(K As Integer) If K 13 Then Exit Sub(3) If n > 0 Then = True= False Else = \ End If End Sub Private Sub Command1_Click() Dim yAs Single, i As Integer For i = 1 To n (4)Next i = y= False = True= \ 1 End Sub 【供选择的答案】(1) A、Enabled=True B、Enabled=False C、Visible=True D、Visible=False (2)A、KeyPressB、ClickC、Change(3) A、k=B、k = 13C、n = 13D、KeyDown D、n = (4) A、y = y + 1/n B、y = y + 1\\n C、y = y + 1/i D、y = y + 1\\i 试题2 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】运行时输入10个数后，输出其中较小的5个数。
【程序】Private Sub Command1_Click() Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As Byte For i = 1 To 10 a(i) = InputBox( (5)) Next i Fori = 1 To 9(6)For j = i +1 To 10 If (7)Then k = j Next j t = a(i): a(i) = a(k): a(k) = tNext i For i = (8)Print a(i) Next i End Sub 【供选择的答案】(5) A、\、\C、\、\(6) A、k = i B、i = k C、k = i + 1D、i = k + 1 (7) A、a(j) a(i)C、a(j) > a(k)D、a(j) D、5 To 10 试题3 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
2009年全国计算机等级考试二级VB语言模拟试卷
2009年全国计算机等级考试二级VB语言模拟试卷（三）1 在窗体上有1个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是A)Cd1.Action=2B)Cd1.Action=1C)Cd1.ShowSave=TureD)Cd1.ShowSave=02 下面关于菜单的叙述中错误的是A)各级菜单中的所有菜单项的名称必须唯一B)同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同C)弹出式菜单也用菜单编辑器编辑D)同一子菜单中的菜单项名称必须唯一,不同子菜单中的菜单项名称不可以相同3 已知有下面的过程Private Sub proc1(a As Integer,b As String,Optional x As Boolean)……End Sub正确调用此过程的语句是A)Call procl(5)B)Call proc1 5,”abc”,FalseC)proc1(12,”abc”,True)D)proc1 5, “abc4 在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。
下面能够正确实现上述功能的程序是A)Private Sub Command1_Click()Text1.Left=100End SubB) Private Sub Command1_Click()Text1.Left= Text1.Left-100End SubC)Private Sub Command1_Click()Text1.Move.Text.Left+100End SubD) Private Sub Command1_Click()Text1.Move.Text.LeftEnd Sub5 某人创建了1个工程，其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是A)在工程属性对话框中把“启动对象”设置为Form2B)在Form1的Load事件过程中加入语句Load Form2C)在Form2的Load事件过程中加入语句Form2.ShowD)在Form2的TabIndex属性设置为１，把Form1的TabIndex属性设置为２6 计算1+3+5+……+99的值，某人编程如下k=1s=0While k<=99k=k+2 : s=s+kWendPrint s在调试时发现运行结果有错误，需要修改。
09信息技术水平测试第一次模拟试题(vb)
省句中信息技术水平测试第一次模拟试题(算法与程序设计)单选题（每题1分）1、下列有关信息技术的描述，正确的是( )。
A、在人类历史上发生过五次信息技术革命，第五次信息技术革命是计算机的普及应用及其与现代通信技术的结合B、随着信息技术的发展，近期内电子出版物会完全取代纸质出版物C、信息技术是计算机技术和网络技术的简称D、英文的使用是信息技术的一次革命2、飞行员学校采用计算机模拟驾驶飞机训练系统对学员进行培训，这主要采用了( )A、图形识别技术B、身份认证技术C、分布处理技术D、虚拟现实技术3、下列活动不适合用信息技术手段解决的有( )。
A．获得2008年北京奥运会的相关资料B．对一幅老照片进行修复C．做制取气体的化学实验D．管理自己的财务4、某同学在"www. "的搜索栏输入"高二物理试题"，然后单击"搜索"按钮，请问他的这种信息资源检索是属于( ) A、分类搜索B、全文搜索C、多媒体信息检索D、专业垂直搜索5、使用全文搜索引擎(如Google)进行搜索时，关键词"综合性大学 -上海"表示( )。
A、上海的综合性大学B、上海的非综合性大学C、不包含"上海"二字但包含"综合性大学"的网页D、上海和综合性大学6、要尽可能多地查询到有关科技、科普方面的网址，应在关键词栏中输入（）A. 科技科普B. 科技AND科普C. 科技OR科普D. 科普科技7、下列说法正确的是（）A、搜索引擎按其工作方式可划分为全文搜索引擎和目录索引类搜索引擎B、搜索引擎按其工作方式可划分为目录索引类搜索引擎与分类式搜索引擎C、全文搜索方式又被称为分类搜索D、目录索引类搜索引擎的使用方法称为“关键词查询”8、可以方便的检索多个搜索引擎，扩大检索范围，同时检索多个数据库的搜索引擎属于( )A、元搜索B、全文搜索C、垂直搜索D、目录索引类搜索9、为了使计算机输出“狂草”字体的汉字，你认为应该做的编码工作是（）A、汉字的输入码B、狂草内码C、狂草外码D、狂草字型码10、汉字的输出码可以用点阵方式来表示，目前汉字在显示器上显示的就是点阵汉字。
VB机试模拟试卷120(题后含答案及解析)
VB机试模拟试卷120(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．(1)在名称为Forml的窗体上建立一个名称为P1的图片框和两个命令按钮，名称分别为Cmdl和Cmd2，标题分别为“输出”和“清除”，如图22—1所示。
要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母“load me’’；如果单击“清除”按钮，则清除图片框中的内容。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjl．frm，工程文件名为sjl．vbp。
(2)在名为：Form1的窗体上绘制一个标签，名为Labl，标签上显示“请输入密码”；在标签的右边绘制一个文本框，名为Textl，其宽、高分别为1500和300。
设置适当的属性使得在输入密码时，文本框中显示“*”字符，此外冉把窗体的标题设置为“PassWord窗口”。
运行时的窗体如图22—2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。
正确答案：(1)本题主要考查图片框控件的基本操作。
命令按钮的标题通过Caption属性设置，单击命令按钮触发Click事件；打印信息用Print方法，清除用Cls方法。
题目要求在图片框中打印信息，所以在编写代码时应指定Print方法和C1s方法的使用对象。
在窗体上建立好控件后，先设置控件属性，再编写事件过程。
①建立界面并设置控件属性。
程序用到的控件及其属性见下表。
②命令按钮Cmdl触发Click事件，打印信息用Print方法。
题目要求在图片框中打印信息，所以在编写代码时，应指定Print方法使用对象。
Private Sub Cmdl Click( ) P1．Print”load me”End Sub ③清除用Cls方法。
题目要求清除图片框中的信息，所以在编写代码时，应指定Cls方法的使用对象。
Private Sub Cmd2_Click( ) P1．Cls End Sub ④调试并运行程序。
初三_vb期末考试试卷+答案
九年级期末VB考试试卷班级：学号：姓名：一、选择题（每题两分，共十五题）1.下列叙述中正确的是(c)A.只有窗体才是VB中的对象B.只有控件才是VB中的对象C.窗体和控件都是VB中的对象D.窗体和控件不是VB中的对象2.下列可以激活属性窗口的操作是(D)A.用鼠标双击窗体的任何部位B.执行“工程”菜单中的“工具箱”命令C.按Ctrl+F4键D.按F4键3.下列不能打开工具箱窗口的操作是(B)A.执行“视图”菜单中的“工具箱”命令B.按Alt+F8键C.单击工具栏上的“工具箱”按钮D.按Alt+V键，然后按Alt+X键4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是(A)A.单击窗体上没有控件的地方B.单击任一个控件C.不执行任何操作D.双击窗体的标题栏5.为了把窗体上的某个控件变为活动的，应执行的操作是(C)A.单击窗体的边框B.单击该控件的内部C.双击该控件D.双击窗体6.确定一个控件在窗体上的位置的属性是(D)A. Width或HeightB. Width和HeightC. Top或LeftD. Top和Left7.确定一个窗体或控件的大小的属性是(B)A. Width或HeightB. Width和HeightC. Top或LeftD. Top和Left8.为了同时改变一个活动控件的高度和宽度，正确的操作是(B)A.拖拉控件4个角上的某个小方块B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.不能同时改变控件的高度和宽度9.VB程序中的注释所使用的字符是(A)A. 'B.:C.\D._10.设a=2,b=3,c=4,d=5,下列表达式的值是Ba>b AND c<=d OR 2*a>cA.TrueB. FalseC. -1D. 111.设a=2,b=3,c=4,d=5,下列表达式的值是C3>2*b OR a=c AND b<>c OR c>dA.1B. TrueC.FalseD.-112.设a=2,b=3,c=4,d=5,下列表达式的值是DNOT a<=c OR 4*c=b^2 AND b<>a+cA.-1B. 1C. TrueD.False13.下列可作为VB的变量名的是BA.3*DletaB.PrintCharC.AbsD.ABπ14.语句的Print5*5\5/5的输出结果是BA.5B.25C.0D.115.设a、b、c为整型变量，其值分别为1、2、3，以下程序段的输出结果是D a=b:b=c:c=aPrint a;b;cA.1 2 3B.2 3 1C.3 2 1D.2 3 2二填空题（每题4分，共5题）1.语句Print"25+32=";25+32的输出结果是 25+32=57 。
VB试卷09
盐城师范学院___年___学期《Visual Basic程序设计教程》期___考试试卷试卷代号：__VB09___第一部分：笔试试卷（60%）一、选择题（每空1分，计35分。
将答案写在答题纸上）1.为了清除计算机中的病毒,要求用无病毒的软盘重新启动计算机,其目的是清除 1 中的病毒.A、RAMB、ROMC、CPUD、硬盘2．32位字长的最大正整数是2147483647（231-1），而最小负整数是-2147483648（-231），即负整数比正整数多一个，其原因是 2 。
A、机内整数采用原码表示B、机内整数采用反码表示C、机内整数采用补码表示D、公认的约定3．已知521+ 555=1406，则此种加法是在 3 下完成的。
A．七进制 B．八进制 C．九进制 D、十进制4．PC、APPLE机、SUN工作站等计算机，其指令系统通常有所不同，这主要取决于 4 。
A．所用的操作系统 B．所用的CPUC．系统的总线结构 D．所用的语言处理程序5．下列关于机器语言与高级语言的说法中，正确的是 5 。
A．机器语言比高级语言执行得慢B．机器语言程序比高级语言程序可移植性强C．机器语言程序比高级语言程序可移植性差D．有了高级语言，机器语言就无存在的必要了6．实现计算机系统中软件安全的核心是 6 。
A．硬件的安全性 B、操作系统的安全性B．语言处理系统的安全性 D、应用软件的安全性7．下列有关Unicode汉字编码标准（字符集）中，叙述不正确的是 7 。
A．Unicode 编码的长度为16位 B、Windows 95/98支持Unicode 编码C．Unicode 收录了一万多个汉字及符号 D．Unicode与ASCII码不兼容8．作为信息处理热点技术之一的“多媒体技术”中的媒体，强调的是 8 。
A．存储媒体 B．表现媒体 C．传输媒体 D．感觉媒体9．软件测试是软件开发过程中的一个重要环节。
软件产品在交付前必须经过三种测试．它们是 9 。
09vb模拟测试卷
09vb模拟测试卷满分：70分姓名：________1、单项选择题(本题共计40分)1、VisualBasic是用于开发________环境下的应用程序的工具。
( B )A、DOSB、WindowsC、DOS和WindowsD、UNIX2、对象在响应某个事件时，计算机要执行一段程序，以完成相应的操作，这样的程序片段叫做____过程。
(B )A、方法B、事件C、调动D、编译3、VisualBasic中的窗体文件的扩展名是____________。
( B )A、.regB、.frmC、.basD、.vbp4、一只白色的足球踢进球门，则白色、足球、踢、进球门是________。
(B )A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法5、下面________语句，可以将列表框List1中当前选定的列表项的值替换成“ABC”。
(C )A、List1.AddItem“A BC”，List1.ListIndexB、List1.Text=“A BC”C、List1.List(List1.ListIndex)=“A BC”D、前三项均可6、在VB中，下列关于控件的属性或方法中，搭配错误的有________个。
①Timer1.Interval②List1.Cls③Text1.Print④List1.RemoveItem⑤Vscroll1.V alue⑥Picture1.Print ( C )A、0B、1C、2D、37、当对象失去焦点时，将会发生____________事件。
( B )A、GetFocusB、LostFocusC、FocusD、SetFocus8、对于一个含有计时器控件的窗体，每经过一段由________属性指定的时间间隔，就会产生一个Timer事件。
( D )A、NameB、EnabledC、CaptionD、Interval9、在设计列表框时，若实现输入多行文字的目的，应使用____________键实现文本的换行。
09年春江苏计算机二级VB上机试题及答案
二级vb上机江苏2010春第三套试卷答案1.改错题Option ExplicitPrivate Sub Command1_Click()Dim N As Integer, k As IntegerFor N = 20 To 180k = N ^ 2If sx(k) ThenList1.AddItem N & "^2=" & kEnd IfNextIf List1.ListCount <> 0 Then List1.AddItem "无升序平方数" '错误点1修改为 List1.ListCount = 0End SubPrivate Function sx(ByVal N As Integer) As BooleanDim num() As Integer, k As Integer, p As IntegerDim i As IntegerDop = N Mod 10k = k + 1ReDim Preserve num(k)num(k) = pN = N \ 10Loop Until N<0 '错误点2，应修改为N = 0For i = 2 To UBound(num)If num(i) >num(i - 1) Then Exit Function '错误点3 修改为num(i) > num(i - 1)Next isx = TrueEnd Function2009秋二级Visual Basic上机试卷(本试卷完成时间为70分钟)考试说明：1．改错题的界面不作要求,主要用来调试程序,若题目中有参考界面,则仅作参考；2．考试结束后,文件必须存放在指定位置,否则适当扣分；考试盘中若无指定文件,j 予评分；3．程序代码书写应呈锯齿形。
一、改错题(14分)【题目】本程序的功能是,将24位真彩色图像的一个像素的颜色值,转换成用十进制表示的绿、蓝三基色的亮度值。
VB2009年模拟题答案
09年6月正式会考vb操作题答案
========完善程序题(1).打开Z:\“VB \429”文件夹中的文件：“” 进行以下操作后并保存！在VB 代码窗口指定位置修改完善程序代码实现，求1×2+2×3+3×4+4×5+5×6 的值。
（2）打开Z:\“VB \435”文件夹中的文件：“” 进行以下操作后并保存！在VB 代码窗口指定位置修改完善程序代码实现，求657687981091-----的值。
答案：运行结果：答案：运行结果：答案：（3）打开Z:\“VB \426”文件夹中的文件：“” 进行以下操作后并保存！在VB 代码窗口指定位置修改完善程序代码实现，求1×2×3×4×……×10的值。
（4）打开Z:\“VB \417”文件夹中的文件：“” 进行以下操作后并保存！在VB代码窗口指定位置修改完善程序代码实现，求10191817161514131211+++++++++的值。
运行结果：答案：答案：运行结果：（5）打开Z:\“VB \432”文件夹中的文件：“” 进行以下操作后并保存！在VB代码窗口指定位置修改完善程序代码实现，求1011910897867564534232+++++++++的值。
=======界面设计题:新建一个VB 工程，工程文件名称为：“工程”,并添加一个窗体文件：“”，保存在Z:\下的VB 文件夹下的425文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！新建一个VB 工程，工程文件名称为：“工程”,并添加一个窗体文件：“”，保存在Z:\下的VB 文件夹下的431文件夹下。
进行如下操作后并保存！ 按下表的要求添加控件，并设置其属性，操作后保存！运行结果：答案：新建一个VB工程，工程文件名称为：“工程”,并添加一个窗体文件：“”，保存在Z:\下的VB 文件夹下的416文件夹下。
按下表的要求添加控件，并设置其属性，操作后保存！新建一个VB工程，工程文件名称为：“工程”,并添加一个窗体文件：“”，保存在Z:\下的VB 文件夹下的434文件夹下。
VB机试模拟试卷40(题后含答案及解析)
VB机试模拟试卷40(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题基本操作题（30分）1．新建一个工程，在窗体中创建两个文本框，其名称分别为Text1和Text2。
编写一个事件过程，实现在程序运行后，当文本框Text1获得焦点时，其前景颜色与背景颜色交换显示。
如图13所示。
程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl.vbp，窗体文件名为ylcl.frm。
正确答案：(1)Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。
创建窗体Form1。
(2)在工具箱中选择文本框控件，在窗体上创建两个文本框。
双击文本框Text1，弹出代码窗口，添加如下代码：Private Sub Text1_Gotfocus( ) Dim a As Long a=Text1. ForeColor Text1.ForeCotor=Text1.BackColor Text1.BackColor=a End Sub (3)按F5键运行程序。
如图13所示。
(4)执行“文件”→“保存工程”命令，将工程文件命名为ylcl.vbp，窗体文件命名为ylcl.tim。
解析：(1)第1小题中使用了临时变量a，在事件中，利用这个[临时变量将Text1的前景色与背景色进行交换。
2．新建一个工程。
在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。
在三个标签下分别有三个文本框(名称分别为Textl、TexQ和Text3)用来输入数字。
要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框删后其中输出两个数的和。
如图14所示。
程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体丈件名为ylc2.frm。
正确答案：Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。
VB机试模拟试卷109(题后含答案及解析)
VB机试模拟试卷109(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．(1)在名称为Forml的窗体上画一个空白文本框，名称为Textl，它的高为2000，宽为2000。
通过属性窗口设置适当的属性使得Textl可以显示多行文本，且有垂直滚动条。
程序运行时的窗体如图12—1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjl．vbp，窗体文件名为sjl．frm。
(2)在名称为Forml的窗体上画一个图像框，名称为Imagel，其高、宽分别为800、800，通过属性窗口把考生文件夹下的图像文件test．bmp装入图像框；再画一个命令按钮，名称为(iotamandl，标题为“变宽”。
请编写适当的事件过程，要求程序运行后，每单击一次“变宽”按钮，则使图像的宽度增加600。
程序运行时窗体界面如图12—2所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sj2．vbp，窗体的文件名为sj2．frm。
正确答案：(1)根据题意，新建“标准EXE”工程，将一个文本框控件添加到窗体中，将其名称设为Textl，MuhiLine属性为True，ScrollBars属性为2，Text 属性为空，Width设为2 000，Height设为2 000。
单击按钮运行程序，并按要求保存。
(2)根据题意，新建“标准EXE”工程，将一个图像控件和一个命令按钮添加到窗体中，图像控件的名称为Imagel，Width为800，Height属性为800，Stretch属性为True，命令按钮的名称为Commandl，Caption属性为“变宽”。
双击Commandl进入代码窗口，编写如下代码：Private Sub Command1_Click( ) Imagel．Width=Imagel．Width+600’Imagel的宽度变宽600 End Sub单击按钮运行程序，并按要求保存。
VB机试模拟试卷99(题后含答案及解析)
VB机试模拟试卷99(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．(1)在窗体Forml上画一个命令按钮，名称为Command1，标题为“打开文件”，在窗体上添加适当的控件并编写适当的程序代码，要求程序运行时，单击“打开文件”命令按钮，可以弹出“打开文件”对话框。
程序运行时的窗体界面如图5—1所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj1．frm，工程文件名为sj1.vbp。
(2)在窗体Forml上画一个列表框，名称为List1，有“Item1”、“Item2”、“Itera3”和“Item4”4个表项。
要求编写适当的程序代码，当双击列表中某一项时，弹出一个对话框提示“是否删除”。
对话框中只有“是”与“否”两个选择按钮，单击按钮，则继续当前的操作。
程序运行时的窗体界面如图5—2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为si2．vbp。
正确答案：(1)通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色、设置字体、显示帮助等操作的一组标准对话框，通用对话框显示这对话框对应的方法分别为ShowOpen、ShowSave、ShowPrinter、ShowColor、ShowFont、ShowHelp。
该控件运行时不可见。
通用对话框的Action 属性也可用于设置被打开对话框的类型。
根据题意，新建“标准EXE”工程，一个命令按钮和一个文件对话框控件添加到窗体中，CommonDialog控件需要选择“工程”→“部件”命令，或在左侧工箱中单击鼠标右键，选择“部件”菜单，打开“部件”对话框，将Microsoft Common Dialog Control 6．0前面的复选按钮勾上，单击“确定”按钮，则添加成功，再同其他控件一样添加到窗体上，其名称为CommonDialogl。
二级VISUAL BASIC机试真题2009年03月
二级VISUAL BASIC机试真题2009年03月1 基本操作题请根据以下各个小题的要求设计Visual Basic应用程序(包括界面和代码)。
1、在窗体上拖拉出一个文本框，名称为Txt1，Text属性为空白。
再画一个列表框，名称为Lst1，通过属性窗口向列表框中添加4个项目，分别为“aaaa”、“bbbb”、“cccc”和“dddd”(如下图所示)。
编写适当的事件过程，使程序运行后，在文本框中输入一个字符串，如果双击列表框中的任一项，则把文本框中的字符串添加到列表框中。
程序运行时的窗体界面如下图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
2、在名称为Form1的窗体上建立两个名称分别为Command1和Command2.标题分别为“上午”和“下午”的命令按钮。
编写适当的事件过程，要求程序运行后，如果单击“上午”命令按钮，在窗体上显示“上午9:00—12:00”；如果单击“下午”命令按钮，在窗体上显示“下午12:00—18:00”。
程序中不能使用任何变量，直接显示字符串。
程序运行结果如下图所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。
2 简单应用题1、在考生文件夹下有工程文件djks030.vbp及窗体文件djks030.frm。
根据下文的描述，编写相应的程序。
存盘时不得改变文件名和文件夹。
本题描述如下：在窗体上有一个名为Image1的图像框，要求程序运行后，每用鼠标左键点击图像框一次，则图像框的高与宽都增加300；每用鼠标右键点击图像框一次，图像框的高与宽都减小300。
窗体的高与宽为3500，图像框最大化时不允许超过窗体的大小，最小化时图像框的高与宽不小于500(高与宽的单位为twip)。
程序运行时的窗口界面如下图所示。
2、在考生文件夹中有文件sjt4.vbp及其窗体文件sjt4.frm，该程序是不完整的，请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符(即'号)，但不能修改其他部分。
九年级vb信息技术考试试题及答案
九年级vb信息技术考试试题及答案一、选择题（每题2分，共20分）1. VB中，用于表示“与”逻辑运算的符号是：A. &&B. ||C. =D. ==答案：A2. 在VB中，下列哪个关键字用于定义一个过程？A. FunctionB. SubC. ClassD. Module答案：B3. 下列哪个选项不是VB中的控制结构？A. If...Then...ElseB. For...NextC. While...WendD. Switch...Case答案：D4. 在VB中，如何声明一个整型变量？A. Dim i As IntegerB. Integer iC. i = IntegerD. Var i As Integer5. VB中，下列哪个函数用于将字符串转换为数字？A. Str()B. Val()C. CInt()D. CStr()答案：C6. VB中，下列哪个属性用于获取或设置窗体的标题？A. TextB. CaptionC. TitleD. Name答案：B7. 在VB中，下列哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A8. VB中，下列哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. ListBox答案：B9. VB中，下列哪个关键字用于退出当前过程？B. EndC. ReturnD. Stop答案：A10. VB中，下列哪个函数用于获取当前系统时间？A. Now()B. Date()C. Time()D. Timer()答案：A二、填空题（每题3分，共30分）1. 在VB中，使用________关键字可以定义一个类。
答案：Class2. VB中，使用________函数可以获取当前日期。
答案：Date()3. VB中，使用________事件可以响应键盘按下。
2009-2010年VB试卷-推荐下载
Sum =Sum+arr(i) End If Next i Print Sum End Sub 程序运行后的结果是________C_______。
A.13 B.14 C.27 D.15 11、在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a= Array(1,2,3,4,5) For i=1 To UBound(a) a(i) = a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是____B____
姓名：＿＿＿＿＿＿ 年级：
专业：
班别： 学号:□□□□□□□□□□
2009-2010 学年第二学期 《计算机基础与应用》（2）课程考试卷（E 卷）
专业： 层次：普通高等教育 年级： 2009
（试卷总分：100 分，考试时间：90 分钟，试题内容 5 页，空白纸 0 页）
教研室主任审核签名： 周洪建
D.3
客观题部分(F 卷)
A.Text1="123" B.txt1.Text+txt2.Text=txt3.Text =cmdOK
D.12Label.Caption=1234 6、在窗体上画一个命令按钮，名称为 Command1，然后编写如下事件过程
Private Sub Command1_Click()
A.0 B.1
C.2
4、下面程序段运行后的输出结果是___D_____。
x$="a"
y$="b"
z$="c"
For i=1 to 2
2009年会考VB试卷
2008年12月温州市中职毕（结）业会考《Visual Basic语言》试卷一、选择题：（将正确答案填写在以下表格内。
每小题2分，共40分）1．Visual Basic是一种面向对象的程序设计语言，所采用的编程机制是＿＿＿＿＿。
A．从主程序开始执行B．按过程顺序执行C．事件驱动D．按模块顺序执行2．不能响应Click事件的对象是＿＿＿＿＿。
A．标签框B．图片框C．窗体D．计时器3．可视化编程基本过程的3个步骤是＿＿＿＿＿。
A．创建工程、设计界面、编写代码B．创建工程、编写程序、保存程序C．设计界面、设置属性、编写代码D．设计界面、编写代码、调试程序4．要改变标签控件（Label）所显示的文字内容，就是改变该控件的＿＿＿属性值。
A．Caption B．Text C．Name D．Left5．为了暂时关闭计时器，应该把计时器的＿＿＿＿＿属性设置为False。
A．Interval B．TimerC．Visible D．Enabled6．把一个命令按钮设置成无效，应设置其哪一属性值＿＿＿＿＿。
A．Visible B．EnabledC．Default D．Cancel7．决定图片框背景色的属性是＿＿＿＿＿。
A．BackColor B．ForeColorC．FontColor D．FillColor8．若希望让操作者输入文字数据时，可以建立＿＿＿＿＿控件。
A．标签B．文本框C．命令按钮D．图片框9．有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text 和"Visual Basic程序设计"分别代表＿＿＿＿。
A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值10．通过＿＿＿＿窗口，可以显示或改变窗体在屏幕中的位置。
A．属性B．窗体布局C．监视D．数据视图11．在Visual Basic中通过________属性来设置字体的颜色。
VB机试模拟试卷110(题后含答案及解析)
VB机试模拟试卷110(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．(1)在名为Forml的窗体上绘制一个名为chkl的复选框数组，含3个复选框，它们的标题依次为First、Second和Third，其下标分别为0、1、2。
初始状态下，Second和Third为选中状态。
运行后的窗体如图30—1所示。
注意：文件必须存放在考生文件夹中，工程文件名为sjl．vbp，窗体文件名为sjl．fml。
(2)请在名为Forml的窗体上建立一个二级下拉菜单，第一级共有两个菜单项，标题分别为“文件”和“编辑”，名称分别为vbFile和vbEdit；在“编辑”菜单下有第二级菜单，含有3个菜单项，标题分别为“剪切”、“复制”和“粘贴”，名称分别为vbCut、vbCopy和vbPaste。
其中“剪切”菜单项设置为无效(如图30—2所示)。
注意：文件必须存放在考生文件夹中，工程文件名为sj2．vbp，窗体文件名为sj2．frm。
正确答案：(1)①新建一个名为Forml的窗体。
②单击工具箱中的CheckBox 控件图标，在窗体上拖拉出三个复选框，在属性窗口设置三个复选框名称分别为Chkl、Chk2和Chk3，标题分别为“First”“Second”和“Third”，设置Chk2和Chk3的Value属性值为Checked。
③按要求保存文件即完成本题。
(2)①新建一个名为Forml的窗体。
②执行“工具”菜单中的“菜单编辑器”命令，打开菜单编辑器。
在“标题”栏中输入“文件”，在“名称”栏中输入“vbFile”；单击“下一个”按钮，在“标题”栏中输入“编辑”，在”名称”栏中输入“vbEdit”；单击“下一个”按钮，再单击编辑区的右箭头按钮，在“标题”栏中输入“剪切”，在“名称”栏中输入“vbCut”，不要选择“有效”选项；单击“下一个”按钮，在“标题”栏中输入“复制”，在“名称”栏中输入“vbCopy”；单击“下一个”按钮，在“标题”栏中输入“粘贴”，在“名称”栏中输入“vbPaste”。
09年秋季泉州电子科技学校数据库VB程序设计模拟试卷A
泉州电子科技学校《VB 程序设计》会考试卷1(考试时间：90分钟，满分：100分)小题，1-30每小题1分，31-45每小题2分，共60分） 不具有以下 特点。
A ．VB 采用了面向对象的程序设计方法。
B ．VB 是结构化程序设计语言。
C ．VB 采用了面向过程的编程机制。
D ．VB 提供了可视化的设计工具。
2、VB 采用了 编程机制。
A ．面向过程B ．面向对象C ．事件驱动D ．可视化 3、在VB 中，称对象的数据为 。
A ．方法B ．封装C ．事件D ．属性4、在VB6.0集成开发环境中，运行VB 程序的快捷菜单为 。
A ．F1B ．F2C ．F4D ．F55、下列关于事件的叙述中不正确的是 。
A ．事件可分为用户事件与系统事件两类。
B ．VB 中所有对象的默认事件都是Click 。
C ．VB 为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。
D ．事件是系统预先为对象定义的能被对象认别的动作。
6、对象可以识别和响应的某些操作行为称为 。
A ．多态B ．事件C ．属性D ．方法 7、表达式 3^2*2+3 MOD 10\4 的值是 。
A ．18B ．1C ．19D ．08、Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是 。
A ．属性、控件和方法B ．属性、事件和方法C ．窗体、控件和过程D ．控件、过程和模块9、设有如下语句：Dim a, b As String c=2008d=#6/16/2007#以下关于这段代码的叙述中，错误的是 。
A ．a 被定义为String 类型变量B ．b 被定义为String 类型变量C ．c 中的数据是数值型D ．d 中的数据是日期类型 10、Rem 语句的作用是 。
A ．删除语句B ．行号引导语句C ．注释语句D ．恢复语句 11、 属性能够改变窗体的边框线。
A ．FontStyleB ．BorderStyleC ．BackStyleD ．Border 12、下列选项中，为日期型常量的是 。
真题2009年9月VB笔试试卷
2009年9月全国计算机等级考试二级笔试试卷公共基础知识和Visual Basic语言程序设计一、选择题（每小题2分，共70分）（1）下列数据结构中，属于非线性结构的是（）。
A）循环队列B）带链队列C）二叉树D）带链栈（2）下列数据结构中，能够按照“先进后出”原则存取数据的是（）。
A）循环队列B）栈C）队列D）二叉树（3）对于循环队列，下列叙述中正确的是（）。
A）队头指针是固定不变的B）队头指针一定大于队尾指针C）队头指针一定小于队尾指针D）队头指针可以大于队尾指针，也可以小于队尾指针（4）算法的空间复杂度是指（）。
A）算法在执行过程中所需要的计算机存储空间B）算法所处理的数据量C）算法程序中的语句或指令条数D）算法在执行过程中所需要的临时工作单元数（5）软件设计中划分模块的一个准则是（）。
A）低内聚低耦合B）高内聚低耦合C）低内聚高耦合D）高内聚高耦合（6）下列选项中不属于结构化程序设计原则的是（）。
A）可封装B）自顶向下C）模块化D）逐步求精（7）软件详细设计产生的图如下：该图是（）。
A）N-S图B）B）PAD图C）C）程序流程图D）E-R图（8）数据库管理系统是（）。
A）操作系统的一部分B）在操作系统支持下的系统软件C）一种编译系统D）一种操作系统（9）在E-R图中，用来表示实体联系的图形是（）。
A）椭圆形B）矩形C）菱形D）三角形（10）有三个关系R，S和T如下：其中关系T由关系R和S通过某种操作得到，该操作为（）。
A）选择B）投影C）交D）并（11）以下变量名中合法的是（）。
A）x2-1 B）print C）str_n D）2x（12）把数学表达式5326xy+−表示为正确的VB表达式应该是（）。
A）(5x+3)/(2y-6) B）x*5+3/2*y-6 C）(5*x+3)÷(2*y-6) D）(x*5+3)/(y*2-6)（13）下面有关标准模块的叙述中，错误的是（）。
A）标准模块不完全由代码组成，还可以有窗体B）标准模块中的Private过程不能被工程中的其他模块调用C）标准模块的文件扩展名为.basD）标准模块中的全局变量可以被工程中的任何模块引用（14）下面控件中，没有Caption属性的是（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
09vb模拟测试卷满分：70分姓名：________1、单项选择题(本题共计40分)1、VisualBasic是用于开发________环境下的应用程序的工具。
( )A、DOSB、WindowsC、DOS和WindowsD、UNIX2、对象在响应某个事件时，计算机要执行一段程序，以完成相应的操作，这样的程序片段叫做____过程。
( )A、方法B、事件C、调动D、编译3、VisualBasic中的窗体文件的扩展名是____________。
( )A、.regB、.frmC、.basD、.vbp4、一只白色的足球踢进球门，则白色、足球、踢、进球门是________。
( )A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法5、下面________语句，可以将列表框List1中当前选定的列表项的值替换成“ABC”。
( )A、List1.AddItem“ABC”，List1.ListIndexB、List1.Text=“ABC”C、List1.List(List1.ListIndex)=“ABC”D、前三项均可6、在VB中，下列关于控件的属性或方法中，搭配错误的有________个。
①Timer1.Interval②List1.Cls③Text1.Print④List1.RemoveItem⑤Vscroll1.Value⑥Picture1.Print ( )A、0B、1C、2D、37、当对象失去焦点时，将会发生____________事件。
( )A、GetFocusB、LostFocusC、FocusD、SetFocus8、对于一个含有计时器控件的窗体，每经过一段由________属性指定的时间间隔，就会产生一个Timer事件。
( )A、NameB、EnabledC、CaptionD、Interval9、在设计列表框时，若实现输入多行文字的目的，应使用____________键实现文本的换行。
( )A、EnterB、Alt+EnterC、Ctrl+Shift+EnterD、Ctrl+Enter10、将数据项“China”添加到列表框(Listl)中成为第一项应使用____________语句。
( )A、Listl.Addltem "China",0B、Listl.Addltem "China",1C、Listl.Addltem 0,"China"D、Listl.Addltem 1,"China"11、函数Cint(–3.5)，Int(–3.5)，Fix(–3.5)的值分别是________。
( )A、-3，–4，–3B、-4，–4，–3C、-3，–4，–4D、-4，–3，–312、假定变量Logic类型是Boolean，下面赋值语句________是正确的。
( )A、Logic = ‘True’B、Logic = .True.C、Logic = # True #D、Logic = 3<413、下列语句中不能正常执行的是________。
( )A、print +32758+10B、print 5+9=15C、print "65"+12D、print "65"&1214、在窗体Form1上画两个文本框（Name 属性分别为Fext1和Text2）和一个命令按钮（Name属性为Command1），程序如下。
执行后结果为___________。
Private Sub Command1_Click()a=Text1.Text+Text2.TextPrint aEnd SubPrivate Sub Form_load()Text1.Text="123"Text2.Text="321"End Sub ( )A、444B、321123C、123321D、13223115、语句Print 4 + 5\6*7/8 Mod 9的值是____________。
( )A、4B、5C、6D、716、不能正确表示条件“两个整型变量X 和Y之一为0，但不能同时为0”的布尔表达式是________。
( )A、X*Y=0 And (X<>0 Or Y<>0)B、( X=0 Or Y=0 ) And (X<>0 Or Y<>0)C、Not ( (X=0 Or Y=0) And (X<>0 Or Y<>0) )D、X*Y=0 And X+Y<>017、i被j整除的逻辑表达式是________________。
( )A、i/j = 0B、i\j = 0C、i<>0D、i mod j = 018、如果文本框的Enable属性被设置为False,则运行时_________ . ( )A、文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上B、文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容C、文本框中的文本将变成灰色，用户仍能改变文本框中的内容D、文本框中文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容19、下列表达式中，值为True的是________。
( )A、UCase("ABCD")>="abcd"B、14/2\3>10 MOD 4C、Mid(“ABCD”,2,2)>Left(“ABCD”,2)D、not(Sqr(4)-3>= -2)20、执行下面的程序，单击窗体后在窗体上显示的结果是________。
Private Sub Form_Click()Dim Strl As String, Str2 As String,I As IntegerStr1=”ab”For I=Len(Str1)To 1 Step-1Str1=Str1&Chr(Asc(Mid(Str1,I,1))+I)Next IPrint Str1End Sub ( )A、abceB、abcdC、abdbD、abfd21、设有如下语句：strl=InputBox("输入","","练习")从键盘上输入字符串"示例"后，strl 的值是________。
( )A、“输入”B、“”C、“练习”D、“示例”22、假设X的值是5，则执行以下语句时，可得到的输出结果是ABCDEF 的SelectCase 语句是________。
( )A、Select Case XCase 10 TO 1Print “ABCDEF”End SelectB、Select Case XCase Is>15, Is<5Print“ABCDEF”End SelectC、Select Case XCase Is>5, 1, 3, TO 10Print “ABCDEF”End SelectD、Select Case XCase 1, 3, Is>5Print “ABCDEF”End Select23、下面程序的内层循环次数是________。
For i=1 TO 3For j=1 TO iFor k=j TO 3...Next kNext jNext i ( )A、3B、14C、9D、2124、下面程序段运行后，显示的结果是____________。
Dim xIf x Then Print x Else Print x +1 ( )A、1B、0C、-1D、显示出错信息25、在过程中有语句ForI=N1 To N2 Step N3，在该循环体内有下列四条语句，其中________会影响循环执行的次数。
①N1=N1+I ②N2=N2+N3 ③I=I+N3 ④N3=2*N3 ( )A、①②B、①②③C、③D、①②③④26、以下语句中，不能正确执行的是____________。
( )A、If Optionl.Value ThenB、If Optionl.Value=True ThenC、Check1.Value=0D、Check1.Value=True27. 以下程序段的输出结果是____________。
Dim B(2, 2) As IntegerDim i, j, t As IntegerFor i = 1 To 2For j = 0 To 2B(i, j) = jNext jNext it = 1For i = 0 To 2For j = 0 To 2t = t + B(i, B(j, j))Next jNext iPrint tA、3B、4C、1D、728、以下程序输出的结果是____________。
Dim aa=Array(1,2,3,4,5,6,7)For i=Lbound(a)To Ubound(a)a(i)= a(i)*a(i)Next iPrint a(i) ( )A、49B、0C、不确定D、程序出错29、Option Base 1Private Sub Command1_Click()Dim a%(3, 3)For i = 1 To 3For j = 1 To 3If j > 1 And i > 1 Thena(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1Elsea(i, j) = i * jEnd IfPrint a(i, j); " ";Next jPrintNext iEnd Sub ( )A、1 2 32 3 13 2 3B、1 2 31 2 31 2 3C、1 2 32 4 63 6 9D、1 1 12 2 23 3 330、在窗体的通用声明处有语句Dim A() As Single，以下在某事件过程中重定义此数组的一组正确语句是：____________。
( )A、ReDim A(3,3)<BR /> ReDim A(4,4) As IntegerB、ReDim A (3,3)<BR /> ReDim Preserve A (4,4)C、ReDim A(3)<BR /> ReDim A(3,3) As IntegerD、ReDim A (3,3)<BR /> ReDim Preserve A(3,4)31、下列有关数组的说法中，不正确的是________。
( )A、在窗体模块中不可以定义全局数据组B、可以使用Erase语句释放所有数组所占据的存储储空间C、语句Dim X(3.6+2)As Integer定义了一个维上界是6的一维的整型数组D、形参数组的类型可以是定长符串类型32、在窗体模块的通用声明处用下面的语句声明变量、数组，正确语句有________个。