延边大学计算机VB练习题选择.docx

1、延边大学计算机VB练习题选择下面四个选项中，不是 VB6.0 工具箱的标准控件的是_C_。A.定时器B.滚动条 C.多媒体D.框架在设计阶段，当双击窗体上的某个控件时，所打开的窗口是_D_。A.属性窗口B.工具箱窗口C.工程资源管理器窗口 D.代码窗口在 Visual Basic 中最基本的对象是_B_，它是应用程序的基石，是其他控件的容器。A.文本框B.窗体C.标签D.命令按钮有说明语句： Dim x! ，则 x 是_B_类型的变量。A.整型B.单精度浮点型C.长整型D.双精度浮点型下面所列符号中，_C_不是数据类型说明符。A. !B. %C. ?D. #按变量名的定义规则，下面所列中，_C

2、_是错误定义的变量名。A.StudentB.Mark_2C.IntegerD.Max下列逻辑表达式中，值为 True 的是_A_。A.aATB.AaD.AT 1 ) To ( a + b 10)B.a + b 1C.a + b 1D.a + b 1表达式 InStr(2,文本文件,文) 的值是_A_。A.3B.5C.1D.0在 Visual Basic 中称各种可在对象上操作的过程为_D_。A.属性B.事件C.封装D.方法如果文本框的 Enabled 属性设为 False，则_B_。A.文本框的文本将变成灰色，用户仍然能改变文本框中的内容。B.文本框的文本将变成灰色，并且此时用户不能将光标置于

3、文本框上C.文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容。D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容。VB 提供了结构化程序设计的三种基本结构，三种基本结构是_C_。A.递归结构、选择结构、循环结构B.选择结构、过程结构、顺序结构C.选择结构、循环结构、顺序结构D.过程结构、输入输出结构、转向结构在使用 InputBox 时，必须设置的参数是_B_。A.无B.提示C.标题D.缺省下列赋值语句中，正确的是_D_。A.x+1=5B.a&=10eC.x!=abcD.s$=100执行 w=Choose(2,Red,Green,Bl

4、ue,Yellow) 语句后，变量 w 的值为_D_。A.NullB.RedC.BlueD.Green下列语句中，正确的是_A_。A.If x=y Then t=a: a=b: b=tB.If xy Then t=a;a=b; b=tC.If x=y Then t=a a=b b=tD.If xy Then t=a a=b b=t执行语句For i=1 to 3:i=i+1:Next i后变量i的值是B_。A.6B.4C.5D.3循环语句For i=20 To 10 Step -2的循环次数为_A_。A.6B.4C.不循环D.5语句 Dim Abc(5) 所定义的数组元素个数是_A_。A.6B

5、.5C.4D.10若有数组说明语句：Dim t(1 To 10)，则 t 被定义为_B_。A.字符串型数组B.变体类型数组C.动态数组D.整型数组下面叙述中，错误的是_A_。A.自定义类型只能在窗体模块的通用声明段进行声明B.在窗体模块中定义自定义类型时必须使用Private关键字C.自定义类型中的元素类型可以是系统提供的基本数据类型或已声明的自定义类型D.自定义类型必须在窗体模块或标准模块的通用声明段进行声明由 Array 函数建立的数组，其变量必须是_C_类型。A.字符型B.整型C.变体型D.字符串类型在代码中，定义了一个子过程：Sub P(a,b) End Sub下面调用该过程的格式正确

6、的_D_。A.P( )B.P 10,20,30C.P 10D.P 10,20在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim x As String * 1， y As String， i% x = a For i = Asc(x) To Asc(x) + 4 y = y & Chr(i) Next i Print y End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_D_。A.aB.aaaaC.32D.abcde通用过程可以通过执行“工具”菜单中的_B_命令来建立。A.通用过程B.添加过程

7、C.添加窗体D.添加模块有如下的程序： Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c) Print main:;a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 PrintSub:;p;m;n End Function当运行程序后，单击命令按钮 Command1 ，显示的结果是_D_。A.sub:2 6 4 main:1 6 4B.sub:2 6 4 main:2 6 4C.sub:2 6 4 main:1 2 3D.sub:2 4 6 main:2

8、 2 3在过程的定义中，使用关键字_A_来修饰形式参数，可以使之按地址传递。A.ByRefB.ByValC.ReferenceD.Value以下描述中，正确的是_D_。A.过程的定义和过程的调用均可以嵌套B.过程的定义可以嵌套，但过程的调用不能嵌套C.过程的定义和过程的调用均不能嵌套D.过程的定义不可以嵌套，但过程的调用可以嵌套在过程中定义的变量，若离开该过程后，还能保存过程中的局部变量的值，则应使用_B_关键字在过程中定义。A.PrivateB.StaticC.DimD.Public每当窗体失去焦点时，会触发的事件是_C_。A.DeactiveB.ActiveC.LostFocus D.In

9、itialize在 Visual Basic 中最基本的对象是_D_，它是应用程序的基石，是其它控件的容器。A.文本框B.命令按钮C.标签D.窗体在 Visual Basic 中，下列控件中， _D_控件可以包含其他控件。A.CheckBoxB.TextBoxC.Image D.Frame 当组合框的_C_属性值为2时，不允许用户在组合框中输入任何文本。A.TextB.ListC.StyleD.ListCountTimer 控件可用于后台进程中，可在 Timer 事件内编程，要停止触发 Timer 事件，可通过以下_C_属性。A.Enabled = False且Interval = 0B.En

10、abled = False或Visible = FalseC.Enabled = False或Interval = 0D.Visible= False或Interval = 0下面关于列表框正确的是_B_。A.列表框中的内容可以直接修改B.列表框控件实质是一维字符数组C.列表框的AddItem方法是把项目从列表框中删除D.列表框的Clear方法是删除列表框中由索引值指定的项目在下列关于菜单的说法中，错误的是_C_。A.每个菜单项都是一个控件，与其它控件一样也有自己的属性和事件。B.在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择。C.除了Click事

11、件之外，菜单项还能响应其他的如DblClick等事件。D.菜单项的快捷键不能任意设置。下面所列中，鼠标单击事件名为_D_。A.DblClickB.MouseUpC.MouseDownD.Click用户释放键盘上任意一个键时，被触发的事件是_C_。A.KeyPressB.KeyDownC.KeyUpD.Key通过 Shape 控件的_D_属性可以绘制多种形状的图形。A.StyleB.FillStyleC.BorderStyleD.Shape在 VB 中用来画弧、圆和椭圆的属性或者方法是_C_。A.PsetB.LineC.CircleD.三者都不是下列语句可使 Shape1 控件呈现实心圆形的是_

12、C_。A.Shape1.Shape=0B.Shape1.BorderStyle=0C.Shape1.FillStyle=0D.Shape1.BackStyle=0如果准备读文件，打开顺序文件 text.dat 的正确语句是_C_。A.Open text.dat For Write As #1B.Open text.dat For Random As #1C.Open text.dat For Input As #1D.Open text.dat For Binary As #1以下四个控件中可以列出计算机中所有驱动器的是_C_。A.列表框B.文件列表框C.驱动器列表框D.目录列表框程序题（12

13、）Private Sub form_click() s = 0 i = 1 Do While i = 100 If i Mod 10 0 Then s = s + i i = i + 1 Else i = i + 1 End If Loop Print sEnd Sub运行后，输出的结果是_C_A.4000B.4050C.4500D.5050程序题（16）建立并输出10*10的上三角矩阵，其中每个数都是随机数且范围是1，9，把下面程序补充完整Private Sub Form_click() Dim a%(1 to 10,1 to 10), i%, j% Randomize For i = 1

14、To 10 For j _ C a(i,j) =Int(Rnd*9)+1 Print Tab(j * 5);a(i, j); Next j Print Next iEnd SubA.=1 To 10-iB.=1 To 10C.=i To 10D.=1 To i程序题（70）的功能是：D在窗体上画一个名称为Command1的命令按钮，编写下列程序： Private Sub Command1_Click() Dim a As Integer，b As Integer a=45:b=36 do until a=b if ab then a=a-b else b=b-a loop Print a En

15、d subA.求a,b的最小公倍数B.比较a,b大小C.比较a,b是否相等D.求a,b的最大公约数程序题（63）Private Sub Form_click() a = 0 For j = 1 To 10 a = a + j Mod 2 Next j Print aEnd Sub运行后，输出的结果是_C_。A.4B.6C.5D.8程序题（64） 下面事件过程的功能是求（）（）（n）的值，根据选择答案在横线上填上适当内容。Private Sub Command1_Click()Dim n%, i%, j&, s&n = InputBox(n=)j = 1: s = 0For i = 1 To n j = j*i s=_A_ Next iPrint s=; sEnd SubA.s+jB.s+1C.s-jD.s*j程序题（67）从键盘上输入一个整数(132767)，输出它是几位数，并顺序输出它的各个数位上的数字。请填空 Private Sub Command1_Click() Dim a$, n As Integer, i% a = InputBox(a=?) Print a _B_ Print n For i = 1 To n Print Mid(a, i, 1); NextEnd SubA.i = Len(a)B.n = Len(a)C.n = Val(a)D.n = Str(a)