《计算机程序设计基础》课后练习题参考标准答案

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

《计算机程序设计基础》课后练习题1

一.判断题

(1)(错)事件过程由某个用户事件或系统事件触发执行,但不能被其他过程调用。

(2)(错)若X=2, Y=5,则表达式 Y-2>X AND X+2>Y 的结果为:True。

(3)(错)常量是指在程序运行过程中其值可以改变的那些量。

(4)(错,timer没有)VB工具箱中的所有控件都具有宽度(Width)和高度(Height)属

性。

(5)(错)定义变量:Dim max,min as Single , 则max 和 min 的数据类型均为Single。

(6)(对)如果创建的菜单项的标题是一个减号“-”,则该菜单项显示为一条分隔线。

(7)(错)标准模块文件的扩展名是“*.VBP”。

(8)(错,都不能)定时器控件可以响应Click事件,但不能响应DbClick事件。

(9)(错)在默认情况下,数组下标下界的缺省值为1。

(10)(对)在使用字体对话框时,需要对其Flags属性先进行相应设置。

二.单选题

(11)在Visual Basic中,表示鼠标单击事件的是 C 。

A)Activate B)DoubleClick C)Click D)MouseDown

(12)用于设置计时器时间间隔的属性是 A 。

A)Interval B)Name C)Left D)Top

(13)函数Int(10*Rnd)是在 D 范围内的整数。

A)[1,10] B)[1,10] C) [0,9) D)[0,9]

(14)Select case语句结构的结尾应使用 D 。

A)End B) End Case C) End Sub D) End Select

(15)改变了容器的坐标系后,该容器的 A 属性值不会改变。

A)left B)scaleleft C)scaletop D)scalewidth

(16)执行下列语句后,列表框中各表项顺序为 D

List1.Clear

For i=1 to 4 : List1.AddItem i-1,0 :Next i

A)B)C)D)

(17)输入对话框InputBox的返回值的类型是 A 。

A)字符串 B)整数 C)浮点数 D)长整数

(18)将焦点主动设置到指定的控件或窗体上,应采用 B 方法。

A)SetDate B)SetFocus C)SetText D)GetData (19)有如下程序段:

Dim I As Integer , S As Integer

S = 1

FOR I = 1 TO 8 STEP 2

S = S * I

NEXT I

PRINT “S = “ ; S

运行结果为 B

A)S = 9 B)S = 105 C)S = 1 D)S = 16

(20)利用以下___D____语句,可以输出日期和时间信息。

A)Print Date B)Print Month C)Print Time D)Print Now (21)一只漂亮的酒杯被摔碎了,则漂亮,酒杯,摔是___D____。

A)对象,属性,事件 B)对象,属性,方法

C)属性,对象,方法D)属性,对象,事件

(22)将通用对话框以“打开文件对话框”方式打开,则选以下 A 方法。

A) ShowOpen B)ShowColor C)ShowSave D)ShowFont

(23)执行语句“Line (100, 100)-(150, 200), vbBlue, B”,在窗体上绘制出一个矩形,

那么该矩形的面积 = A 。

A)5000 B)10000 C) 15000 D)20000

(24)如何使一个标签或按钮控件在运行时不可用___C____。

A)把它的Visible属性设置成False B)把它的Visible属性设置成True

C)把它的Enabled属性设置成False D)把它的Enabled属性设置成True (25)下列 C 表达式的结果为"1234556789"。

A)Trim("12345 "+" 56789") B)Ltrim("12345 ")+Rtrim(" 56789") C)Rtrim("12345 ") & ("56789")D)Ltrim("12345 ") & Rtrim(" 56789")

(26)将图形框(PictureBox)控件的AutoSize属性设置为True后,则对于图形框而言,

____B____。

A)图形框中的图片自动改变大小适应图形框

B)图形框自动改变大小适应其中的图形

C)如果图片的大小比图形框大,则图形框自动裁剪图象以适应图形框的大小。

D)如果图片的大小比图形框小,则图形框大小不发生变化。

(27)要获得当前驱动器应使用驱动器列表框的哪个属性 B 。

A)Path B)Drive C)Dir D)Pattern

(28)以下关于函数过程的叙述中,正确的是____A____。

A)函数过程形参的类型与函数返回值的类型没有关系

B)在函数过程中,过程的返回值可以有多个

C)数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递

D)如果不指明函数过程参数的类型,则该参数没有数据类型

(29)单击滚动条的滚动箭头时,产生的事件是___C____。

A)Click B)Scroll C) Change D)Move

(30)以下能返回文件长度的函数是__B___。

A)BOF B)LOF C)LEN D)EOF

三.程序填空题

【程序填空1】在C盘当前文件夹下已存在名为Data.txt的文件,利用文本框(Text1)输入若干英文单词。要求每输入一个单词后,按下回车键将文本框中的单词写入文件,然后清除文本框的内容以便输入下一个单词。当在文本框中输入的单词是“END”时,则表示结束输入(对于单词“END”不论大小写都视为结束),最后将文件关闭。

Private Sub Form_Load()

(31) A

Text1.Text = ""

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

If (32) D = "END" Then

Close #

End

Else

(33) A(注意,Text1的默认属性为text,可省略不写)

Text1.Text = ""

End If

End If

End Sub

(31)A)Open "C:\Data.txt" For Output As #1

B)Open "C:\Data.txt" For Input #1

C)Open "C:\Data.txt" Input As #1

D)Open "C:\Data.txt" Output As #1

(32)A)LCase(Text1.Text) B)Text1.Text

C)Str(Text1) D)UCase(Text1.Text)

(33)A)Write #1, Text1 B)Write #1, Text

C)Write #3, Text1.Text D)Write #1, Text.Text

【程序填空2】程序运行后如下图所示,Label1的Caption显示为"字体定时变大",影响字体大小的属性每隔0.5秒增加1,数值在[8,72]之间变化。

相关文档
最新文档