VB题库-上机练习题[1]

合集下载

VB试题库及答案

VB试题库及答案最新VB题库及答案⼀、选择题第1部分1、在窗体（名称为Form1）上画⼀个名称为Text1的⽂本框和⼀个名称为Command1的命令按钮，然后编写⼀个事件过程。

程序运⾏后，如果在⽂本框中输⼊⼀个字符，则把命令按钮的标题设置为“计算机等级考试”。

以下能实现上述操作的事件过程是A、Private Sub Text1_Change()Command1.Caption = "计算机等级考试"End SubB、Private Sub Command1_Click()Caption = "计算机等级考试"End SubC、Private Sub Form_Click()Text1.Caption = "计算机等级考试"End SubD、Private Sub Command1_Click()Text1.Text = "计算机等级考试"End Sub2、在⼀⾏内写多条语句时，每个语句之间⽤（）符号分隔。

A、 ,B、：C、.D、；3、下⾯（）是合法的变量名。

A、X_YZB、123ABCC、INTEGERD、X-Y4、下⾯（）是合法的字符常量。

A、 ABC$B、“ABC”C、‘ABC’D、 ABC5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。

A、14B、 4C、20D、26、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是A、b=Left(a,10)B、b=Mid(a,10)C、b=Right(a,10)D、b=Mid(a,11,10)7、设a="a"，b="b"，c="c"，d="d"，执⾏语句x = IIf((a < b) Or (c > d), "A", "B")后，x的值为A、"a"B、"b"C、"B"D、"A"8、在窗体上画⼀个⽂本框，然后编写如下事件过程：Private Sub Form_Click()x = InputBox("请输⼊⼀个整数")Print x + Text1.TextEnd Sub程序运⾏时，在⽂本框中输⼊456，然后单击窗体，在输⼊对话框中输⼊123，单击“确定”按钮后，在窗体上显⽰的内容为A、123B、456C、579D、1234569、在BASIC中，三个逻辑运算符NOT，AND，OR在运算过程中，优先级从⾼到低的顺序是（）。

vb考试试题题库及答案

vb考试试题题库及答案VB（Visual Basic）是一种由微软公司开发的编程语言，广泛用于开发Windows应用程序。

以下是一些VB考试的试题题库及答案，供参考：一、单选题1. 在VB中，以下哪个是正确的数据类型？- A. Integer- B. Real- C. String- D. All of the above答案：D2. VB中的“Sub”过程与“Function”过程的区别是什么？- A. Sub过程可以返回值，Function过程不能- B. Function过程可以返回值，Sub过程不能- C. 两者都可以返回值- D. 两者都不能返回值答案：B3. 在VB中，以下哪个是正确的变量声明方式？- A. Dim x- B. Declare x As Integer- C. Both A and B- D. None of the above答案：C二、多选题1. VB中的控件可以具有哪些属性？- A. Name- B. Caption- C. Font- D. All of the above答案：D2. VB中，以下哪些是事件驱动的编程语言的特点？- A. 事件驱动的程序在事件发生时执行代码- B. 程序的执行顺序由事件的触发顺序决定- C. 程序可以同时响应多个事件- D. 程序必须等待事件的发生才能执行答案：A, B, C三、判断题1. VB是一种编译型语言。

- 正确- 错误答案：错误2. 在VB中，可以使用“Print”方法在文本框中显示文本。

- 正确- 错误答案：正确3. VB中的“Option Explicit”语句可以强制声明所有变量。

- 正确- 错误答案：正确四、简答题1. 简述VB中的事件和方法的区别。

答案：事件是用户或系统触发的动作，如点击按钮、键盘输入等。

方法是一种过程，可以包含代码来执行特定的任务或计算。

事件通常与控件相关联，并可以触发方法的执行。

2. 解释VB中“类”的概念。

VB上机试题及答案

上机操作练习题1．某数组有20个元素,其值为随机产生的两位整数。

现要求将前10个元素与后10个元素对换。

即第1个元素与第20个元素互换,第2个数与第19个元素互换，…,第10个元素与第11个元素互换.在窗体上输出数组原来各元素的值与对换后各元素的值。

Option explicitDim a(1 to 20) as integer, I as integer，j as integer, t as integerPrivate Sub Form_Load(）ShowPrint "原始数组是：”RandomizeFor i = 1 To 20a(i) = Int（Rnd ＊90）+ 10Print a(i）；If i Mod 10 = 0 Then PrintNext iPrintPrint ”现在数组是：”For i = 1 To 10j = 21 - it = a（i）：a(i）= a(j）：a(j) = tNext iFor i = 1 To 20Print a（i)；If i Mod 10 = 0 Then PrintNext iEnd Sub2．从数组中删除一个数。

先定义一个一维数组，大小、数组的值自定。

从键盘上输入一个数，若这个数在数组当中，就把它删除；若这个数不在数组中，提示“该数不在数组中"注意:1)如果数组中存在多个与该数相同的元素,每一个都能删除；2）能实现多次删除Private Sub Form_Load（）ShowReDim a（9）As Integerm = 1Print ”原来数组为:”For i = 0 To 9a(i) = InputBox(”请输入第”＆m ＆"个数：”）Print a(i)；m = m + 1Next iPrintn = InputBox(”查找的数是："）i = 0：flag = FalseDoIf a(i) = n Thenj = i：flag = TrueFor k = j To UBound（a) - 1a（k）= a（k + 1)Next kReDim Preserve a(UBound(a) - 1)i = i - 1End Ifi = i + 1Loop While (i <= UBound（a）)If flag = False ThenMsgBox n ＆"不在该数组中”ElsePrint ”删除”＆n ＆"后的数组是：”For i = 0 To UBound(a）Print a(i）；Next iEnd IfEnd Sub3．数组a中存放着升序排列的数据，使用array赋值，将inputbox输入的新数插入到数组中，插入后数组仍有序。

vb上机练习试题及答案

第一章概述一、基本要求（1）熟悉VB集‎成开发环境‎（2）掌握代码窗‎口的应用及‎录入、编辑代码的‎基本方法（3）了解VB程‎序设计的基‎本步骤二、实习内容（1）实习熟悉V‎B集成开发‎环境各组成‎部分（2）输入一个数‎，求该数的平‎方并显示结‎果第二章一、基本要求（1）熟练掌握各‎种运算符的‎应用和优先‎顺序（2）掌握各种常‎用函数的功‎能、参数和返回‎值（3）掌握立即窗‎口的使用方‎法二、实验内容（1）回答整形、长整型、单精度、双精度类型‎数据占用字‎节数。

（2）已知直角三‎角形的两条‎直角边长，求斜边长。

Priva‎t e Sub Comma‎n d1_C‎l ick()Dim a%, b%, c%a = Val(Input‎B ox("输入第一条‎直角边长"))b = Val(Input‎B ox("输入第二条‎直角边长"))c = Sqr(a ^ 2 + b ^ 2)Print‎cEnd Sub（3）给小学生随‎机出两位数‎和一位数的‎加法题。

Priva‎t e Sub Comma‎n d1_C‎l ick()Dim a%, b%, c%a = Val(Input‎B ox("输入两位数‎"))b = Val(Input‎B ox("输入一位数‎"))c = a + bPrint‎cEnd Sub（4）用文本框输‎入一个带小‎数的数，对输入的数‎四舍五入保‎留2位小数‎。

Priva‎t e Sub Comma‎n d1_C‎l ick()Dim x#, y!x = Text1‎.Texty = Round‎(x, 2)Print‎yEnd Sub（5）输入某人姓‎名，判断是否你‎的本家。

Priva‎t e Sub Comma‎n d1_C‎l ick()Dim a$, b$, p As Boole‎a nb = "李"a = Input‎B ox("输入某人的‎姓名")If Left(a, 1) = b Thenp = TrueEnd IfPrint‎pEnd Sub（6）任意输入西‎安地区的固‎定电话号码‎（原为7位），将其升为8‎位（在原号码前‎面加8）。

国家二级VB机试(上机操作)模拟试卷108(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷108(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Forml的窗体上画两个名称分别为Frame1、Frame2的框架，标题分“修饰”；在Frame1中画两个单选按钮，名称分别为Optionl、Option2，别为“字号”、标题分别为“10号字”、“20号字”，且标题显示在单选按钮的左边；在Frame2中画一个名称为Checkl的复选框，标题为“下划线”。

运行后的窗体如图3．120所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。

(2)在名称为Forml的窗体上从上到下画两个文本框，名称分别为Text1、Text2；再画一个命令按钮，名称为Commandl，标题为“选中字符数是”。

程序运行时，在Textl中输入若干字符，选中部分内容后，单击“选中字符数是”按钮，则在Text2中显示选中的字符个数(如图3．121所示)。

请编写按钮的Click事件过程。

要求：程序中不得使用变量，事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sit2．frm。

正确答案：第1小颢【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。

步骤2：按要求将文件保存至考生文件夹中。

第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性，步骤2：打开代码编辑窗口，编写以下事件过程：参考代码：Private Sub Commandl Click( )Text2．Text=Forml．Text 1．SelLengthEnd Sub步骤3：按要求将文件保存至考生文件夹中。

简单应用题2．(1)在名称为Forml的窗体中面一个名称为L1的标签，其标题为“0”，BordeiStyle属性为1；再添加一个名称为Timerl的计时器。

VB练习题(上机)含答案

VB练习题(上机)含答案VB练习题(上机)含答案第一部分1 在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。

程序运行后，单击命令按钮完成以下工作：①随机产生20个0到1000的整数，将其放入一个一维数组中②求出所有元素的平均值，并显示在窗体上(如下图所示)Private Sub Cmd1_Click()Dim a%(19), i%, sum!, aver!RandomizeFor i = 0 To 19a(i) = Int(Rnd * 1001)sum = sum + a(i)Next iaver = sum / 20Print averEnd Sub2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮，如下图所示。

在程序运行时，单击"转换"按钮，可以把Text1中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。

Private Sub C1_Click()Dim ch As String, ch1 As String, i%ch = Text1For i = 1 To Len(ch)If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Thench1 = ch1 + LCase(Mid(ch, i, 1)) Elsech1 = ch1 + UCase(Mid(ch, i, 1)) End IfNext iText1 = Text1 + vbCrLfText1 = Text1 + ch1End Sub3 在窗体上添加一个命令按钮(名称为MyCmd1，标题为"输出最大值")。

程序运行后，单击命令按钮完成以下工作：①随机产生30个0～1000的整数，将其放入一个一维数组中②求出其中的最大值，并显示在窗体上。

VB题库,全

『单项选择』以下关于vb 语言的说法中,正确的是(B).A:vb 是一种面向过程的语言B:vb 是一种面向对象语言C:vb是一种低级语言D:vb 是一种机器语言变量未赋值时,数值型变量的值为(A).A:0B:空C:1D:无任何值窗体的Caption属性的作用是(B).A:确定窗体的名称B:确定窗体的标题C:确定窗体的边界类型D:确定窗体的字体(D)对象具有Clear方法.A:图片框B:窗体C:复选框D:列表框vb 程序设计中的窗体在OOP 中称为(C).A:屏幕B:事件C:对象D:控件VisualBasic集成环境的大部分窗口都可以从主菜单项(B)的下拉菜单中找到相应的打开命令.A:编辑B:视图C:格式D:调试当一个对象(如窗体或图片框)被移动或改变大小之后,或当一个覆盖该窗体被移开之后,如果要保持该所画图形的完整性,可以选择触发(A)事件来完成图形的重画工作.A:PaintB:LoadC:ClickD:ActiveVisualBasic的编程机制是(D).A:可视化B:面向对象C:面向图形D:事件驱动答案：D〖第9题〗『单项选择』(2分)(题号:231)vb 中的坐标系最小刻度为(A).A:缇B:象素C:厘米D:一个标准字符宽度窗体设计器是用来设计(B).A:应用程序的代码段B:应用程序的界面C:对象的属性D:对象的事件Rnd函数不可能产生的(B)值.A:0B:1C:0.1234D:.00005RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB (红.绿.蓝),括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置(A)属性.A:Max和MinB:Smallchange和LargeChangeC:Scroll和ChangeD:Value不管一个对象的属性如何设置,程序运行时始终都能接收焦点的方法是(D).A:用Tab键B:用鼠标C:用方向键D:不能实现vb 中的坐标圆点位于(B).A:容器右上角B:容器左上角C:容器正中央D:容器右下角VisualBasic是一种(B)程序设计语言.A:过程式B:非过程式C:机器D:低级VB认为下面(A)组变量是同一个变量.A:A1和a1B:SUM和SUMMARYC:A VER和A VERAGED:A1和A_1vb 应用程序是分层管理的,其最高的层次为(A). A:工程B:模块C:窗体D:过程(C)对象不能作为控件的容器.A:FormB:PictureBoxC:ShapeD:FrameVB应用程序的运行模式是(C).A:解释运行模式B:编译运行模式C:两者都有D:汇编模式窗体的Enable属性的属性值是(C)类型的数据.A:整型B:字符型C:逻辑型D:实型INT(100*RND(1))产生的随机整数的闭区间是(A). A:[0,99]B:[1,100]C:[0,100]D:[1,99](D)对象不具有Caption属性.A:LabelB:OptionC:FormD:Timer"对象"是计算机系统运行的(D).A:程序单位B:逻辑单位C:物理实体D:基本实体函数InStr("VB程序设计教程","程序")的值为(C). A:1B:2C:3D:4语句PRINT"INT(-13.2)";INT(-13.2)的输出结果为(D).A:INT(-13.2)=-13.2B:INT(-13.2)=13.2C:INT(-13.2)=-13D:INT(-13.2)=-14产生[10,37]之间的随机整数的VisualBasic表达式是(B). A:In t(Rnd(1)*27)+10B:Int(Rnd(1)*28)+10C:Int(Rnd(1)*27)+11D:Int(Rnd(1)*28)+11表达式4+5\6*7/8Mod9的值是(B).A:4B:5C:6D:7表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(C).A:4^5B:3*4C:x+1D:SIN代数式exSin(300)2x/(x+y)lnx对应的VB表达式是(C).A:E^X*Sin(30*3.14/180)*2*x/x+y*log(x)B:Exp(x)*Sin(30)*2*x/(x+y)*ln(x)C:Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*log(x)D:Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*ln(x)设a=6,则执行x=IIf(a>5,-1,0)后,x的值为(D).A:5B:6C:0D:-1Line(100,100)-Step(400,400)将在窗体(C)画一直线.A:(200,200)到(400,400)B:(100,100)到(300,300)C:(100,100)到(500,500)D:(100,100)到(400,400)代数式x1-|a|+ln10+sin(x2+2л)/cos(57o)对应的VisualBasic 表达式是(A).A:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3.14/180)B:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57*3.14/180)C:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57)D:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57)表达式25.28Mod6.99的值是(C).A:1B:5C:4D:出错常量-0.00013579的科学计数法是(C).A:-1,3579E+0.4B:.00013579C:-13.579E-5D:-1.3579E-0.4以下各表达式中, 计算结果为0的是(D).A:INT(12.4)+INT(-12.6)B:CINT(12.4)+CINT(-12.6)C:FIX(13.6)+FIX(-12.6)D:FIX(12.4)+FIX(-12.6)系统符号常量的定义通过(A)获得.A:对象浏览器B:代码窗口C:属性窗口D:工具箱表达式Mid("SHANGHAI",6,3)的值是(D).A:SHANGHB:SHAC:ANGHD:HAI表达式X+1>X是(D).A:算术表达式B:非法表达式C:字符表达式D:关系表达式\、/、Mod、*等4个算术运算符中,优先级最低的是(C). A:B:/C:ModD:*函数Int(10*Rnd)是在(D)范围内的整数.A:[0,1]B:[1,10]C:[1,9]D:[0,9]函数Ucase(Mid("visualbasic",8,8))的值为(D).A:visualB:basicC:VISUALD:BASIC如果X是一个正的实数,将千分位四舍五入,保留两位小数的表达式是(B). A:0.01*int(x+0.05)B:0.01*int(100*(x+0.005))C:0.01*int(100*(x+0.05))D:0.01*int(x+0.005)不能正确表示条件"两个整型变量A和B之一为0,但不能同时为0"的布尔表达式(D).A:A*B=0ANDA<>BB:(A=0ORB=0)ANDA<>BC:A=0ANDB<>0ORA<>0AND B=0D:A*B=0AND(A=0ORB=0)标准工具箱中的控件(B).A:数目是固定不变的B:数目可以增加或减少C:包含了VisualBasic所有控件D:在窗体建立对象时不一定被使用表达式(7\3+1)*(18\5-1)的值是(C).A:8.76B:7.8C:6D:6.67表达式INT(8*SQR(36)*10^(-2)*10+0.5)/10的值是(C).A:0.48B:0.048C:.5D:.05函数Len(Str(Val("123.4")))的值为(C).A:11B:5C:6D:8求以10 为底X 的常用对数的表达式为(A).A:LOG(X)/LOG(10)B:LN(X)C:LOG(X)/LOG(E)D:LOG(X)语句listl.removeitem 1 将删除list.listindext等于(D)的项目..A:0B:2C:3D:1以下可以作为VB变量名的是(B).A:SIN B:CO1 C:COS(X) D:X(-1)MSGBOX函数中有4个参数,其中必须写明的参数是(C).A:指定对话框中显示按钮的数目B:设置对话框标题C:提示信息D:所有参数都是可选的要在图片框P1中打印字符串"HowAreYou",应使用语句(C).A:Picture1.Print="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")C:P1.Print"HowAreYou"D:Print"HowAreYou"InputBox函数返回的函数值的类型是(C).A:数值B:字符串C:数值或字符串D:根据需要可以是任何类型数据要使得标签能自动扩充以满足字体大小则可对其(C)属性进行设置. A:alignmentB:usemnemonicC:autosizeD:tag如果要在命令按钮上显示图形文件,应设置命令按钮的(B).A:Style属性和Graphics属性B:Style属性和Picture属性C:Picture属性D:Graphics属性要在命令按钮控件上显示图像应(C).A:设置Picture属性B:实现不了C:先将Type设置为1,然后再设置Picture属性D:以上都不对工具栏中的"启动"按钮的作用是(A).A:运行一个应用程序B:运行一个窗体C:工程管理窗口D:打开被选中对象的代码窗口下列字符串常量中,最大的是(C).A:"北京"B:"上海"C:"天津"D:"广州"货币型数据需(D)字节.A:2B:4C:6D:8设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是(B).A:TrueB:FalseC:1D:出错信息列表框控件中的列表内容是通过(C)属性设置的.A:NameB:CaptionC:ListD:Text下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作(A). A:Open "c:\file1.dat"For Output as #1B:Open "c:\file1.dat" For Input as #1C:Open "c:\file1.dat" For Append as #1D:Open "c:\file1.dat" For Write as #1清除列表框的所有选项应选择下列哪种方法(A).A:ClearB:ClsC:ClearItemD:RemoveItem要使标签所在处透明显示背景,应把其Backstyle属性设置为(A).A:0B:1C:2D:3骰子是一个正六面体,分别用1~6 代表这六个面,掷一次骰子出现的数可表示为(A).A:int(rnd*6+1)B:int(rnd*6)C:int(rnd*7)D:int(rnd(6)+1)下列数据类型中,占用内存最小的是(B).A:BooleanB:ByteC:IntegerD:Single要使得窗体一开始运行就充满整个屏幕则须设置()属性.A:borderstyleB:appearanceC:windowstateD:drawmode下面(C)是日期型常量.A:"12/19/99"B:12/19/99C:#12/19/99#D:{12/19/99}以下叙述中错误的是(C).A:打开一个工程文件时,系统自动装入与该工程有关的窗体、标准模块等文件B:保存VisualBasic程序时,应分别保存窗体文件及工程文件C:VisualBasic应用程序只能以解释方式执行D:事件可以由用户引发,也可以由系统引发将焦点主动设置到指定的控件或窗体上,应采用(B)方法.A:SetDataB:SetFocusC:SetTextD:GetGata下列(A)是窗体的扩展名.A:frmB:basC:clsD:dll下列语句中正确的是(D).A:txt1.text+txt2.text=txt3.textB:=cmdokC:12label.caption=1234D:a=inputbox(hello)形状控件所显示的图形不可能是(D).A:圆B:椭圆C:圆角正方形D:等边三角形以下控件中不属于容器的是(C).A:Form控件B:PictureBoxC:ImageD:Frame如果TAB函数的参数小于1,则打印位置在第(B)列.A:0B:1C:2D:3将CommonDialog通用对话框的类型设置为字体对话框,可设置该控件的(D)属性.A:FontB:FilterC:flagsD:Action要使一个文本框具有水平和垂直滚动条,则应先将其MultiLine属性设置为True,然后再将ScrollBar属性设置为(D).A:0B:1C:2D:3已知A?B?C中C最小,则判断A?B?C可否构成三角形三条边长的逻辑表达式是(B).A:A>=B And B>=C And C>0B:A+C>B And B+C>A And C>0C:(A+C)>=C And A-C <=C) And C>0D:A+B>C And A-B>C And C>0退出VisualBasic的快捷键是(C).A:Ctrl+QB:Shift+QC:Alt+QD:Ctrl+Alt+Q下列方法中可用于列表框动态添加数据的是(B).A:addB:additemC:addlistD:removeitem运行下面的程序:CLSLINE (100,100)-(200,50)LINE - (150,150)LINE -(100,100)屏幕上显示的是(D).A:三条放射形直线B:四条放射形直线C:矩形D:三角形不具有输入数据功能的控件是(D)控件.A:文本框B:选项按钮C:列表框D:窗体以下这段在FORM的CLICK事件中的程序运行后的结果是(D). CurrentX=1500CurrentY=500Line-(3000,2000)Line-(1500,2000)Line-(1500,500)A:三条直线B:矩形C:三角形D:等腰直角三角形为使文本框显示滚动条,必须首先设置的属性是(A).A:MulitilineB:AutosizeC:AlignmentD:Scrollbars设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,则另一个命令按钮的名称不能是(C).A:cmdcB:cmdbC:cmdAD:Command1设组合框Combo1中有3个项目,则以下能删除最后一项的语句是(B). A:Combo1.RemoveItemTextB:Combo1.RemoveItem2C:Combo1.RemoveItem3D:Combo1.RemoveItemCombo1.Listcount如果在图片框上使用绘图方法绘制一个圆,则图片框的(B)属性不会对该圆的外观产生影响.A:BackColorB:ForeColorC:DrawWidthD:DrawStyle为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为(D).A:5B:500C:300D:5000激活属性窗口使用的键是(C).A:F2B:F3C:F4D:F5如果没有在列表框中选择项目,且列表框的MultiSelect属性值为默认值(0~None),则执行语名List1.RemoveItemList1.ListIndex的结果是(C).A:删除列表框的最后一项B:删除列表框的第一项C:出错D:删除列表框中的最后添加的一项为了在按下回车键时执行某个按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是(D).A:ValueB:CancleC:EnableD:Default要想返回文本框中输入的内容则可利用其(B)属性进行编程.A:captionB:textC:nameD:righttoleft每个窗体对应一个窗体文件,窗体文件的扩展名是(C).A:.basB:.clsC:.frmD:.vbp控件是(A).A:建立对象的工具B:设置对象属性的工具C:编写程序的编辑器D:建立图形界面的编辑窗口下列可缩放图片的属性是(C).A:autosizeB:pictureC:stretchD:OleDrawMode设置列表框选中的文本用(D)属性.A:selectedB:captionC:textD:list为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的Multiselect属性设置为(C).A:0B:1C:2D:3列关于窗体上控件的基本操作错误的是(A).A:按一次DEL键只能删除一个控件B:按下一次DEL键可以同时删除多个控件C:按住SHIFT键,然后单击每个要选择的控件,可以同时选中多个控件D:按住ALT键,然后单击每个要选择的控件,可以同时选中多个控件要在窗体上显示图片,需设置窗体的(C)属性.A:CaptionB:IconC:Picture D:ControlBox如果要改变窗体的标题,则需要设置的属性是(A).A:CaptionB:NameC:BackColorD:BorderStyle1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。

2013年3月全国计算机等级考试二级VB无纸化上机题题库及答案解析(1)

2013年3月全国计算机等级考试二级VB上机题库—1—第一套上机题题干166一、基本操作题请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组，含三个命令按钮，它们的Index 属性分别为0、1、2，标题依次为"是"、"否"、"取消"，每个按钮的高、宽均为300、800。

窗体的标题为"按钮窗口"。

运行后的窗体如图1所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

图1(2)在名称为Form1的窗体上画一个名称为Sha1的形状控件，然后建立一个菜单，标题为"形状"，名称为shape0，该菜单有两个子菜单，其标题分别为"正方形"和"圆形"，其名称分别为shape1和shape2，如图2所示，然后编写适当的程序。

程序运行后，如果选择"正方形"菜单项，则形状控件显示为正方形；如果选择"圆形"菜单项，则窗体上的形状控件显示为圆形。

注意：程序中不能使用变量，每个事件过程中只能写一条语句。

保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

图2二、简单应用题(1)在考生文件夹下有一个工程文件sjt3.vbp，窗体上已经有两个文本框，名称分别为Text1、Text2；一个命令按钮，名称为C1，标题为"确定"；请画两个单选按钮，名称分别为Op1、Op2，标题分别为"男生"、"女生"；再画两个复选框，名称分别为Ch1、Ch2，标题分别为"体育"、"音乐"。

vb上机考试题库及答案86套

vb上机考试题库及答案86套VB上机考试题库及答案86套1. 选择题- 1.1 VB中，用于声明变量的关键字是（）。

- A. Dim- B. Declare- C. Let- D. Set- 答案：A- 1.2 下列哪个选项是VB中合法的变量名？（）- A. 123abc- B. _name- C. name$- D. name 2- 答案：B2. 填空题- 2.1 VB中，使用（）函数可以将字符串转换为数值。

- 答案：Val- 2.2 在VB中，使用（）关键字可以定义一个数组。

- 答案：Dim3. 简答题- 3.1 简述VB中的事件驱动编程的概念。

- 答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、消息、定时器等）触发，而不是按照预先定义的顺序执行。

4. 编程题- 4.1 编写一个VB程序，实现计算两个数的和并输出结果。

- 答案：```vbDim num1 As IntegerDim num2 As IntegerDim sum As Integernum1 = 5num2 = 10sum = num1 + num2Debug.Print "The sum is: " & sum```5. 判断题- 5.1 VB中，使用“=”符号可以比较两个变量的值是否相等。

（） - 答案：错误。

应该使用“==”符号进行比较。

- 5.2 在VB中，可以使用“End”关键字来结束一个程序的执行。

（）- 答案：正确。

6. 综合应用题- 6.1 设计一个VB程序，实现用户输入姓名和年龄，程序输出“欢迎你，[姓名]，你今年[年龄]岁。

”- 答案：```vbSub Main()Dim name As StringDim age As Integername = InputBox("请输入你的姓名：")age = Val(InputBox("请输入你的年龄："))MsgBox "欢迎你，" & name & "，你今年" & age & "岁。

(完整word版)VB程序设计试题题库及答案.doc

VB程序设计笔试题题库一、选择题1 下列常量中，是 Integer类型常量的是（C ）。

A、123&B、-38844C、123%D、327682 下面选项中 () 是字符连接运算符 . （ A ）A、&B、AndC、%D、Mod3下面关于 VB 的集成开发环境（ IDE ）的叙述中，不正确的是（B ）。

A、IDE是设计、调试、运行 VB程序的工具。

B、用户不能随意关闭 IDE中的窗口。

C、" 窗体设计 " 窗口是用来设计应用程序界面（窗体）的。

D、打开 / 关闭各窗口的命令主要在 IDE的" 视图 " 菜单中。

4 len( “程vb序设计”)=( C ) 。

A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$( “123456”,3,2)执行后， A= （ A ）。

A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时 , 用来分隔每条语句的符号是 ( C ).A、,B、;C、:D、、8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。

A、将 True 转换为 1 ，将 False 转换为 0B、将 True 转换为 1 ，将 False 转换为 -1C、将 True 转换为 0 ，将 False 转换为 -1D、将 True 转换为 -1 ，将 False 转换为 09 表达式 2+3*4^5-SIN(X+1)/2 中最先进行的运算是 ( D ).A、SINB、4^5C、3*4D、x+110 如果 x=2 ，则表达式 x+1>2 Or sin(x)>0.9 And 3>x+3 的值（ B ）。

A、不能计算B、 TrueC、5D、False11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。

vb题库——精选推荐

一、选择题4、下列可作为VB变量名的是（B ）。

A．c*Del B．Alpha C．4a D．print首为字母，且不能含有符号，不能含有关键字及标记符5、用于字符串连接的运算符是（D ）。

A．& B．+ C．And D．A、B都可以+ ；连接两个字符串，或是将数值字符串变为数值与数值进行运算。

&；链接两个字符串，如果为数值型，则将其转为字符串在链接，若其前为变量，则需要加空格。

6、表达式33 MOD 17\3*2的值是（B）。

A．10 B．1 C．2 D．3乘方》负号》乘除》整除\ 》求余mod 》加减9、以下属于VB合法的数组元素是（D ）。

A．x8 B．x[8] C．x(0) D．x{6}10、用Dim A (-3 To 3) As Integer语句定义的数组的元素个数是（D）。

A．4 B．5 C．6 D．711、执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是（A ）。

A．Visual B．Basic C．6 D．1112、设a=10，b=5，c=1，执行语句Print a>b>c后，窗体上显示的是（ B ）。

A．True B．False C．1 D．出错信息15、命令钮标题热字的下划线，可通过（ B ）符号来设置。

A．＼＜B．& C．_ D．\＞18、命令按钮不支持（D ）事件。

A．Keyup B．Keypress C．Click D．Dblclick22、假定窗体上有一个标签，名为Labell，为了使该标签透明并且没有边框，则正确的属性设置为（A ）。

A．Label1.BackStyle=0 B．Label1.BackStyle=1Label1.Borderstyle=0 Label1.Borderstyle=1C．Label1.BackStyle=True D．Label1.BackStyle=FalseLabel1.BorderStyle=True Label1.Borderstyle=False23、以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是（C ）。

大学VB考试题库完整

大学VB考试题库一、单项选择题1、与传统的程序设计语言相比,Visual Basic最突出的特点是（C）。

A、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术2、赋值语句：a=123& MID("123456",3,2)执行后，a变量中的值是（C）。

A、"12334"B、123C、12334D、1573、保存一个工程至少应保存两个文件，这两个文件分别是（B）。

A、文本文件和工程文件B、窗体文件和工程文件C、窗体文件和标准模块文件D、类模块文件和工程文件4、以下能在窗体Form1的标题栏中显示"VisualBasic窗体"的语句是（C）。

A、="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=30B、y=π*r*rC、y=x+30D、3y=x8、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)属性进行设置。

vb上机考试试题

vb上机考试试题一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的属性？A. DimB. PublicC. PrivateD. Property2. VB中的“Option Explicit”语句的作用是什么？A. 定义变量类型B. 强制显式变量声明C. 隐藏变量D. 设置变量的作用域3. 在VB中，以下哪个控件用于显示图像？A. LabelB. TextBoxC. PictureBoxD. ComboBox4. 如果要为VB中的按钮控件添加点击事件，应该使用哪个事件？A. ClickB. DoubleClickC. MouseDownD. KeyPress5. 在VB中，以下哪个函数可以用于将字符串转换为数值？A. Str()B. Val()C. Chr()D. Asc()6. VB中的“Select Case”语句最多可以有多少个Case分支？A. 1B. 2C. 10D. 无限制7. 在VB中，以下哪个属性用于设置控件是否可见？A. VisibleB. EnabledC. CaptionD. Text8. 当在VB中创建一个数组时，数组的下标默认从哪个数字开始？A. 0B. 1C. 100D. -19. 在VB中，以下哪个方法用于获取文本框中输入的文本？A. TextB. CaptionC. ValueD. Name10. VB中的“With”语句用于什么目的？A. 初始化变量B. 创建对象C. 引用对象的多个属性或方法D. 定义数据类型二、填空题（每空3分，共30分）11. 在VB中，使用________关键字可以创建一个类。

12. 如果要让一个变量在整个应用程序中都可访问，应该使用________关键字声明它。

13. 在VB中，一个事件处理程序的名称通常由触发事件的控件名称、一个下划线和一个________组成。

14. 要循环遍历一个数组中的所有元素，可以使用________循环。

计算机VB二级考试上机题带答案

计算机VB二级考试上机题带答案2016年计算机VB二级考试上机题带答案1.使用Excel创建学生成绩图表后，可以进行以下哪项操作( )：a.修改工作表中的数据，而保持图表的数据不变b.修改图表标题的内容c.修改图表的插入方式d.修改图表的类型-------答案------：B,C,D2.测验法、问卷法、成长记录袋法是收集评价学生数据的常用方法，关于它们的说法中正确的是a.测验法适用于收集学生的知识水平、能力情况等信息b.成长记录袋法主要用于收集学生作品和学习反思等信息c.通过问卷法可以获得学生思想和态度等信息d.成长记录袋法有利于对学生的学习过程进行评价-------答案------：A,B,C,D3.收集学生信息的方法可以是( )a.测验法b.访谈法c.成长记录法d.问卷法-------答案------：A, B, C, D4.把收集、加工、和管理学生的信息作为实施有效教学的重要工作的原因是：( )a.教师只有根据学生的各种信息，判断学生存在的优势与不足，才能提出有针对性地改进建议。

b.教师只有对学生进行深入的了解，才能做到因材施教。

c.教师只有根据学生的特点及其学习的规律进行教学，才能真正促进学生的发展。

d.学生是教学活动的中心，教学是为了促进学生的全面发展。

5.下列关于发布个人网站的描述中哪些是正确的?a.发布个人网站时可以将自已的网站发布到网络服务商提供的网络空间b.发布个人网站时可以将自已的网站发布到本地机上c.发布到本地局域网内的个人网站不能供别人访问d.发布个人网站时可以利用FTP软件进行上传-------答案------：A,B,D6.教师建立的个人网站能够实现下列哪些功能?a.收集与管理课件、教案等教学资源b.发布课程安排c.进行作业布置d.展示个人风采-------答案------：A,B,C,D7.制作网页时，科学规划网页的做法是( )a.构图要力求简明，图形、标题、文字标注三者并重b.色彩搭配适宜c.一个网页多个主题d.用好超级链接是使网站结构合理有序，网页美观、简洁的关键因素-------答案------：A, B, D8.下列关于多媒体教学演示文稿制作的说法中，错误的是( )：a.制作教学演示文稿时，背景如果是黑色，则文字应尽量使用反差较小的蓝色或灰色b.制作教学演示文稿时，幻灯片的背景应增加多种风格，使幻灯片更具吸引力c.制作教学演示文稿时，适当设置超级链接，实现幻灯片之间的轻松跳转d.制作教学演示文稿时，应将课本中的内容尽量详细地包含在课件中，使演示文稿更完整9.幻灯片制作时，?以下做法正确的是( )a.构图要力求简明，图形、标题、文字标注三者并重b.?色彩搭配适宜c.动画要多，声音要多，文字要多d.注意画面的'美观，风格统一-------答案------：A,B,D10.在设计多媒体教学演示文稿的过程中，首先要进行需求分析，它包括哪几个方面的内容( )a.教学内容b.学生的认知特点c.教学目标d.教学活动-------答案------：A,B,C,D11.关于多媒体教学演示文稿，下列说法正确的是( )a.多媒体教学演示文稿可以整合文本、图形、图像、音频和视频等多种形式的媒体b.教师可以根据教学需要随时调整多媒体教学演示文稿中演示和呈现的内容，根据学生的反应及时调整播放节奏c.多媒体教学演示文稿具有制作方便、编辑灵活的特点，教师易于掌握d.在应用多媒体教学演示文稿辅助教学时，应坚持以形象化演示呈现教学内容的原则-------答案------：A,B,C12.教师在利用Flash制作课件时，会用到很多的实例与符号(也称元件)，对于实例与符号的关系，下列描述中不正确的是( )a.修改符号的属性不会影响实例的属性b.修改符号的属性会影响实例的属性c.修改实例的属性会影响符号的属性d.两者根本没有关系13.Flash课件制作完毕，经常需要将课件进行发布以后再提供给教师或是学生使用，Flash软件可以发布下列哪几种格式的文件( )a.swfb.jpgc.htmld.avi-------答案------：A,B,C14.下列说法中正确的是( )a.逐帧动画是把一系列的图形或文字放置在一系列关键帧中形成的动画。

VB期末考试试题及答案 (1)

V B期末考试试题及答案(1)------------------------------------------作者------------------------------------------日期第一部分：客观题一、单项选择题、在窗体模块的通用段中声明变量时，不能使用的关键字是（）✌、 ♓❍ 、 ◆♌●♓♍ 、 ❒♓❖♋♦♏ 、♦♋♦♓♍、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）✌、工程资源管理器窗口 、工具箱窗口、属性窗口 、代码窗口、若要使某可见控件获得焦点，可使用（）方法来实现。

Ａ、 ♏♐❒♏♦♒ Ｂ、 ♏♦♐☐♍◆♦ Ｃ、☝☐♦♐☐♍◆♦ Ｄ、✞♋●◆♏ 、下列不可作为✞变量名的是（）✌、✌❆ 、✌●☐♒♋ 、✌ 、✉♏●♦♋、表达式  ☐♎ ✉的值是（）✌、  、  、、 、下列语句中，正确的赋值语句是（）✌、 ♓     、 ♓   、  ♓   、 ♓ ✉   、执行下列程序段后，⌧的值是（）。

⏹   ⌧   ♓  ☐⌧  ⌧ ✉ ♓♓  ♓  ☹☐☐☐ ♒♓●♏ ♓  ⏹✌、  、  、 、 、当用户在窗体上单击鼠标时，不会触发的事件是（）Ａ、 ●♓♍ Ｂ、 ☐◆♦♏☐♦⏹ Ｃ、 ☐◆♦♏✞☐ Ｄ、♌●●♓♍、下列为整型变量的是（）✌、 ⌧✐ 、 ⌧✁ 、⌧ 、 ⌧、要从☞☐❒循环中直接退出循环，可使用的语句☎ ✆。

✌、☜⌧♓♦ ☐ 、☜⌧♓♦ ☹☐☐☐ 、☜⌧♓♦ ☞☐❒ 、 ♦☐☐、下列逻辑表达式中，能正确表示条件“⌧，⍓都是奇数”的是（）✌、⌧ ☐♎   ❒ ⍓ ☐♎   、⌧ ☐♎   ❒ ⍓ ☐♎ 、⌧ ☐♎   ✌⏹♎ ⍓ ☐♎  、⌧ ☐♎   ✌⏹♎ ⍓ ☐♎  、在通用声明中给出 ☐♦♓☐⏹ ♋♦♏ 语句，则数组♋包含（）个数组元素。

专升本VB上机编程作业1_题解

专升本Visual Basic上机编程作业（一）及题解一、循环结构程序设计：1、编程找满足条件的值。

例1：编程求解百钱买百鸡问题。

公鸡每只5元，母鸡每只3元，小鸡三只1元，百元钱买百只鸡，问公鸡、母鸡、小鸡各若干？程序代码如下：1Dim x%, y%, z %For x=1 To 20For y=1 To 33Z=100-x-yIf 5*x+3*y+z/3=100 Then Print ”公鸡：”; x ，”母鸡：”; y，”小鸡：” ;zNext yNext x请参考以上程序，完成下列编程。

1.1、（09专升本编程题）鸡免同笼问题：已知笼中鸡和免共36只，它们的脚共有100只，编程计算鸡和免分别有多少只。

Dim x As Integer, y%For x = 1 To 35y = 36 - xIf 2 * x + 4 * y = 100 Then Print "鸡："; x; "免："; yNext x1.2、已知两个三位数相加之和abc+cba=1333，编程计算并输出能满足这个条件的所有a、b、c的值。

Dim a%, b%, c%For a = 1 To 9For b = 0 To 9For c = 1 To 9If (a + c) * 100 + 2 * b * 10 + c + a = 1333 Then Print "a="; a, "b="; b, "c="; cNext cNext bNext a1.3、有一篮鸡蛋（总数小于500），二个一数多一个，三个一数多二个，四个一数多三个，五个一数多四个，六个一数多五个，七个一数正好，编程求鸡蛋的数量。

Dim i%For i = 1 To 499If i Mod 2 = 1 And i Mod 3 = 2 And i Mod 4 = 3 And i Mod 5 = 4 And i Mod 6 = 5 And i Mod 7 = 0 Then Print "鸡蛋的只数=:"; I ：exit forNext iDim i%i = 0Do Until i >= 500i = i + 1If i Mod 2 = 1 And i Mod 3 = 2 And i Mod 4 = 3 And i Mod 5 = 4 And i Mod 6 = 5 And i Mod 7 = 0 Then Print "鸡蛋的只数=:"; iLoop1.4、马克思曾经做过这样一道趣味数学题：有30个人在一家小饭馆里用餐，其中有男人、女人和小孩。

VB题库 (1)

'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)求100以内偶数的和，并将结果输出在窗体上。

' 将结果存入变量SUM中'-------------------------------------------------【参考代码】Dim i As IntegerFor i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNextPrint sum===============【考生代码】'-------------------------------------------------'【程序设计】'-------------------------------------------------'题目：(事件)单击窗体。

' (响应)求1!+2!+3!+……+10!的值，并在窗体上输出。

' 结果存入变量L中。

'-------------------------------------------------【参考代码】Dim i As IntegerDim s As LongDim j As Integers = 1For i = 1 To 10s = s * il = l + sNextPrint Str(l)===============【考生代码】'------------------------------------------------'【程序改错】'------------------------------------------------'题目：求s=2!+4!+6!+8!，阶乘的计算用Function过程' fact实现'------------------------------------------------Option ExplicitPrivate Sub Form_Click()Dim i As Integer, s As Long'**********ERROR**********For i = 2 To 8s = s + fact(i)Next iPrint sEnd Sub'**********ERROR**********Public Function fact()Dim t As LongDim i As Integert = 1For i = 1 To nt = t * iNext i'**********ERROR**********fact = iEnd Function【改错1】错误【学生答案】For i = 2 To 8【参考答案】For i=2 To 8 Step 2============================================================【改错2】错误【学生答案】Public Function fact()【参考答案】Public Function fact(ByVal n As Integer)Public Function fact(n As Integer)Public Function fact(n%)Public Function fact(n)Public Function fact(ByVal n%)Public Function fact(ByVal n)============================================================【改错3】错误【学生答案】fact = i【参考答案】fact = t============================================================'------------------------------------------------'【程序改错】'------------------------------------------------'题目：下面程序将10个整数从大到小排序'------------------------------------------------Option ExplicitPrivate Sub Form_Click()Dim t%, m%, n%, w%Dim a(10) As IntegerFor m = 1 To 10a(m) = Int(10 + Rnd() * 90)Print a(m); " ";Next mPrintFor m = 1 To 9t = m'**********ERROR**********For n = 2 To 10'**********ERROR**********If a(t) > a(n) Then n = tNext n'**********ERROR**********If t = m Thenw = a(m)a(m) = a(t)a(t) = wEnd IfNext mFor m = 1 To 10Print a(m)Next mEnd Sub【改错1】错误【学生答案】For n = 2 To 10【参考答案】For n=m+1 To 10============================================================【改错2】错误【学生答案】If a(t) > a(n) Then n = t【参考答案】If a(t) < a(n) Then t=nIf a(n)>a(t) Then t=n============================================================【改错3】错误【学生答案】If t = m Then【参考答案】If t<>m ThenIf not t=m ThenIf not m=t then============================================================编写一个华氏温度和摄氏温度之间转换的程序，在窗体上添加2个标签、2个文本框、2个命令按钮，如图1所示，在属性窗体修改控件的属性，使其运行时图2所示。