重庆大学201802批次网上可视化程序设计（VB）A卷

作业辅导

201802批次网上考试可视化程序设计（VB）A卷
一 、 单项选择题 (共 10 题、0 / 20 分 )
1、要让文本框获得焦点的方法是（ ）。
A、SETFOCUS
B、LOSTFOCUS  
上述3个都可以
D、
GOTFOCUS  
2、下列程序运行后，输出的结果为（ ）。B=1Do while (b<40) b=b*(b+1)LoopPrint b
A、
6     
B、
39
C、
42
D、
1
3、下列程序执行后，变量s的值为______。Dim s As long ,x As Integers=0:x=1Do While (x<10) s=s+x x=x+2LoopPrint s
A、
100
B、
50
C、
10
D、
25  
4、窗体的标题栏显示内容由窗体对象（　　）属性决定。
A、
BackColor
B、
Text
C、
Name
D、
Caption
5、程序的运行结果为（）。 Dim k As Integer n=5:m=1:k=1 While k<=n m=m*2 k=k+1wendPrint m
A、
5
B、
40
C、
32
D、
1
6、下列程序Private Sub Form_click() title = Val(InputBox("请输入一个数")) fee = Countl(title) Print feeEnd SubFunction Countl(title) If title < 40 Then pay = title / 2 Else pay = 2 * title End If ' Countl = payEnd Function运行时从键盘输入20，输出结果是＿ 。
A、
20
B、
显示出错信息
C、
10  
D、
30
7、 如果要求该程序执行3次循环，则应在程序中的括号里输入（ ）。X=1do x=x+3print xloop until(___)
A、
x<=8
B、
x>=8      
C、
x>=7
D、
x<=7
8、下列赋值语句中错误的是（ ）。
A、
x＋y＝x  
B、
x＝x＋y  
C、
x＝x＋1
D、
x＝4＞6
9、以下关于变量作用域的叙述中，正确的是______。
A、
模块级变量只能用Private关键字声明
B、
全局变量必须在标准模块中声明
C、
窗体中凡被声明为Private的变量只能在某个指定的过程中使用
D、
Static类型变量的作用域是它所在的窗体或模块文件
10、下述程序段中，与其他3个程序段作用不同的是（）。
A、
s=0
i=1
   DoWhile i<100
     s=s+1
i=i+1
  Loop
B、
s=0
i=0
  While i>100
     s=s+1
   Wend
C、
s=0
i=0
   DoUntil i>=100
     s=s+1
i=i+1
  Loop
D、
s=0
i=0
  While i<100
i=i+1
   Wend
二 、 判断题 (共 10 题、0 / 10 分 )
1、VB对象是指将数据和处理该数据的过程捆绑在一起的一个部件。
正确
错误
2、事件驱动编程机制是VB的特点之一。
正确
错误
3、面向对象程序设计（英语：Object-oriented programming，缩写：OOP）是一种程序开发的方法。
正确
错误
4、算术运算符中*、+、^、/,运算优先级最高的是^。
正确
错误
5、如果将布尔常量值True赋值给一个整型常量，则整型常量的值为-1。
正确
错误
6、表达式中有多种不同类型的运算符时，其优先级为：算术运算符>字符运算符>关系运算符>逻辑运算符。
正确
错误
7、对象指的是类的实例。
正确
错误
8、VB可以直接操作计算机硬件，所以它是一种面向机器的语言。
正确
错误
9、关系表达式29>"189" ，按数值比较，结果为False。
正确
错误
10、工程资源管理窗口用于显示和设置所选控件的属性。
正确
错误
三 、 填空题 (共 5 题、0 / 10 分 )
1、
为了保留动态数组中原有的数据不丢失，可以使用带______进行动态定义 。
2、
VB中包含________和事件过程两种sub过程。
3、
在窗体模块的通用声明段或者标准模块中使用Dim或者Private关键字声明的变量，称为____________。
4、
建立控件数组的方法有               、               和               三种。
5、
VB中的注释语句采用________；VB的续行符采用________；若要在一行书写多条语句，则各语句间应加分隔符，VB的语句分隔符为________。
四 、 程序阅读题 (共 5 题、0 / 15 分 )
1、
程序为：
Private Sub Form_Click()
  Dim a
a = Array(1, 2, 3, 4, 5, 6, 7)
For I = LBound(a) To UBound(a)
      a(I) = a(I) * a(I)
Print a(I)
Next I
End Sub
程序运行后，单击窗体后，在窗体显示的结果是：
2、
在窗体上画一个文本框和一个列表框，然后编写如下两个事件过程：
Private Sub Form_Load( )
　List1.AddItem “123 ”
　List1.AddItem “456 ”
　List1.AddItem “369”
List1.AddItem “789 ”
　Text1.Text = “ ”
End Sub
Private Sub List1_DblClick( )
　a = List1.Text
　Print a + Text1.Text
End Sub
程序运行后，在文本框中输入“248”，然后双击列表框中的“369”，则输出结果（  ）
3、
写出下面程序运行时单击窗体的输出结果。
Private Sub f(a%, b%)
  a = a+ b
  b = a- b
End Sub
Private Sub Form_Click()
  Dima%, b%
  a =23
  b =12
  Callf(a, b)
  Print"a=" & a; ",b=" & b
End Sub
4、
写出下列事件过程的执行结果。
Private Sub Command1_Click()
　s3 (1)
　s3 (1)
End Sub
Private Sub s3(ByVal a As Integer)
　Dim x AsInteger
　Static y AsInteger
　x=x+a: y=y+a
Print "x="; x,"y="; y
End Sub
5、
以下程序运行后。Si, sj, sk, I, j, k的结果分别为(    )
Private  sub command1_click( )
     Si=0: sj=0
     For I=1 to  3
For  j=1  toI
Sk=0
            For  k=j  to  3
                 Sk=sk+1
                  Next k
            Sj=sj+1
            Next j
        Si=si+1
     Next I
     Print si,sj,sk,I,j,k
End Sub
五 、 简答题 (共 5 题、0 / 25 分 )
1、
VB有多种类型窗口，若想在设计时看到代码窗口，怎样操作？
2、
简述VB6.0的主要特点。
3、
将数字串转换成数值用什么函数？判定是否是数字串用哪个函数？取字符串某几个字符使用什么函数？大小写字母转换用什么函数？
4、
叙述建立一个完整的应用程序的过程。
5、
什么是对象？什么是类？什么是事件过程？
六 、 程序设计题 (共 2 题、0 / 20 分 )
1、
用随机函数产生100个[0,999]以内的随机整数，输出能够被3整除并且个位不为0的数并且统计满足条件的数的个数。要求每行输出10个数。
2、
编写一个递归函数将一个正整数n的各位数字从低位到高位分解开，例如123，分解为3 2 1，其中n的值在命令按钮单击事件中用InputBox（）函数输入。

Ann

需要买附件

fsn

回复201802可视化程序

NXGYWJZ

Ann 发表于 2018-8-26 22:24
需要买附件

你好
我想下载2018可视化程序试题

CarlChee

201802可视化程序