C语言考试试题
以下是百分网小编整理的C语言考试试题,欢迎学习!

一、填空(每空2分,共30分)
1. 当进入VB集成开发环境后,发现没有显示“工具箱”窗口,应选择 视图 菜单的 工具箱 选项,使“工具箱”窗口显示。
2.要在窗体Form1内显示“myfrm”,使用的语句是 Form1.print="myfrm" 。
3.若已建立了Form1和Form2两个窗体,默认启动窗体为Form1。通过工程菜单的 工程 菜单项,可将启动窗体设置为Form2。在程序中若要显示Form1窗体,则执行 Form1.show 语句。
4.列表框中项目的序号是从 0 开始的。
5.控件数组的名字由 index 属性指定,而数组中的每个元素由 name 属性决定。
7.全局变量在整个应用程序中有效,一般在标准模块中使用 public 语句声明。
7.VB的代码存储在模块中。在VB中提供了三种类型的模块: 窗体模块 、 标准备模块 和类模块。
8.在Visual Basic语言中有三种形式的循环结构。其中,若循环的次数可以事先确定,可使用 for...next 循环;若要求先判断循环进行的条件,可使用 do...loop 循环或Do循环。
9.列表框控件中最后一项的序号等于ListCount属性减 1 。
10.将图片框PictureBox的AutoSize属性设置成 true 时,图片框能自动调整大小,以适应其中的图片。
11.闰年的条件是:年号(Y)能被4整除,但不能被100整除;或者年号能被400整除。表示该条件的逻辑表达式是 Y MOD 4=0 And Y MOD 100<>0 OR Y MOD 400=0
12.如果要每隔15s产生一个Timer事件,则Interval属性应设置为 15000 。
13.在VB中,除了可以指定某个窗体作为启动对象之外,还可以指定 Main子过程 作为启动对象。
2.窗体的Load事件的触发时机是(b )。
A.用户单击窗体时 B.窗体被加载时
C.窗体显示之后 D.窗体被卸载时
3.与传统的程序设计语言相比,Visual Basic最突出的特点是(c )。
A.结构化程序设计 B.程序开发环境
C.事件驱动编程机制 D.程序调试技术
4.无论何种控件,共同具有的属性是( d )。
A.Text属性 B.Caption属性 C.Name属性 D.Autosize属性
5.有程序代码如下:
Text1.Text = "VB简单易学,功能强大"
则Text1、Text 、和" VB简单易学,功能强大"分别代表( b )。
A.对象,值,属性 B.对象,属性,值
C.对象,方法,属性 D.属性,对象,值
6.刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是( d )。
A.单选按纽 B.图片框
C.框架 D.通用对话框
7. 如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的( b )属性。
A.Caption B.PasswordChar C.Text D.Char
8.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是( b )。
A.Text.Mytext B.Mytext.Text
C.Mytext.(Text) D.Mytext*Text
9.将数据项“China”添加到列表框List1中成为第一项,应使用的语句是( a )。
A.List1.AddItem"China",0 B.List1.AddItem"China",1
C.List1.AddItem"China", D.List1.AddItem"1,China"
10.要在窗体的标题栏内显示“欢迎您!”,使用的语句是( b )。
A.Form.caption="欢迎您!" B.Form1.caption="欢迎您!"
C.Form1.print "欢迎您!" D.Form. print "欢迎您!"
11.如果想让文本框中的内容在运行时不能编辑,需将文本框的( a )属性设置为True。
A.Locked B.MultiLine C.TabStop D.Visible
12.关于语句行,下列说法正确的是( d )。
A.一行只能写一条语句 B.长度不能超过255个字符
C.每行的首字符必须大写 D.一条语句可以分多行书写
13.当使用上下文相关的帮助时,选择要帮助的内容,然后按( d )键,就可出现MSDN窗口直接显示所需的帮助信息。
A、Help B、F10 C、Esc D、F1
14.以下可以作为Visual Basic变量名的是( b )。
A.SIN B.CO1 C.COS(X) D.X(-1)
15.用下面的语句所定义的数组的元素的个数是(d )。
Dim A(-3 To 5)As Integer
A.6 B.7 C.8 D.9
二、选择题(每题2分,共30分)
1.后缀为.frm的文件表示( d )。
A.类模块文件 B.窗体文件
C.标准类模块文件 D.窗体二进制数据文件
2.下列关于窗体的说法不正确的是( b )。
A.窗体的标题由Caption属性确定
B.窗体的Name属性与Caption属性相同
C.窗体的背景图片由其Picture属性设定
D.通过设置Icon属性可使窗体获得最小化时的图标
3.与传统的程序设计语言相比,Visual Basic最突出的特点是( c )。
A.结构化程序设计 B.程序开发环境
C.事件驱动编程机制 D.程序调试技术
4.将一个VB程序保存在磁盘上,至少会产生的文件是( c )。
A..doc、.txt B..txt、.exe
C..vbp、.frm D..bat、.frm
5.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是( b )
A.Text.Mytext B.Mytext.Text
C.Mytext.(Text) D.Mytext*Text
6. 如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的( b )属性。
A.Caption B.PasswordChar C.Text D.Char
7.无论何种控件,共同具有的属性是( c )。
A.Text属性 B.Caption属性 C.Name属性 D.Autosize属性
8.下列数组声明语句,正确的是( b )
A.Dim a[3,4] As Integer B.Dim a(3 4) As Integer
C.Dim a(n,n) As Integer D.Dim a(3,4) As Integer
9.关于对象的属性不正确的是( d )。
A.对象的属性一般有属性名和属性值 B.可通过属性窗口设置属性的值
C.可通过程序代码设置属性的值 D.对象的所有属性值均可在设计时设计
107.后缀为.vbp的文件表示VB 的( b )。
A.窗体文件 B.工程文件
C.类模块文件 D.标准类模块文件
11.在设计阶段,双击窗体上的某个控件时,打开的窗体是( c )。
A.工程资源管理器窗口 B.工具箱窗口
C.代码编辑器窗口 D.属性窗口
12.要在窗体的标题内显示“我的第一个应用程序”,使用的语句是( d )。
A.Form1.Print"我的第一个应用程序"
B.Form.Print"我的第一个应用程序"
C.Form.caption="我的第一个应用程序"
D.Form1.caption="我的第一个应用程序"
13.将数据项“China”添加到列表框List1中成为第一项,应使用的语句是( a )。
A.List1.AddItem"China",0 B.List1.AddItem"China",1
C.List1.AddItem"China", D.List1.AddItem"1,China"
14.下列符号不能作为VB中变量名的是( c )。
A.ABCD B.X00000 C.60XYZ D.xyz
15.将文本框的ScrollBars属性设置为非零值,却没有效果,原因是( b )。
A.文本框中没有内容
B.文本框的MultiLine属性值为False
C.文本框的MultiLine属性值为True
D.文本框的Locked属性值为True
16.关于语句行,下列说法正确的是( d )。
A.一行只能写一条语句 B.长度不能超过255个字符
C.每行的首字符必须大写 D.一条语句可以分多行书写
17.当使用上下文相关的帮助时,选择要帮助的内容,然后按( d )键,就可出现MSDN窗口直接显示所需的帮助信息。
A、Help B、F10 C、Esc D、F1
18.在设计动画时,用时钟控件来控制动画速度的属性是( d )。
A.Enabled B.Move
C.Timer D.Interval
19.文本框ScrollBars属性设置了非零值,却没有效果,原因是( d )。
A.文本框中没有内容 B.文本框的Locked属性为True
C.文本框的MultiLine属性为True D.文本框的MultiLine属性为False
20.要退出For…Next循环,应使用的语句是( c )。
A.Exit B.Stop Loop C.Exit For D.Continue
三、阅读题(每格2分,共20分)
1.
Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 3
y = y + 4
Form1.Print "x="; x, "y="; y
End Sub写出程序运行时连续单击三次窗体后,Form1上的输出结果。
X=3,y=4 , x=3,y=8 , x=3,y=12 注:全局变量执行一次内存就消失了,static整个程序结束则消失
2.
Private Sub Form_Click()
Dim i As Integer, k As Integer, c As Integer
For i = 1 To 5
If i Mod 2 = 0 Then
k = k + 2
Else
c = c + 3
End If
Next i
Print k, c
End Sub
写出程序运行时单击窗体后,Form1上的输出结果。
K=4 , c=9
3.
Private Sub Command1_Click()
Dim A(1 To 5) As Integer
Dim b As Integer
For b = 1 To 5
A(b) = b
Next b
Text1.Text = A(b - 2)
End Sub
写出程序运行时单击Command1按纽后,Text1上的输出结果。
4
4.
Sub Change(ByVal x As Integer, ByVal y As Integer)
Dim t As Integer
t = x
x = y
y = t
Print x, y
End Sub
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 5: b = 8
Change a, b
Print a, b
End Sub
写出程序运行时单击Command1按纽后,Form1上的输出结果。
8 5 , 5 8
5.
Private Sub Form_Click()
Static Sum As Integer
For i = 1 To 3
Sum = Sum + i
Next i
Print Sum
End Sub
写出程序运行时点击窗体两次后,变量Sum的值。
6 , 12
6.
Sub test(i As Integer)
i = i + 3
End Sub
Private Sub Form_Click()
Dim x As Integer
x = 8
Print "x="; x
Call test(x)
Print "x="; x
End Sub
写出程序运行时,单击窗体后显示的值。
7.
Private Sub Form_Click()
Dim I As Integer, j As Integer
Dim c As Integer
c = 0
For I = 1 To 3
For j = 1 To 3
c = c + 4
Next j
Next I
Print c
End Sub
写出程序运行时,单击窗体后显示的值。
36
四、程序填空(每格1分,共10分)
1、下面是一个歌手大赛评分程序。10位评委,除去一个最高分和一个最低分,计算平均分(设满分为10分)。请在空格处填入适当的内容,将程序补充完整。
Private Sub Form_Click()
Dim Max,Min,x,i,s as Integer
Dim aver as Single
Max= 0
Min= 10
aver= 0
For i = 1 To (1) 10
x=Val(InputBox("请输入分数"))
If x>max (2) Then Max=x
If xThen Min=x
S=s+x (4)
Next i
s = s-max-min (5)
aver = s/8 (6)
Print "最高分";Max,"最低分";Min
Print "最后得分";aver
End Sub
2.本题序随机产生的n个两位正整数。并进行排序的程序输出结果。
Private sub CreateRND(byval n as integer)
Dim temp as integer
Dim I as integer
For I=0 to n
X(I)= (7)int(10+rad()*90)
Lblcreat(I).caption=x(I)
Next I
For I=0 to (8) n-1
For j =I+1 to n
If x(I)
temp=x(j)
X(I)=x(j)
(9) x(i)=temp
End if
Next j
(10) lblcreat(l).caption(l)
Next I
lblcreat(I) caption=x(I)
End Sub
3.编程求出一个班40个学生的《VB程序设计》平均成绩,并统计出高于平均分的人数。请在空行出填入适当内容,将程序补充完整。
Private Sub Command1_Click( )
Dim i,j,n,sum as Integer , aver as Single
Dim s(1 to 40 ) as Integer
sum=0
n=0
For i=1 to 40
(1) n =inputbox(“请输入第” & i “位学生的成绩”)
sum= (2)sum+n
Next i
aver= sum/40(3)
For j=1 to 40
If (s(j)>aver) Then (4)
Next j
print “平均分=”;aver;”高于平均分的人数”;n
End Sub
4.程序说明:利用一个计时器、一个标签框和二个命令按钮制作一个动态秒表,如图1所示。单击“开始“命令按钮,秒表开始计时 ,单击“结束“命令按钮, 秒表结束计时,并在标签框显示运行时间,如“运行了0小时2分10秒“。 (假设对象的属性都在程序代码中设定)。
Dim x As Long
Dim h As Integer, m As Integer, s As Integer
Private Sub Form_Load()
Form1.Caption = "动态秒表(小时:分:秒)"
Command1.Caption = "开始[&S]"
Command2.Caption = "结束[&E]"
Label1.Alignment = 2 '居中对齐
Label1.Caption = "0:0:0"
timer1.Interval = (5) 1000
Timer1.Enabled = False
x = 0
End Sub
Private Sub Command1_Click()
(6) timer1.enable=true
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
x= (7) 0
Label1.Caption = "运行了" + Str(h) + "小时" + Str(m) + "分" + Str(s) + "秒"
End Sub
Private Sub Timer1_Timer()
x = x + 1
h= (8) x\3600
m = (9) (xmod3600)\60
s= (10) x mod 60
Label1.Caption = Str(h) + ":" + Str(m) + ":" + Str(s)
End Sub
五、编程题(每题5分,共10分)
1.随机产生n个两位正整数(n由输入对话框输入,且n>0),求出其中的偶数之和,并在标签框Label1上显示。程序写在命令按钮command1的click事件中。
Private Sub Command1_Click()
Dim i As Long, s, n, sum
s = InputBox("输入一个正整数:", 10)
For i = 1 To s
Randomize
n = Int(Rnd * 100) + 1
Print n;
If n Mod 2 = 0 Then sum = sum + n
Next
label1.Caption = "偶数之和:" & sum
End Sub
2.请根据下列描述编写购物优惠程序。某商场为了加速促成商品流通,采用购物打折的优惠办法,每位顾客一次购物(1)在300元以上者,按九五折优惠;(2)在500元以上者,按九折优惠;(3)1000元以上者,按八折优惠。在窗体上添加两个文本框和一个命令按钮,要求在Text1中输入购物商品总金额,单击命令按钮,在Text2中输出优惠价。
Private sub command1_click()
Dim x as integer,dim y as integer
X=val(Text1.tex)
If x<300 then
X=y
Else
If x<500 then
Y=X*0.95
Else x<1000 then
Y=x*0.9
Else y=x*08
End if
End if
End if
Text2.text=y
End sub
3.编写一程序,要求单击“开始”按钮(Command1),在列表框(List1)中输出200~300之间不能被5整除的数,单击清除按钮(Command2),清除文本框中的全部内容。
Private Sub Command1_Click()
Dim x As Integer
x = 200
Do Until x > 300
If x Mod 5 <> 0 Then
List1.AddItem x
End If
x = x + 1
Loop
End Sub
Private Sub Command2_Click()
List1.Clear
End Sub
【C语言考试试题】相关文章:
C语言考试试题练习11-06
C语言试题08-02
C语言试题11-01
C语言试题10-20
C语言考试模拟测试题10-21
C语言程序试题04-26
C语言试题大全08-06
C语言试题及答案07-26
C语言练习试题07-01