1、精品文档就在这里-各类专业好文档，值得你下载，教育，管理，论文，制度，方案手册，应有尽有-2011-1-VB程序设计课程试卷一、单选题(每题1分,共30分)1一只白色的足球被踢进球门,则白色、足球、踢、进球门是_。 A属性、对象、方法、事件 B属性、对象、事件、方法 C对象、属性、方法、事件 D对象、属性、事件、方法2要对选定的多个控件调整格式,如对齐、调整间距、统一尺寸等,应使用_菜单。 A格式 B编辑 C视图 D工具3要在窗体上显示图片,需设置窗体的_属性。 ACaption BIcon CPicture DName4将命令按钮的_属性设置为False后,运行时该命令按钮呈灰色不可用。 A
2、ControlBox BWindowState CVisible DEnabled5下列表达式中,值为True的是_。 AMid(“ABCD”,2,2)Left(“ABCD”,2) BNot(Sqr(4)-3=-2) C14/23=“abcd”6以下日期型常量合法的是_。 A”03/25/89” B#”03/25/89”# C#03/25/89#D#25/03/89#7表达式12000+”129”&200的值是_。 A12129200 B12000129200 C12329 D120003298将文本框的_属性设置为True时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框的宽度时自
3、动换行。 AMultiLine BEnabled CScrollBars DMax 9任何控件都具有_属性。 A.Text BCaption CName DForeColor 10若要将滚动条的最小值设为0,最大值设为255,应对其_属性进行设置。 ALeft和Top BWidth和Height CSmallChange和LargeChange DMin和Max 11窗体上有一个文本框控件Textl,若已存在三个整型变量a、b、C,且三个变量的值分别为5、7、12。以下的_可以使文本框中显示的内容为：5+7=12。 ATexll.Text=a+b=C BTextl.Text=“a+b=C” C
4、Textl.Text=a&”+”&b&”=“c DTextl.Text=“a”&”+”&”b”&”=“&”c”12下列控件中, _控件没有Caption属性。A命令按钮 B标签 C选项按钮 D文本框13程序运行时,若要使某一控件不可见,应将其_属性设为False。AEnabled BCaption CVisible DDefault14在设计阶段,双击窗体Forml的空白处,打开代码窗口,显示_事件过程模板。 AForml_ Click BForml_Load CForm_Load DForm_Click15一个控件在窗体上的位置由Top和Left属性决定,其大小由Height和_属性决定。
5、ARight B.Text CCaption DWidth16如果要在命令按钮上显示图形文件,应设置命令按钮的_。 AStyle和Graphics属性 BStyle和Picture属性 CCaption和Picture属性DCaption和Graphics属性17设A=2,B=-2,则表达式a/2+1 b+5 or b*(-2) =6的值是_。 AFalse BTrue C3 D618执行函数Chr(Asc(Mid(“Basic”,2,1)-32)的结果是_。 A”A” B”B” C”a”D”b”19用消息框显示如下消息：“程序即将被关闭!”,使用以下_语句可以实现(其中n为Integer型)
6、。 AMsgBox=“程序即将被关闭!” BInputBox(“程序即将被关闭!”) Cn=MsgBox(“程序即将被关闭!”) DCall MsgBox”程序即将被关闭!”20下面程序段中,循环体被执行的次数是_次。 For i=7 to 102 Step 3 Print i; Next i A96 B95 C32 D3121下列符号常量的声明中, _是不合法的。 AConst a As Single=1.1 BConst a As Integer=“12” CConst a As Integer=Sin(1)DConst a = ”OK”22在程序中可以通过复选框和单选按纽的_属性值来判断
7、它们的当前状态。 ACaption BValue CChecked DSelected23以下控件可以作为其他控件容器的是_。 APictureBox和Image BFrame和PictureBox CListBox和Frame DTextBox和Image24不可以显示输出文本信息的控件是_。 AImage BTextBox CLabel DComboBox25要清除已经在图片框Picturel中打印的字符串而不清除其中的图象,应使用语句_。 APicturel.Cls BPicturel.Picture=LoadPicture(“) CPicturel.print “ DPicturel.
8、Picture=“26定时器的Interval属性以_为单位指定Timer事件之间的时间间隔。 A分 B秒 C毫秒 D微秒27下列叙述不正确的是_。 A注释语句是非执行语句,仅对程序的有关内容起注释作用,不被解释或编译 B注释语句可放在代码中的任意位置 C注释语句不能放在续行符的后面 D代码中加入注释语句的目的是提高程序的可读性28针对语句If I=1 Then J=l,下列说法正确的是_。 AI=1为关系表达式,J=1为赋值语句 BI=1为赋值语句,J=1为关系表达式 CI=1和J=l均为赋值语句 DI=1和J=1均为关系表达式29在一个语句行内写多条语句时,语句之间应该用_分隔。 A逗号
9、B分号 C顿号 D冒号30在过程中有语句For I=N1 To N2 Step N3,在该循环体内有下列四条语句,其中_会影响循环执行的次数。 N1=N1+lN2= N2+N3I=I+N3N3=2*N3 A B C D二、简单填空(每空2分,共30分)1visual Basic是一种面向对象的程序设计语言。2窗体文件的扩展名为.frm。3工程文件的扩展名为.vbp。4在标准模块中用Public语句说明的变量是全局变量。5若窗体上有列表框Listl,则Listl.List(Listl.ListIndex)的值等于Listl的Text属性值。6A和B不同时为零的逻辑表达式是A XOR B。7在VB
10、中不论常量还是变量,如果不加说明,系统均按变体型 或 Variant数据处理。8算数表达式ab+cd+1(e+f)+1对应的VB表达式是(a*b+c)/(abs(d)+1)*(e+f)+1。9 、/、mod、*四个算术运算符中,优先级最低的是mod。10欲使某窗体从屏幕上消失,但仍驻留在内存中,应使用窗体的Hide方法。11设置文本框的Passwodchar属性,可以使在文本框中键入字符时,只显示某个特定的字符，如“*”。12决定控件上文字的字体、字形、大小、效果的属性是Font属性。13表达式2 3+5 Mod 2-4的值为5。14执行语句”Print Format(5459.478,”#,
11、 #0.00”)”,正确的结果是5,459.48。15将任意一个两位整数N的个位数与十位数对换得到新数的VB表达式是(N Mod 10)*10+N10。三、程序分析填空(每空3分,共30分)1设x As Integer,St As string,F1ag As Boolean执行下列语句后,x结果为122。 St = 123 F1ag = True x = F1ag + St2下列程序段的执行结果为 1 2 False。 x=1y=2 z=x=y Print x;y;z 3下列程序段的执行结果为I=2。 Private Sub Form_Click() Dim a As Integer, i
12、As Integer a = 75 If a 60 Then i = 1 If a 70 Then i = 2 If a 80 Then i = 3 If a 90 Then i = 4 Print I=; iEnd Sub 4下列程序段的执行结果为False。Private Sub Form_Click() x = 2: Y = 1 If x * Y 0End Sub 5下列程序段的执行结果为bcdcde。 a = abcd b = bcde e = Right(a, 3) f = Mid(b, 2, 3) If e = 7 Print i=; i, Print a=; aEnd Sub8下
13、列程序段的执行结果为10 5。 Private Sub Form_Click() a = 0: b = 1 Do a = a + b b = b + 1 Loop While a = 85 Print excellent Case 70 To 85 Print good Case 60 To 70 Print passed Case Else Print no passed End Select NextEnd Sub四、编程题(10分)编写程序,完成学生成绩登录的功能。编程要求：1程序参考界面如下图所示,单击”确定”按钮,则把学生学号、英语、计算机成绩以及计算得到的总成绩一并作为列表项写入列
14、表框。并设”下一位”按钮获得焦点。2单击”下一位”按钮,清除文本框输入的内容,并把文本框1设置为焦点,等待新的输入。3单击”关闭”按钮,结束程序运行。Private Sub Command1_Click() List1.AddItem Text1.Text & & Text2.Text & & _ Text3.Text & & Val(Text2.Text) + Val(Text3.Text) Command2.SetFocusEnd SubPrivate Sub Command2_Click() Text1.Text = Text2.Text = Text3.Text = Command1.SetFocus Text1.SetFocusEnd SubPrivate Sub Command3_Click() EndEnd SubPrivate Sub Form_Load() List1.AddItem 学号 & 英语 & 计算机 总成绩End Sub-精品 文档-
