奥鹏易百

 找回密码
 立即注册

扫一扫,访问微社区

QQ登录

只需一步,快速开始

帮助中心知识拓展客服QQ 515224986
查看: 302|回复: 0

东北大学17秋学期《可视化程序设计Ⅰ》在线作业3参考答案

[复制链接]

1万

主题

3

回帖

2万

积分

论坛元老

积分
29086
发表于 2017-9-11 12:16:42 | 显示全部楼层 |阅读模式
扫码加微信
17秋学期《可视化程序设计Ⅰ》在线作业3
一、单选题:【20道,总分:100分】


1.确定一个窗体或控件大小属性是          (满分:5)
    A. Width或Height
    B. Width和Height
    C. Top或Left
    D. Top和Left
2.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1Click(    )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程序运行后,单击命令按钮,在文本框中显示的值是          (满分:5)
    A. 12
    B. 13
    C. 14
    D. 15
3.用下面语句定义的数组的元素个数是Dim A(-3 To 5) As Integer          (满分:5)
    A. 6
    B. 7
    C. 8
    D. 9
4.关于PaintPicture spic,dx,dy,dw,dh,sx,sy,sw,sh,rop语句正确的说法是          (满分:5)
    A. "dx,dy为传送源左上角坐标"
    B. "dx,dy为传送目标左上角坐标"
    C. "sw,sh为传送目标的大小"
    D. "dw,dh为传送源的大小"
5.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是          (满分:5)
    A. 工程资源管理器窗口
    B. 工具箱窗口
    C. 代码窗口
    D. 属性窗口
6.设有如下程序:Option Base 0Private Sub FormClick(    )Dim aDim i As Integera=Array(1,2,3,4,5,6,7,8,9)For i=0 To 3Print a(5-i);NextEnd Sub程序运行后,单击窗体,则在窗体上显示的是          (满分:5)
    A.
    B. 5 4 3 2
    C. 6 5 4 3
    D. 7 6 5 4
7.从键盘上输入两个字符串,分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是          (满分:5)
    A. Left
    B. Mid
    C. String
    D. Instr
8.删除ListBox对象list1最后一个列表项的可行语句          (满分:5)
    A. list1.removeitem list1.listcount
    B. list1.removeitem list1.listcount -1
    C. list1.deleteitem list1.listcount -1
    D. list1.deleteitem list1.listcount
9.设有如下的记录类型Type StudentNumber As StringName As StringAge As IntegerEnd Type则正确引用该记录类型变量的代码是          (满分:5)
    A. "Student.name=""张红"""
    B. Dim s As Student
    C. "Dim s As Type Student s.name=""张红"""
    D. "Dim s As Types.name=""张红"""
10.一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Pubilc X As Integer,在Model1中有语句Pubilc Y As Integer,则以下叙述中正确的是          (满分:5)
    A. 变量X、Y的作用域相同
    B. Y的作用域是Model1
    C. 在Form1中可以直接使用X
    D. 在Form2中可以直接使用X和Y
11.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1Click(    ) Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub程序运行后,如果单击命令按钮,则在文本框中显示的是          (满分:5)
    A. Visual
    B. Basic
    C. Program
    D. 出错
12.假定有如下的Sub过程:Sub S(x As Single,y As Single)t = xx =t/y y =t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub CommandlClick(    )Dim a As SingleDim b As Singlea =5b =4S a,b Print a,bEnd Sub程序运行后,单击命令按钮,输出结果为          (满分:5)
    A. 5 4
    B. 1 1
    C. 1.25 4
    D. 1.25 1
13.对窗体编写如下代码:Option Base 1Private Sub FormKeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后,按回车键,输出结果为          (满分:5)
    A. 48 4
    B. 237 1
    C. 498 5
    D. 498 4
14.在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序          (满分:5)
    A. TabStop
    B. Enabled
    C. Visible
    D. TabIndex
15.为了暂时关闭计时器,应把该计时器的某个属性设置为False ,这个属性是          (满分:5)
    A. Visible
    B. Timer
    C. Enabled
    D. Interval
16.以下叙述中正确的是          (满分:5)
    A. 一个记录中所包含的各个元素的数据类型必须相同
    B. 随机文件中每个记录的长度是固定的
    C. Open命令的作用是打开一个已经存在的文件
    D. 使用Input #语句可以从随机文件中读取数据
17.设置一个单选按钮(OptionButton)所代表选项的选中状态,应当在属性窗口中改变的属性是(    )          (满分:5)
    A. Caption
    B. Name
    C. Text
    D. Value
18.在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是          (满分:5)
    A. “text(.txt)|(*.txt)”
    B. “文本文件( .txt) |(.txt)”
    C. “text(.txt)(    )(*.txt)”
    D. “text(.txt)(*.txt)”
19.若有如下定义:Dim fs As New FileSystemObject, f As File现在要引用C盘根目录下存放的文件text.txt,可以使用的代码是(    )          (满分:5)
    A. f=fs.GetFile(“c:\text.txt”)
    B. Set f=fs.GetFile(“c:\text.txt”)
    C. f=fs.GetFile(“text.txt”)
    D. Set f=fs.GetFile(“text.txt”)
20.取消窗体的最大化功能,需要把它的一个属性设置为False,这个属性是          (满分:5)
    A. ControlBox
    B. MinButton
    C. Enabled
    D. MaxButton
更多学习资料请登录www.openhelp100.com

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|www.openhelp100.com ( 冀ICP备19026749号-1 )

GMT+8, 2024-11-27 10:36

Powered by openhelp100 X3.5

Copyright © 2001-2024 5u.studio.

快速回复 返回顶部 返回列表