电子科大19春《VB程序设计》在线作业2

VB程序设计19春在线作业2-0002
设用复制、粘贴的方法建立了一个命令按钮数组Command，以下对该数组的说法中错误的是()。

A:命令按钮的所有Caption属性都是Command1
B:代码中访问任意一个命令按钮只需使用名称Command1
C:命令按钮的大小都相同
D:命令按钮共享相同的事件过程
答案：B
下面()是不正确的。

A:使用ReDim语句可以改变数组的维数
B:使用ReDim语句可以改变数组的类型
C:使用ReDim语句可以改变数组的每一维的大小
D:使用ReDim语句可以对数组中的所有元素进行初始化
答案：B
Microsoft Access数据库文件的扩展名是()。

A:dbf
B:acc
C:mdb
D:db
答案：C
当一个对象(如窗体或图片框)被移动或改变大小之后；或当一个覆盖该对象的窗体被移开之后如果要保持该对象上所画图形的完整性,可以选择触发()事件来完成图形的重画工作。

A:Paint
B:Load
C:Click
D:Active
答案：A
函数Mid("SHANGHAI", 6,3)的值是()。

A:SHANGH
B:SHA
C:ANGH
D:HAI
答案：D。

vb程序设计书习题和参考答案练习题习题⼀⼀、判断题1．Visual Basic是以结构化的Basic语⾔为基础、以事件驱动作为运⾏机制的可视化程序设计语⾔。

2．⾯向对象的程序设计是⼀种以对象为基础，由事件驱动对象的编程技术。

3．事件是由Visual Basic预先定义的对象能够识别的动作。

4．新建⼯程时系统会⾃动将窗体标题设置为Form1。

5．控件的属性值不可以在程序运⾏时动态地修改。

6．决定对象是否可见的属性为Visible属性，决定对象可⽤性的属性是Enabled属性。

7．保存Visual Basic⽂件时，若⼀个⼯程包含多个窗体或模块，则系统先保存⼯程⽂件，再分别保存窗体或模块⽂件。

8．单击“启动”菜单项将窗体装⼊内存时，⼀定触发窗体的Load事件。

9．“事件过程”是⽤来完成事件发⽣后所要执⾏的程序代码。

10．在打开某窗体时，初始化该窗体中的各控件，应选⽤Load事件。

⼆、选择题1．⼯程⽂件的扩展名为。

A、.frxB、.basC、.vbpD、.frm2．下列不属于对象的基本特征是。

A、属性B、⽅法C、事件D、函数3．在设计模式双击窗体将显⽰的窗⼝是A、⼯程窗⼝B、⼯具箱C、代码窗⼝D、属性窗⼝4．VB中运⾏程序的快捷键是A、F2B、F5C、Alt+F35．改变控件在窗体中的上下位置应修改该控件的属性。

A、TopB、LeftC、WidthD、Right6.窗体模块的⽂件扩展名是A、.exeB、.basC、.frxD、frm7．设置窗体的字体⽤属性。

A、FontNameB、FontSizeC、FontBoldD、FontItalic8.设置窗体的字号⽤属性。

A、FontNameB、FontSizeC、FontBoldD、FontItalic9．下列选项中不属于事件的是。

A、DblclickB、LoadC、ShowD、KeyUp10．VB编制的程序保存在磁盘上，⾄少会产⽣何种⽂件。

A、.doc与.txtB、.com与.exe.C、.bat与.frmD、.vbp与.frm三、程序设计题1．新建⼀个⼯程，单击窗体时，在窗体上显⽰“欢迎使⽤Visual Basic程序”。

VB程序设计19春在线作业2-0005
下面的过程定义语句中合法的是()。

A:Sub Proc1(ByVal n（))
B:Sub Proc1(n) As Integer
C:Function Proc1(Proc1)
D:Function Proc1(ByVal n)
答案：D
假设窗体的当前坐标为(200. 200)，则执行语句Line Step(100, 100)-Step(200, 201)时，绘制的直线的终点坐标为()
A:(100, 100)
B:(200. 200)
C:(300，300)
D:(500,501)
答案：D
可以在窗体模块的通用声明段中声明()。

A:全局变量
B:全局常量
C:全局数组
D:全局用户自定义类型
答案：A
在一个语句行内写多条语句时，语句之间应该用()分隔。

A:逗号
B:分号
C:顿号
D:冒号
答案：D
求一个三位正整数N的十位数的正确方法是()。

A:Int(N/lO)-Int(N/100)*10
B:Int(N/10)-Int(N/100)
C:N-Int(N/100)*100
D:Int(N-Int(N/100)*100)
答案：A
要在窗体上显示图片，需设置窗体的()属性。

A:Caption。

VB程序设计19春在线作业2-0003试卷总分：100 得分:0一、单选题(共10道试题，共30分)1.要使滚动条表示最小值10,,应设置其0属性。

A.MinimizeB.MinC.Maxi mi zeD.Max正确答案:B2.在Visual Basic中坐标轴的缺省刻度单位是堤,用户可以根据实际需要使用()改变刻度单位。

A.ScaleMode 属性B.Scale 属性C.DrawStyle 属性D.DrawWidth 属性正确答案:A3.DrawStyle属性用于设置图形方法输出的线型，它受()属性的限制。

A.FillStyleB.FillColorC.BorderStyleD.DrawWidth正确答案:D4.要使滚动条表示最大值100,应设置()属性。

A.MinimizeB.MinC.MaximizeD.Max正确答案:D5.执行语句 Forml. ScaleLeft=100 : Forml . ScaleTop=200 之后，窗体 Forml 的左上角坐标为 OoA.(0, 0)B.(200, 100)C.(100. 200)D.视ScaleMode属性的当前值而定正确答案:C6.语句 Line (100, 100)-(500, 500), , B 的功能是()。

B.使用窗体的前景颜色绘制一条直线D.使用窗体的背景颜色绘制一条直线正确答案:A7.运行时，要清除图片框P1中的图像，应使用语句()。

A.Pl .PictureB.Pl. Picture二LoadPicture()C.Picturel. Picture = LoadPictureD.Picture = LoadPicture(〃〃) 正确答案:B8.要强制显式声明变量，可在窗体模块或标准模块的通用声明段中加入语句()cA.Option Base 0B.Option ExplicitC.Option Base 1D.OPtion Compare正确答案:B9.函数 Len (Str (Vai ("123. 4〃)))的值为()。

电子科技大19秋《VB程序设计》在线作业1
试卷总分:100 得分:100
【试题】在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：【试题】PrivateSubCommand1_Click()
【试题】DimnumAsInteger
【试题】num=1
【试题】DoUntilnum6
【试题】Printnum;
【试题】num=num+2.4
【试题】Loop
【试题】EndSub
【试题】程序运行后，单击命令按钮，则窗体上显示的内容是（）。

[A.]13.45.8
[B.]135
[C.]147
[D.]无数据输出
[仔细阅读以上题目，并完成该试题]
参考选项:B
【试题】当一个工程含有多个窗体时，其中的启动窗体是（）。

[A.]启动VosualBasic时建立的窗体
[B.]第一个添加的窗体
[C.]最后一个添加的窗体工程属性
[D.]在“工程属性”对话框中指定的窗体
[仔细阅读以上题目，并完成该试题]
参考选项:D
【试题】设有如下程序：
【试题】OptionBase0
【试题】PrivateSubForm_Click()
【试题】Dima。

第二部分Visual Basic 程序设计一、选择题(每题1分，共15分) 21．在Visual Basic 中最基本的对象是_______，它是应用程序的基石，也是其他控件的容器。

A ．文本框 B ．命令按钮 C ．窗体 D ．标签22．应用程序窗体的名称属性为Frml ，窗体上有一个命令按钮，其名称属性为Cmdl ，窗体和命令按钮的Click 事件过程名分别为________。

A ．Form_Click()、Command1_Click()B ．Frm1_Click()、Command1_Click()C ．Form_Click()、Cmd1_Click()D ．Frm1_Click()、Cmd1_Click()23．多窗体程序由多个窗体组成。

在缺省情况下，VB 在执行应用程序时，总是把______指定为启动窗体。

A ．不包含任何控件的窗体B ．设计时的第一个窗体C ．命名为Frm1的窗体D ．包含控件最多的窗体 24．使用________方法可将新的列表项添加到一个列表框中。

A ．PrintB ．AddItemC ．ClearD ．RemoveItem25．若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用________关键字在该过程中定义局部变量。

A ．DimB ．PrivateC ．PublicD ．Static 26．下列表达式中，值为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) 27．下列_________说法是不正确的。

A ．当程序正常结束时，所有没用Close 语句关闭的文件都会自动关闭B ．在关闭文件或程序结束之前，可以不用Unlock 语句对已锁定的记录解锁C ．可以用不同的文件号同时打开一个随机文件D ．用Output 模式打开一个顺序文件，即使不对它进行写操作，原来内容也被清除 28．代数表达式)sin(2ln yx t ba x x e +-++++，对应的Visual Basic 表达式是__________。

VisualBasic程序设计VB程序设计-0031
贵州电大-形成性考核课程号：5205045 试卷满分答案
VB程序设计-0031
试卷总分：100
单选题(共20题,共80分)
1.(4分)
以下可产生工程组文件（.vbg）的情况是（）。

A、当一个程序包含两个以上工程时
B、当一个程序包含两个以上窗体时
C、当一个程序包含两个以上类模块时
D、当一个程序包含两个以上程序模块时
正确的选项是：A
2.(4分)
以下（）不是Visual Basic的特点。

A、结构化程序设计
B、集成可视化程序开发环境
C、事件驱动编程机制
D、可将用户的编程思想自动转换成程序代码
正确的选项是：D
3.(4分)
执行下面的语句后，信息框中按钮的数目及形式由值（）决定。

A=MsgBox("1",2 ,"3","",4)
A、1
B、2
C、3
D、4
正确的选项是：B
4.(4分)
隐藏窗体的方法为（）。

A、Unload
B、Cls。

20春《VB程序设计》在线作业1试卷总分:100 得分:100一、单选题 (共 20 道试题,共 100 分)1.在窗体中添加一个命令按钮，然后编写如下程序：Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox("Enter the Firstinteger") b=InputBox("Enter the Secondinteger") Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（）。

A.456B.246C.123123D.123答案:B2.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2,4,6 x = 20 Case Is<10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（）。

A.40B.30C.20D.10答案:D3.指出下面哪个语句不是写文件语句（）。

A.WriteB.PutC.PrintD.Output答案:D4.窗体上有一组合框Combol,窗体加载时的代码如下： Private Sub Form_Load() Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD”Combol. AddItem“组合音响” End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（）。

电子科技大学19秋《VB程序设计》在线作业2
试卷总分:100 得分:100
【题目】下列哪种说法正确的是（）。

[A.]通用对话框是VisualBasic6.0的内部标准控件
[B.]要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“MicrosoftCommonDialogControl6.0”
[C.]打开“部件”对话框只有一种方法
[D.]程序运行过程中，通用对话框在窗体中是可见的
[分析以上题目，并完成作答]
正确答案:B
【题目】设a=3,b=5,则以下表达式值为真的是（）。

[A.]a=bAndb10
[B.]ab)or(b0)
[C.](a0)Eqv(b0)
[D.](-3=5a)And(b0)
[分析以上题目，并完成作答]
正确答案:B
【题目】在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
【题目】PrivateSubCommand1_Click()
【题目】Dimarray1(10,10)AsInteger
【题目】DimI,jAsInteger
【题目】ForI=1To3
【题目】Forj=2To4
【题目】array1(I,j)=I+j
【题目】Nextj
【题目】NextI
【题目】Text1.Text=array1(2,3)+array1(3,4)
【题目】EndSub
【题目】程序运行后，单击命令按钮，在文本框中显示的值是（）。

答案+我名字在线考试——正在答题作业提交11.表达式2\2 * 2/2 * 2 mod 2的结果是(A)0(B)25(C)5(D)12.下列自定义标识符中非法的是：(A)Me(B)My(C)third(D)fIRst3.表达式“A”Like “[A-Z]”的结果为：(A)A(B)Z(C)TRUE(D)FALSE4.表达式x >= 20 and x<= 100，其中x=37时，结果为：(A)100(B)20(C)TRUE(D)flase5.逻辑表达式1>0 and Not 2<7 or 2>6的值为(A)0(B)FALSE(C)3(D)TRUE6.表达式x /=2 ,其中x = 24，运算后x的取值为：(A)12(B)6(C)48(D)247.下列可以作为VB变量的是：(A)a(x*y)(B)学生信息(C)1xyz(D)second8.表达式x *=2 ,其中x = 25，运算后x的取值为：(A)50(B)625(C)25(D)279.表达式100 mod 12 的结果为：(A)10(B)4(C)8(D)610.下列自定义标识符中合法的是：(A)1My(B)class(C)forth(D)@home11.表达式4<< 3 的结果为：(A)8(B)4(C)32(D)1612.表达式“张三”Like “张_*”的结果为：(A)张(B)TRUE(C)FALSE(D)张三13.后缀为.vbp的文件表示VB的(A)类模块文件(B)窗体文件(C)标准类模块文件(D)工程文件14.下列变量名合法的是(A)a_2(B)a-b(C)2xy(D)float15.后缀为.bas的文件表示VB的(A)工程文件(B)窗体文件(C)类模块文件(D)标准类模块文件16.下列语句是二维数组引用的是：(A)g(2)(3)(B)g(2,3)(C)g[2,3](D)g[2][3]17.同一行中书写多个语句的间隔符号为：(A)冒号( : )(B)箭头（->）(C)小数点( . )(D)减号( - )18.表达式1 + 25\ 6 * 2 / 3 mod 4 的值是(A)1(B)0(C)3(D)219.数据关系3<x≤10表示成正确的VB表达式为(A)3<x<=10(B)3<x and x<=10(C)3<x or x<=10(D)3<x and <=1020.表达式“Windows”Like “W_*_s”的结果为：(A)indow(B)FALSE(C)Windows(D)TRUE在线考试——正在答题作业提交21.下列语句正确的是(A)x=1; y=2; z=3(B)x=1 y=2 z=3(C)x=1, y=2, z=3(D)x=1 : b=2: z=32.下列语句哪个为二维数组的定义语句：(A)dim g [2,3](B)dim g[2][3](C)dim g(2 ,3)(D)dim g(2)(3)3.设a = “Visual Basic”，下面使b=”Basic”的语句是(A)b=left(a,8,12)(B)b=mid(a,8,5)(C)b=right(a,5,5)(D)b=left(a,8,5)4.求平方根的数学函数名为：(A)Math.Abs(B)Math.Sqr(C)Math.Exp(D)Math.PI5.获取字符串子串的函数为：(A)Mid(string)(B)Istr(string1,string2)(C)Trim(string)(D)LTrim(string)6.设置窗体有可见边框及标题栏，无最小化和最大化按钮，不能调整大小，BorderStyle属性应该设置为(A)2-Sizable(B)0-None(C)1-Fixed Single(D)3-Fixed Dialog7.窗体Caption属性的含义为(A)决定窗体标题栏显示的内容(B)设置窗体的大小(C)设置窗体的边框样式(D)决定是否显示窗体的控制菜单图标8.去掉字符串前后空格的函数为：(A)Mid(string)(B)LTrim(string)(C)Istr(string1,string2)(D)Trim(string)9.获取当前系统日期和时间的函数名为：(A)Now(B)Today(C)IsDate(D)TimeOfDate10.语句format(1234.5678 , ”####.00”)的结果为：(A)1234.56”(B)1234.55(C)1234.56(D)1234.5711.下列说法正确的是(A)静态局部变量是在过程中用static语句声明的(B)局部变量的作用域仅限于声明它的过程(C)局部变量在声明它的过程执行完毕后就被释放了(D)局部变量是指那些在过程中用Dim语句或Static语句声明的变量12.隐藏窗体所需要设置的属性是(A)ShowInTaskbar(B)Enable(C)Movable(D)Visible13.文本框控件的值是哪个属性(A)Caption(B)Value(C)Index(D)Name14.获取当前系统日期的函数名为：(A)Date(B)Now(C)TimeOfDate(D)IsDate15.引用对象的属性和方法使用的符号为：(A)小数点( . )(B)减号( - )(C)箭头（->）(D)冒号( : )16.VB提供控件的窗口是(A)文本框(B)工具箱(C)工具栏(D)属性窗口17.数学表达式sin30°写成VB的表达式为(A)sin30(B)sin(30)(C)sin(30°)(D)sin(30*3.14/180)18.窗体ControlBox属性的含义为(A)设置窗体的大小(B)决定是否显示窗体的控制菜单图标(C)决定窗体标题栏显示的内容(D)设置窗体的边框样式19.下列赋值语句正确的是(A)a=2×b(B)x=y+z(C)-b=a(D)y/z=a20.语句format(123.4567,”0000.00”)的结果为：(A)“0123.45”(B)“0123.46”(C)”123.45”(D)”123.46”在线考试——正在答题作业提交31.程序代码：text1.text = “UESTC”中，Text1,Text,“UESTC”分别代表( )(A)对象，方法，属性(B)对象，值，属性(C)对象，属性，值(D)属性，对象，值2.在窗体上按下鼠标左键时产生的事件是(A)KeyDown(B)MouseMove(C)MouseUp(D)MouseDown3.在设计菜单添加菜单项时，需要添加一个分隔条，标题设置为：(A)感叹号(B)减号(C)星号(D)加号4.修改控件属性，一般可以使用属性窗口，也可以通过什么形式赋值(A)代码(B)对象(C)方法(D)命令5.窗体的Load事件的触发时机是(A)窗体被加载时(B)用户单击窗体时(C)窗体显示之后(D)窗体被卸载时6.InputBox函数返回值的类型是(A)逻辑型(B)字符串(C)整数(D)日期型7.UBOUND函数的作用是(A)获取数组的下界(B)获取数组的长度(C)获取数组的上界(D)获取数组的维度8.按照变量的作用域可将变量划分为(A)动态、常熟、静态(B)公有、私有、系统(C)全局变量、模块级变量、过程级变量(D)Public、Private、Protected9.Dim arr(15)所定义的数组元素个数是(A)17(B)15(C)16(D)1410.在设计应用程序时，可以查看到应用程序工程中所有组成部分的窗口是(A)代码窗口(B)工程资源管理器窗口(C)窗体设计(D)属性窗口11.控件共有的属性是(A)Name(B)Caption(C)Text(D)Autosize12.能够改变标签显示标题的属性是(A)Caption(B)Name(C)Border(D)Text13.动态数组需要以下哪个关键字重新定义(A)Private(B)ReDim(C)DIM(D)Public14.如下数组声明语句，正确的是(A)Dim a[1,1] as interger(B)Dim a(2,2) as integer(C)Dim a(n,n) as integer(D)Dim a(4 4) as integer15.如果将文本框的什么属性设置为False，则运行时不能进行文本编辑(A)TabStop(B)MultiLine(C)Enabled(D)Visible16.键盘事件的执行顺序是(A)KeyPress,KeyDown,KeyUp(B)KeyDown,KeyPress,KeyUp(C)KeyUp,KeyDown,KeyPress(D)KeyUp,KeyPress,KeyDown17.下列语句不正确的是(A)使用ReDim语句可以改变数组的每一维的大小(B)使用ReDim语句可以改变数组的类型(C)使用ReDim语句可以对数组的所有元素进行初始化(D)使用ReDim语句可以改变数组的维数18.当运行程序时，系统自动执行启动窗体的(A)Load事件过程(B)Click事件过程(C)GotFocus事件过程(D)Unload事件过程19.如果想让文本框中的内容在运行时不能编辑，需设置文本框的属性是(A)MultiLine(B)Tabstop(C)Enabled(D)Visible20.msgbox函数的返回值类型是(A)日期型(B)字符串(C)逻辑型(D)MsgBoxResult。