东北大学14春学期《可视化程序设计Ⅰ》在线作业2

14春学期《可视化程序设计Ⅰ》在线作业2
试卷总分：100 奥鹏学习网（aopeng123.cn) 发布
单选题
一、单选题（共 20 道试题，共 100 分。）
V
1. 语句Print 5/4*6 Mod 2的输出结果是
A. 0
B. 1
C. 2
D. 3
需要购买答案的联系QQ:79691519满分：5 分
2. 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End IfEnd FunctionPrivate Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print sEnd Sub程序运行后，单击命令按钮，在窗体上显示的是
A. 11
B. 10
C. 9
D. 8
需要购买答案的联系QQ:79691519满分：5 分
3. 以下叙述中错误的是
A. 在同一窗体的菜单项中，不允许出现标题相同的菜单项
B. 在菜单的标题栏中，“ ”所引导的字母指明了访问该菜单项的访问键
C. 程序运行过程中，可以重新设置菜单的Visible属性
D. 弹出式菜单也在菜单编辑器中定义
需要购买答案的联系QQ:79691519满分：5 分
4. 函数String(n, "str")的功能是
A.
B. 返回由n个字符组成的字符串
C. 从字符串中取出n个字符
D. 从字符串中第n个字符的位置开始取子字符串
需要购买答案的联系QQ:79691519满分：5 分
5. 为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是
A. Visible
B. Timer
C. Enabled
D. Interval
需要购买答案的联系QQ:79691519满分：5 分
6. 表达式4+56 * 7 / 8 Mod 9 的值是
A. 4
B. 5
C.
D. 7
需要购买答案的联系QQ:79691519满分：5 分
7. 取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是
A. ControlBox
B. MinButton
C. Enabled
D. MaxButton
此题选: D 满分：5 分
8. 以下关系表达式中，其值为False的是
A. """ABC"" ""AbC"""
B. """the"" ""they"""
C. """VISUAL""=UCase(""Visual"")"
D. """Integer"" ""Int"""
需要购买答案的联系QQ:79691519满分：5 分
9. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10,10) As IntegerDim i,j As IntegerFor i=1 To 3For j=2 To 4array1(i,j)=i+jNext jNext IText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
A. 12
B. 13
C. 14
D. 15
需要购买答案的联系QQ:79691519满分：5 分
10. 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是
A. Visual
B. Basic
C. 6
D.
需要购买答案的联系QQ:79691519满分：5 分
11. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To sqr(i) If i Mod j = 0 Then Exit For Next j If j Sqr(i) Then Print i Next iEnd Sub该事件过程的功能是
A. 输出n以内的奇数
B. 输出n以内的偶数
C. 输出n以内的素数
D. 输出n以内能被j整除的数
需要购买答案的联系QQ:79691519满分：5 分
12. 为了把窗体上某个控件变成活动控件，应执行的操作是
A. 单击窗体的边框
B. 单击控件的内部
C. 双击控件
D. 双击窗体
需要购买答案的联系QQ:79691519满分：5 分
13. 以下程序的输出结果是Option Base 1Private Sub Command1_Click()Dim a(10),p(3) As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next IFor i=1 To 3k=k+p(i)*2Next iPrint kEnd sub
A. 33
B. 28
C. 35
D. 37
需要购买答案的联系QQ:79691519满分：5 分
14. 关于PaintPicture spic,dx,dy,dw,dh,sx,sy,sw,sh,rop语句正确的说法是
A. "dx,dy为传送源左上角坐标"
B. "dx,dy为传送目标左上角坐标"
C. "sw,sh为传送目标的大小"
D. "dw,dh为传送源的大小"
需要购买答案的联系QQ:79691519满分：5 分
15. 把焦点移到某个指定的控件，所使用的方法是
A. SetFocus
B. Visible
C. Refresh
D. GetFocus
需要购买答案的联系QQ:79691519满分：5 分
16. 在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() For I=1 To 4 For J=0 To 1 Print Chr$(65+I); Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A. "BB CC DD EE"
B. A BB CCC DDD
C. B CC DD EEE
D. AA BBB CCCC DDDD
需要购买答案的联系QQ:79691519满分：5 分
17. 设置VB窗口frm1绘图所用线型调整为点划线的方法
A. frm1.DrawMode =1
B. frm1.BorderStyle =1
C. frm1.DrawStyle =3
D. frm1.DrawStyle =1
需要购买答案的联系QQ:79691519满分：5 分
18. 有窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程rivate Sub Command1_Click()s=0For i=1 To 15x=2*i-1If x Mod 3=0 Then s=s+1Next iLabel1.Caption=sEnd Sub程序运行后，单击命令按钮，则标签中显示的内容是
A. 1
B. 5
C. 27
D. 45
需要购买答案的联系QQ:79691519满分：5 分
19. 窗体中有3个按钮Command1、Command2和Command3，该程序的功能是当单击按钮Command1时，按钮2可用，按钮3不可见，正确的程序是
A. Private Sub Command1_Click( ) Command2.Visible=True :Command3.Enabled=TrueEnd Sub
B. Private Sub Command1_Click( ) Command2.Visible=False:Command3.Enabled=False End Sub
C. Private Sub Command1_Click( ) Command2.Enable=True :Command3.Visible=FalseEnd Sub
D. Private Sub Command1_Click( ) Command2.Enabled=False : Command3.Visible=False End Sub
需要购买答案的联系QQ:79691519满分：5 分
20. 阅读程序：Function F(a As Integer)b = 0Static cb = b+1c = c+1f = a+b+cEnd Function Private Sub Commandl_Click ()Dim a As Integera =2For i =1 To 3Print F(a)Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为
A. 4 4 4
B. 4 5 6
C. 4 6 8
D. 4 7 9
需要购买答案的联系QQ:79691519满分：5 分