13春学期《可视化程序设计Ⅰ》在线作业1
试卷总分：100 测试时间：--
单选题

、单选题（共 20 道试题，共 100 分。）
1. 假定有如下的Sub过程：Sub S（x As Single,y As Single）t = xx =t/y y =t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click ( )Dim a As SingleDim b As Singlea =5b =4S a,b Print a,bEnd Sub程序运行后，单击命令按钮，输出结果为
A. 5 4
B. 1 1
C. 1.25 4
D. 1.25 1
   满分：5 分
2. 以下叙述中错误的是
A. 如果过程被定义为Static类型，则该过程中的局部变量都是Static类型
B. Sub过程中不能嵌套定义Sub过程
C. Sub过程中可以嵌套调用Sub过程
D. 事件过程可以像通用过程一样由用户定义过程名
   满分：5 分
3. 关于Line语句正确的说法是
A. Line只能绘制直线
B. Line可以绘制矩形，但是不可以设置填充色
C. Line在绘制矩形，填充色由FillColor属性决定
D. Line在绘制矩形，填充色由forecolor属性决定
   满分：5 分
4. 以下不能在“工程资源管理器”窗口中列出的文件类型是
A. .bas
B. .res
C. .frm
D. .bmp
   满分：5 分
5. 确定一个控件在窗体上的位置的属性是
A. Width和Height
B. Width或Height
C. Top和Left
D. Top或Left
   满分：5 分
6. 在窗体上画一个名称为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整除的数
   满分：5 分
7. (2)以下叙述中正确的是
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体
B. " 窗体的Name属性的值是显示在窗体标题栏中的文本"
C. 可以在运行期间改变对象的Name属性的值
D. "对象的Name属性值可以为空
   满分：5 分
8. 关于记录操作的说明错误的
A. 在通过Addnew增加记录后，需要调用Update方法更新数据库
B. 在通过Delete删除记录后，需要调用Update方法更新数据库
C. 在通过Delete删除记录后，需要调用movelast或movenext方法
D. 在通过Edit编辑记录后，需要调用Update方法更新数据库
   满分：5 分
9. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
A. 2
B. 3
C. 4
D.
   满分：5 分
10. 假定窗体上有一个文本框，名为Txt1，为了使该文本框的内容能够换行，并且具有水平的垂直滚动条，正确的属性设置为（ ）
A. Txt1.MultiLine = True : Txt1.ScrollBars = 0
B. Txt1.MultiLine = True : Txt1.ScrollBars = 3
C. Txt1.MultiLine = False: Txt1.ScrollBars = 0
D. Txt1.MultiLine = False Txt1.ScrollBars = 3
   满分：5 分
11. 设置图片框pic1大小随所加载图像大小变化的正确语句是
A. pic1.autosize =true
B. pic1.strech =true
C. pic1.drawmode =1
D. pic1. drawmode =2
   满分：5 分
12. 取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是
A. ControlBox
B. MinButton
C. Enabled
D. MaxButton
   满分：5 分
13. 实现MDI窗体mdiMainFrm中子窗体水平平铺的语句为
A. mdiMainFrm.arrange = 0
B. mdiMainFrm.arrange = 1
C. mdiMainFrm.arrange = 0
D. mdiMainFrm.arrange = 0
   满分：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为传送源的大小"
   满分：5 分
15. 若有如下定义：Dim fs As New FileSystemObject, f As File现在要引用C盘根目录下存放的文件text.txt，可以使用的代码是（ ）
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”)
   满分：5 分
16. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序：Private Sub Command1_Click()Dim x,y,z As Integerx=5y=7z=0Text1.text=“”Call P1(x,y,z)Text1.Text=Str(x)End SubSub P1(ByVal a As Integer,ByVal b As Integer,c As Integer)c=a+bEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是
A. 0
B. 12
C. Str(z)
D. 没有显示
   满分：5 分
17. 如果在立即窗口中执行以下操作：a=8 (是回车键，下同)b=9 print a>b 则输出结果是
A. -1
B. 0
C. FALSE
D. TRUE
   满分：5 分
18. 以下语句的输出结果是。Print Format $(32548.5,“000,000.00”)
A. 32548.5
B. "32,548.50"
C. "32,548.50"
D. "32,548.50"
   满分：5 分
19. 以下叙述中错误的是
A. 一个工程中可以包含多个窗体文件
B. 在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C. 在设计VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D. 全局变量必须在标准模块中定义
   满分：5 分
20. 定时器的Interval属性以（ ）为单位指定Timer事件之间的时间间隔
A. 分
B. 秒
C. 毫秒
D. 微秒
   满分：5 分