《VB语言程序设计》习题参考答案
第1章习题
一、单选题
1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B
二、多选题
1．ACDE 2．BCDE 3．CD 4. CE
三、填空题
1．事件驱动 2．解释，编译 3．设计，运行，中断
4. 属性，方法，事件
5. Command2_Click
6. 中央，代码
7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计"
编程及上机调试
1. 按要求设置窗体属性
2．在窗体上建立一个标签Label1。程序代码如下：
Private Sub Form_Click()
Label1.Caption = "你单击了窗体"
End Sub
Private Sub Form_DblClick()
Label1.Caption = "你双击了窗体"
End Sub
3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。
Private Sub Command1_Click()
Dim x As Single
x = Val(Text1.Text)
Text2.Text = 15 * x
End Sub
第2章习题
一、单选题
1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B
二、多选题
1．BD 2．CD 3．AC 4. AD
三、填空题
1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y)
(3) a*a–3*a*b/(3+a) (4) x^(3/8)+Sqr(y*y+4*a*a/(x+y^3))
2．Int(50+6*Rnd)
3．(1)138 (2)3 (3)214 (4) "inchina" (5)70 (6) "45"
(7)0
4. "系统管理数据库"
编程及上机调试
1～3题：按要求完成操作练习。
4． Private Sub Command1_Click() '"最大化"按钮
Form1.WindowState = 2 '最大化
End Sub
Private Sub Command2_Click() '"还原"按钮
Form1.WindowState = 0 '还原
End Sub
Private Sub Command3_Click() '"最小化"按钮
Form1.WindowState = 1 '最小化
End Sub
5．在窗体上建立三个文本框Text1(第一个数)、Text2(第二个数)、Text3(计算结果)和一个命令按钮Command1(“计算”)。
Private Sub Command1_Click()
Dim x As Single
Dim y As Single
x = Val(Text1.Text)
y = Val(Text2.Text)
Text3.Text = x * x + y * y
End Sub
6. 在窗体上建立两个文本框Text1(输入一串字符)、Text2(输出结果)和一个命令按钮Command1。
Private Sub Command1_Click()
Dim x As String
x = Left(Text1.Text, 1) + Right(Text1.Text, 1)
Text2.Text = x
End Sub
第3章习题
一、单选题
1．C 2．B 3．D 4．D 5．B 6．C 7．B 8．D 9．D 10．A 11．A 12．C 13．C 14．B 15．(1)A (2)C 16．A 17．B 18．(1)D (2)B (3)C 19．D
二、多选题
1．AC 2．AC 3．ABCF
三、填空题
1. $000,124 2．Label1.Caption="a*b=" 3．Height，Width
4．2 5．Text1.SetFocus
6．Multiline, ScrollBars, 2 7．编程技术，程序设计
8．Private Sub Text2_Change()′当文本框Text2中的文本内容发生变动时，执行该事件过程
Label1.Caption=Text1.Text ′把文本框Text1中的文本内容作为标签Label1的标题End Sub
Private Sub Text1_GotFocus() ′当文本框Text1获得焦点时，执行该事件过程Text1.SelStart = 0 ′选定文本框Text1中的所有文本内容
Text1.SelLength=Len(Text1.Text)
End Sub
编程及上机调试
1．在窗体上建立一个文本框Text1(输入n值)、三个标签Label1(第一个随机数)、Label2(第二个随机数)和Label3(第三个随机数)，以及一个命令按钮Command1。
Private Sub Command1_Click()
n = Val(Text1.Text)
Randomize
x = Int(1 + n * Rnd)
Label1.Caption = "第一个随机数" + Str(x)
x = Int(1 + n * Rnd)
Label2.Caption = "第二个随机数" + Str(x)
x = Int(1 + n * Rnd)
Label3.Caption = "第三个随机数" + Str(x)
End Sub
2．在窗体上建立了四个文本框Text1、Text2、Text3和Text4，以及一个命令按钮Command1(“交换”)和Command2(“合并”)。
Private Sub Command1_Click() '“交换”
t = Text1.Text
Text1.Text = Text2.Text
Text2.Text = Text3.Text
Text3.Text = t
End Sub
Private Sub Command2_Click() '“合并”
t = Text1.Text + Text2.Text + Text3.Text
Text4.Text = t
End Sub
3. (1)Rnd * 9000 + 1000 (2)Str(x) (3)Mid(s, 3, 1) + Mid(s, 2, 1) + Left(s, 1)
4. Private Sub Command1_Click() '往左
Text1.Left = 0
End Sub
Private Sub Command2_Click() '往右
Text1.Left = Form1.Width - Text1.Width
End Sub
Private Sub Command3_Click() '居中
Text1.Left = (Form1.Width - Text1.Width) / 2
End Sub
5. Private Sub Cmd1_Click()
Lab1.Visible = True
Lab1.Caption = "您已下达显示命令"
End Sub
Private Sub Form_Click()
Cmd1.Visible = True
End Sub
6. Private Sub Form_KeyPress(KeyAscii As Integer)
Show
Print "输入字符："; Chr(KeyAscii), "ASCII码为;"; KeyAscii
End Sub
Private Sub Form_DblClick()
Cls
End Sub
7. 产生这三个消息框的相应语句是：
产生第1个消息框：x = MsgBox("在这里显示提示信息", 4 + 0, "请确认")
产生第2个消息框：x = MsgBox("在这里显示" + Chr(13) + "提示信息",3 + 0,"请确认")
产生第3个消息框：x = MsgBox("在这里显示"+Chr(13)+"提示信息",2 + 16 + 0,"请确认")
第4章习题
一、单选题
1．C 2．A 3．C 4．C 5. B 6. A
7．D 8．B 9．B 10．(1)D (2)A (3)B
二、多选题
1．ABCFGHJ 2．BE 3．CD 4. CDE 5. AE
三、填空题
1．(S And (A>=18 And A <=20) And H>=1.65) Or (Not S And (A>=16 And Age<=18) And H>=1.60)
2. 60000
3. (1) "0" To "9" (2) "a" To "z","A" To "Z" (3) Else
4．(1)6 (2)-2 (3)2
5． Select Case x Case Is < 20
Case Is <= 0 y = 2 y = 4 Case Is <= 30
Case Is < 10 y = 3
y = 0 Case Else
Case Is < 15 y = 4
y = 1 End Select
6．(1) (x>100) And (x Mod 5=0) (2) 0
(3) Len(Text1.Text) (4) Text1.SelText
编程及上机调试
1. 在窗体上建立两个文本框Text1(输入数)及Text2(显示结果)，一个命令按钮Command1(“判断”)。
Private Sub Command1_Click() '“判断”
x = Val(Text1.Text)
If x Mod 2 = 0 Then
Text2.Text = "偶数"
Else消息
Text2.Text = "奇数"
End If
End Sub
2．窗体上建立了一个文本框Text1，用于显示结果。
Private Sub Form_Load()
x = Val(InputBox("请输入星期几(0～6)"))
Select Case x
Case Is = 0
Text1.Text = "星期日(Sunday)"
Case Is = 1
Text1.Text = "星期一(Monday)"
Case Is = 2
Text1.Text = "星期二(Tuesday)"
Case Is = 3
Text1.Text = "星期三(Wednesday)"
Case Is = 4
Text1.Text = "星期四(Thursday)"
Case Is = 5
Text1.Text = "星期五(Friday)"
Case Is = 6
Text1.Text = "星期六(Saturday)"
Case Else
Text1.Text = "输入错误"
End Select
End Sub
3．窗体上建立了一个文本框Text1(“输入口令”)和一个命令按钮Command1(“检查”)。
Private Sub Command1_Click() '“检查”
x = Text1.Text
If x = "12345678" Then
MsgBox ("欢迎你用机!")
Else
MsgBox ("对不起，口令错")
End If
Text1.Text = ""
Text1.SetFocus
End Sub
Private Sub Form_Load()
Text1.Text = ""
Text1.MaxLength = 8
Text1.PasswordChar = "*"
End Sub
4．窗体上建立了两个文本框Text1(输入字符串)及Text2(转换结果)，一个命令按钮Command1(“清除”)。
Private Sub Command1_Click() '“清除”
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim s As String * 1
s = Chr(KeyAscii)
Select Case s
Case "A" To "Z"
s = LCase(s)
Case "a" To "z"
s = UCase(s)
Case Else
s = "*"
End Select
Text2.Text = Text2.Text + s
End Sub
5．分别选择”红”、”绿”、”蓝”复选框后，单击命令按钮Command1时，通过RGB函数调配的颜色作为一个标签的背景色（BackColor）。
Private Sub Command1_Click()
r = 0: g = 0: b = 0
If Check1.Value = 1 Then '”红”复选框
r = 255
End If
If Check2.Value = 1 Then '”绿”复选框
g = 255
End If
If Check3.Value = 1 Then '”蓝”复选框
b = 255
End If
Label1.BackColor = RGB(r, g, b)
End Sub
6．程序代码如下：
Private Sub Form_Load()
LabClk.Caption = "0"
LabClk.Alignment = 1
LabClk.BorderStyle = 1
LabClk.FontSize = 22
LabClk.FontName = "黑体"
TimClk.Interval = 1000
End Sub
Private Sub TimClk_Timer()
LabClk.Caption = Val(LabClk.Caption) + 1
End Sub
7． (1) Chr(KeyAscii) (2) ElseIf Chr(KeyAscii)
(3) CheC = CheC - 1 (4) CheC (5) Is > 0 或 Else
第5章习题
一、单选题
1．A 2. B 3．(1)C，(2)B 4．B 5．C 6．A 7．(1)B，(2)C，(3)B 8. B 9. B 10. B
二、填空题
1．(1)4次，n=13 (2)3次，n=8 (3)3次，n=27 (4)3次，n=10 (5)1次，n=12
2．(1) Len(s) (2) Mid(s, k, 1) (3) c + t (4) Text2.Text
3．(1) t = 1 (2) n = n + 1 (3) t = t * 2
4. 0
5. Text
6. 下拉列表框
7. AddItem ，RemoveItem或Clear
8．(1)ItemA (2) ItemD (3) ItemD (4) ItemA
9．(1) Mid(x, p + 3) (2) p + 4 (3) InStr(p, x, "123")
编程及上机调试
1. 和数为：1.21。程序代码如下：
Private Sub Form_Load()
Show
s = 0
For k = 1 To 100
s = s + 1 / (1 + k * 4)
Next k
Print s
End Sub
2. 程序代码如下：
Private Sub Form_Load()
Dim i As Integer, a As Integer, b As Integer, c As Integer
Show
For i = 100 To 999
a = Int(i / 100)
b = Int((i - 100 * a) / 10)
c = i - 100 * a - 10 * b
If a * a * a + b * b * b + c * c * c = i Then
Print i
End If
Next i
End Sub
3. 在窗体上建立一个文本框Text1(初始值)、一个列表框List1(显示结果)和一个命令按钮Comd1(“查找”)。
Private Sub Comd1_Click() '“查找”
Dim n As Integer
n = Val(Text1.Text)
List1.Clear:k = 0
Do While k <= 99
If Not (n Mod 7 = 0) Then
List1.AddItem n
k = k + 1
End If
n = n + 1
Loop
End Sub
4. 程序代码如下：
Private Sub Form_Load()
Show
n = Val(InputBox("正整数n="))
For i = 1 To n
For j = i + 1 To n
For k = j + 1 To n
If i * i + j * j = k * k Then
Print "("; i; ","; j; ","; k; ")"
End If
Next k
Next j
Next i
End Sub
5．在窗体上建立一个列表框List1和一个“显示表项”命令按钮Command1。程序代码如下：Private Sub Command1_click() '"显示表项"按钮单击事件
FontSize = 12
Cls
For i = 0 To List1.ListCount - 1 '逐项判断
If List1.Selected(i) Then '真时为选中
Print List1.List(i)
End If
Next i
End Sub
6．(1) Text1.Text (2) UCase(x) (3) t >= "A" And t <= "Z" (4) y + x
7．程序代码如下：
Private Sub Form_Load()
Show
Dim a As Single, xn0 As Single, xn1 As Single
a = Val(InputBox("请输入一个正数"))
xn1 = a
Do
xn0 = xn1
xn1 = (xn0 + a / xn0) / 2
Loop While Abs(xn0 - xn1) >= 0.00001
Print a; "的平方根为"; xn1
End Sub
第6章习题
一、单选题
1. D
2. A 3．(1)B，(2)B 4．C 5. C 6. A
7. (1)C (2)B (3)A (4)B (5)D
二、多选题
1. AD
2. CD
三、填空题
1. 二, 12; 1, 3; -1, 2
2. 0 1 2 3
2 2 2 2
2 1 0 1
4 4 4 4
3. Name, Index
4. (1) 0 To Index (2)Val(Text1(k).Text)
5. (1) i+1 To k (2) s(i)< s(j) (3) s(i)<>s(i-1) (4) h = h+1
6. (1) ReDim a(1 To n + 1) (2) a(K + 1) = a(K) (3) a(p)
编程及上机调试
1. 程序代码如下：
Private Sub Form_Load()
Show
Dim a(100) As Single
n = Val(InputBox("输入个数n"))
Print "处理前数据 :"
For k = 1 To n
a(k) = Val(InputBox("请输入第" & k & "个数"))
Print a(k);
Next k
M = Int(n / 2)
For k = 1 To M
h = n - k + 1
t = a(h):a(h) = a(k):a(k) = t
Next k
Print "处理的结果 :"
For k = 1 To n
Print a(k);
Next k
End Sub
2. 程序代码如下：
Private Sub Form_Load()
Dim a(6, 6) As Integer
Show
For i = 1 To 6
For j = 1 To 6
Select Case i
Case Is < j
a(i, j) = 1
Case Is > j
a(i, j) = 2
Case Is = j
a(i, j) = 0
End Select
Print a(i, j);
Next j
Next i
For i = 1 To 6
t = a(1, i):a(1, i) = a(6, i):a(6, i) = t
Next i
Print: Print
For i = 1 To 6
For j = 1 To 6
Print a(i, j);
Next j
Next i
End Sub
3．在窗体上建立两个列表框List1(处理前数据)和List2(处理后数据)，以及标签Label1。程序代码如下：
Private Sub Form_Load()
Dim a(100) As Integer, b(100) As Integer
Randomize
n = 100
For i = 1 To n '输入数组a的n个元素
x = Int(20 * Rnd)
List1.AddItem x
a(i) = x
Next i
k = 0
For i = 1 To n '删除零元素
If a(i) <> 0 Then
k = k + 1 : b(k) = a(i) : List2.AddItem b(k)
End If
Next i
Label1.Caption = "数组中零元素个数：" + Str(n - k)
End Sub
4．(1) g(x - 10) + 1 (2) n - 1 (3) g(t) < g(j)
(4) m = s(t): s(t) = s(k): s(k) = m
5．在窗体上建立4行3列共12个元素的文本框控件数组Text1(0)～Text1(11)
Private Sub Form_Load()
Dim t(12) As String
Randomize
For k = 1 To 12
t(k) = "Empty" '初始安排12个位置均为"Empty"
Next k
For h = 65 To 74 '代表"A"至"J"，每次随机安排一个字母
Do While True '随机查找一个空位
p = Int(1 + 12 * Rnd) '产生1～12随机数
If t(p) = "Empty" Then
t(p) = Chr(h)
Exit Do
End If
Loop
Next h
For k = 1 To 12
Text1(k - 1).Text = t(k) '显示座位分配情况
Next k
End Sub
第7章习题
一、单选题
1. B
2. C 3．B 4．B 5. C 6. D
7. C 8. B
二、填空题
1. EF
2. 7; 1; 4
3. (1)10 (2)28 (3)6 (4) 6
4. Call Comd1_Click
5. (1) n>=16 (2) n\16 (3) Mid(ch, r+1, 1)
编程及上机调试
1. 在窗体上建立四个文本框Text1和一个命令按钮Comman d1(“检验”)。文本框Text1～Text3用于输入，Text4用于输出结果。
Private Sub Command1_Click()
Dim a As String, b As String, c As String
a = Trim(Text1.Text)
b = Trim(Text2.Text)
c = Trim(Text3.Text)
If che(a) And che(b) And che(c) Then
Text4.Text = Val(a) + Val(b) + Val(c)
Else
Text4.Text = "存在非数字字符"
End If
End Sub
Function che(x As String) As Boolean '若存在非数字字符，函数值为假
che = True
For k = 1 To Len(x)
s = Mid(x, k, 1)
If s < "0" Or s > "9" Then
che = False
Exit For
End If
Next k
End Function
2．在窗体上建立七个文本框Text1～Text7和一个命令按钮Command1(“比较”)。Text1～Text6用于输入，Text7用于输出结果。
Private Sub Command1_Click()
a = Val(Text1.Text):
b = Val(Text2.Text):
c = Val(Text3.Text)
d = Val(Text4.Text):
e = Val(Text5.Text):
f = Val(Text6.Text)
Call max(a, b, c, m)
Call max(m, d, e, m)
Call max(m, f, f, m)
Text7.Text = m
End Sub
Sub max(x, y, z, m) ‘标准模块文件
If x > y Then
m = x
Else
m = y
End If
If m < z Then
m = z
End If
End Sub
3. (1) s<>"" (2) Mid(s, p+1) (3) n
4. 程序代码如下：
Private Sub Form_Load()
Dim x As Single, n As Integer, y As Double
x = InputBox("x=", "求X的n次方")
n = InputBox("n=", "求X的n次方")
y = Power(x, n)
Show
Print x; "的"; n; "次方="; Format(y, "###,###.##")
End Sub
Function Power(x As Single, n As Integer) As Double
If n > 1 Then
Power = Power(x, n - 1) * x
Else
Power = x
End If
End Function
5．在窗体上设置三个窗体Form1～Form3。Form1中建立了两个文本框Text1(“用户名”)和Text2(“密码”)，以及命令按钮Command1(“判断”)。Form2中建立了一个文本框Text1(其Text属性值为“欢迎你使用本系统”)和命令按钮Command1(“返回”)。Form3中建立了一个文本框Text1(其Text属性值为“对不起，请向管理员查询”)和命令按钮Command1(“退出”)。
Dim n As Integer
Private Sub Command1_Click() ‘窗体Form1的“判断”
usern = Trim(Text1.Text):passw = Trim(Text2.Text)
If usern = "username" And passw = "password" Then
Form1.Hide
Form2.Show
Else
n = n + 1:Text1.SetFocus
If n = 3 Then
Form1.Hide
Form3.Show
End If
End If
Text1.Text = "":Text2.Text = ""
End Sub
Private Sub Form_Activate()
Text1.Text = "":Text2.Text = ""
Text1.SetFocus
End Sub
Private Sub Command1_Click() ‘窗体Form2的“返回”
Form2.Hide
Form1.Show
End Sub
Private Sub Command1_Click() ‘窗体Form3的“退出”
Unload Form1
Unload Form2
Unload Form3
End
End Sub
6. (1) Form1窗体模块程序代码：
Private Sub Form_Load()
Randomize
End Sub
Private Sub Command1_Click() '"生成随机数"
Dim s As String
s = ""
For i = 1 To 10
a(i) = Int(11 + 90 * Rnd)
s = s + Str(a(i)) + ","
Next i
Text1.Text = Left(s, Len(s) - 1)
End Sub
Private Sub Command2_Click() '"求最大数"
Text2.Text = Max()
End Sub
Private Sub Command3_Click() '"打开排序窗口"
Form1.Hide '隐藏主窗体
Form2.Show '显示“排序”窗体
End Sub
Private Sub Command4_Click() '"结束"
Unload Form1 '隐藏主窗体
Unload Form2 '显示“排序”窗体
End
End Sub
(2) Form2窗体模块程序代码：
Private Sub Command1_Click() '“排序”
Dim t As String
Call Sort(t)
Text1.Text = t
End Sub
Private Sub Command2_Click() '“返回”
Form2.Hide '隐藏“排序”窗体
Form1.Show '显示主窗体
End Sub
(3) 标准模块程序代码：
Public a(1 To 10) As Single
Function Max() As Single '求最大值
Dim m As Single
m = a(1)
For i = 2 To 10
If m < a(i) Then
m = a(i)
End If
Next i
Max = m
End Function
Sub Sort(s As String) '排序
s = ""
For i = 1 To 9
For j = i + 1 To 10
If a(i) > a(j) Then
t = a(i): a(i) = a(j): a(j) = t
End If
Next j
s = s + Str(a(i)) + ","
Next i
s = s + Str(a(10))
End Sub
第8章习题
一、单选题
1. B
2. D 3．D 4．A 5. B 6. B
7. A 8. (1)D (2)D 9. B
二、填空题
1. 随机存取方式
2. Get, Put
3. (1) Open "StData1.txt" For Output As #1
(2) Write #1, StNo, StMb (3) Close #1
4. (1) Open "StData1.txt" For Input As #1 (2) EOF(1)
(3) Input #1, StNo, StMb
5．(1)13 (2)Text1.Text = "9999" (3)Text1.Text
6．(1)num + 1 (2)Input (3)num (4) Stno(num), Text1.Text
(5)Stno(num)
编程及上机调试
1. 程序代码如下：
Dim d(1 To 20) As Integer
Private Sub Command1_Click() '"产生随机数"
For i = 1 To 20
d(i) = Int(1 + 99 * Rnd)
List1.AddItem d(i)
Next i
End Sub
Private Sub Command2_Click() '"保存"
Open "MyFile3.txt" For Output As #1
For i = 1 To 20
Write #1, d(i)
Next i
Close #1
End Sub
Private Sub Command3_Click() '"读出"
Open "MyFile3.txt" For Input As #1
Do While Not EOF(1)
Input #1, x
List2.AddItem x
Loop
Close #1
End Sub
Private Sub Command4_Click() '"结束"
End
End Sub
2．本程序的用户界面和程序代码较为复杂，请见具体程序文件。
第9章习题
单选题
1．B 2．D 3．D 4．B 5. A 6. A 编程及上机调试
1. 程序代码如下：
Private Sub Form_load()
Dim x(3) As Single, y As Single
On Error GoTo errln '以后出错时转移到errln y = 2 / 0 '产生"除数为0"的错误
x(4) = 1 '产生"下标越界"的错误
MsgBox ("终止程序的运行")
Unload Me '卸载窗体
End
errln: '标号
Select Case Err.Number
Case 11 '"除数为0"的错误码为11 MsgBox ("除数为0(错误码为11)，跳过该错误")
Resume Next '返回
Case 9 '"下标越界"的错误码为9 MsgBox ("下标越界(错误码为9)，跳过该错误")
Resume Next '返回
Case Else '其他错误处理
MsgBox ("错误发生在" & Err.Source _
& ", 代码为" & Err.Number _
& ", 即" & Err.Description)
End Select
End Sub
2．改正后的程序代码如下：
Private Sub Form_Load()
Show
For i = 1 To 11
Print Tab(20 - i);
For j = 1 To 2 * i - 1
If j <= i Then
k = j
Else
k = 2 * i - j
End If
If k > 9 Then k = k + 7
Print Chr(k + 48);
Next j
Next i
End Sub
3．(1) n = n + 1 (2) d(1, j) = d(3, j) (3) d(i, 2) = d(i, 4)
(4) i = j Or i + j = 5 (5) d(i, j) = d(i, j) + 1
(6) n = 0 (7) Text1.Text
第10章习题
一、单选题
1. C
2. (1)A (2)C 3．D 4．C 5. A 6. D
7. (1)A (2)D 8. A 9. B 10. B 11. A
12. D
二、填空题
1. (1)Change (2)Value (3)Scroll (4)Value
2. (1) P1.Picture (2) P2.Picture (3) P2.Picture = P
3.Picture
3. 菜单编辑器，顶；PopUpMenu
4．(1) Button.Index (2) BackColor = RGB(255, 0, 0)
(3) BackColor = RGB(0, 255, 0) (4) BackColor = RGB(0, 0, 255)
5. (1) Picture1 (2) "X=" + Str(X) (3) "Y=" + Str(Y)
6. DragMode, 1; 0
7. Action, 4, ShowFont
编程及上机调试
1．在窗体上建立一个水平滚动条HScroll1和一个文本框Text1。程序代码如下：
Private Sub Form_Load()
HScroll1.Max = 1000
HScroll1.Min = 0
https://www.doczj.com/doc/529017796.html,rgeChange = 5
https://www.doczj.com/doc/529017796.html,rgeChange = 10
HScroll1.Value = 500
End Sub
Private Sub HScroll1_Change()
Text1.Text = HScroll1.Value
End Sub
Private Sub HScroll1_Scroll()
Text1.Text = HScroll1.Value
End Sub
2. 在窗体上建立一个计时器Timer1和“开始”、“停止”两个命令按钮。程序代码如下：
Private len_S As Single, s As Integer '模块级变量
Private Sub Command1_Click() '“开始”
Timer1.Enabled = True
s = 0
Call Sub_Move
End Sub
Private Sub Command2_Click() '“停止”
Timer1.Enabled = False
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
'先取各指针的长度
len_S = Sqr((LineS.Y2 - LineS.Y1) ^ 2 + (LineS.X2 - LineS.X1) ^ 2) '秒针长度End Sub
Private Sub Timer1_Timer() '定时器的定时事件过程
s = s + 1
Call Sub_Move
End Sub
Private Sub Sub_Move() '定时器的定时事件过程
pi = 3.14159
LineS.X2 = LineS.X1 + len_S * Sin(pi * s / 30) '绘制秒针
LineS.Y2 = LineS.Y1 - len_S * Cos(pi * s / 30)
End Sub
3. 按要求在窗体上设计一个二级下拉菜单。
4. 在窗体上建立一个通用对话框CommonDialog1、“打开”及“字体”两个命令按钮和文本框Text1。程序代码如下：
Private Sub Command1_Click() '"打开"
CommonDialog1.DialogTitle = "选择文件"
CommonDialog1.Filter = "文本文件|*.txt" '设置文件过滤器
CommonDialog1.InitDir = "C:\" '设置默认文件夹
CommonDialog1.ShowOpen '显示“打开”对话框
Text1.Text = CommonDialog1.FileName
End Sub
Private Sub Command2_Click() '"字体"
CommonDialog1.Flags = cdlCFScreenFonts
CommonDialog1.ShowFont
Text1.FontName = CommonDialog1.FontName '设置字体名称
Text1.FontSize = CommonDialog1.FontSize '设置字体大小
Text1.FontBold = CommonDialog1.FontBold '粗体
Text1.FontItalic = CommonDialog1.FontItalic '斜体
End Sub
(完)
C语言题库及答案
姓名成绩 温馨提示：同学们，经过培训学习，你一定积累了很多知识，现在请认真、仔细地完成这张试题吧。加油！ 一单项选择题 1. 在C语言中，以 D 作为字符串结束标志 A)’\n’ B)’’ C) ’0’ D)’\0’ 2.下列数据中属于“字符串常量”的是（ A ）。 A.“a” B.{ABC} C.‘abc\0’ D.‘a’ 若干个字符构成字符串 在C语言中，用单引号标识字符；用双引号标识字符串 选项B，C，分别用{}和’’标识字符串 选项D，标识字符。 3、以下说法中正确的是（ C ）。 A、C语言程序总是从第一个定义的函数开始执行
B、在C语言程序中，要调用的函数必须在main( )函数中定义 C、C语言程序总是从main( )函数开始执行 D、C语言程序中的main( )函数必须放在程序的开始部分 4.下列关于C语言的说法错误的是（ B ）。 A) C程序的工作过程是编辑、编译、连接、运行 B) C语言不区分大小写。 C) C程序的三种基本结构是顺序、选择、循环 D) C程序从main函数开始执行 5.下列正确的标识符是（C ）。 A.-a1 B.a[i] C.a2_i D.int t 6．下列C语言用户标识符中合法的是（ B ）。 A)3ax B)x C)case D)-e2 E)union 7．下列四组选项中，正确的C语言标识符是（ C ）。 A） %x B） a+b C） a123 D） 123 8、下列四组字符串中都可以用作C语言程序中的标识符的是（ A ）。 A、print _3d db8 aBc B、I\am one_half start$it 3pai C、str_1 Cpp pow while D、Pxq My->book line# His.age 9.C语言中的简单数据类型包括（D ）。 A、整型、实型、逻辑型 B、整型、实型、逻辑型、字符型 C、整型、字符型、逻辑型 D、整型、实型、字符型 10.在C语言程序中，表达式5%2的结果是 C 。
关联词语练习题 一．为下面的句子搭上恰当的关联词： 只要……就……如果……就……因为……所以…… 既然……就…… 虽然……但是……不但……而且……即使……也……只有……才…… (1) （）多读多写，作文能力（）能得到提高。 (2) 花生（）不好看，（）很有用。 (3) （）他讲得很动听，（）我听得津津有味。 (4) 爷爷（）答应了你，你（）放心吧！ (5)（）是数九寒天，我（）坚持锻炼。 (6)（）刻苦学习，长大（）能成为一个合格的建设者。 (7)这座井里的水（）清凉，（）甘甜。 (8)（）没有这个转播台，老山沟里（）收不到电视。 二．请你让这两个句子合成一句！要用上合适的关联词哦。 1.小华的字写得很快。小华的字写得很好。 2、有千难万险。千难万险不能阻挡我们前进的步伐。 3．我们多赶几里路。我们要去看一看精彩的武术表演。 4、你没有告诉我。我知道了。 5．我们发动群众。我们很好地完成上级交给我们的任务。 三．请你把失落的孩子找个家，让他们享受到妈妈的爱。 1、下面句子中关联词用地不恰当的一句是（） A、如果没有太阳，就没有我们这个美丽可爱的世界。 B、即使下了暴雨，我们就应该来上学。 C、小红虽然年纪小，但是她有远大的理想。 2、下面的句子关联词运用正确的是（） A、凡卡即使回到乡下，也改变不了他的命运。 B、只有天不下雨，我们就去春游。 C、王刚的成绩即使很好，才能骄傲。 四．请你用关联词说一句话。 无论……都…… 虽然……却…….尽管……宁可……也不…… 七、选择合适的关联词填空。 １．不但……而且…… 虽然……但是…… 因为……所以…… 如果……就…… 尽管……可是…… 不是……就是…… (1)（）我去找小刚，（）小刚来找我。 (2)（）天天的成绩优秀，（）天天的体质较差。 (3)（）这个任务很艰巨，（）我班能完成这个任务。 (4)妈妈（）关心我的学习，（）关心我的身体。 (5)（）骆驼是沙漠里重要的交通工具，（）人们称骆驼为“沙漠之舟”。 ２．不光……还…… 只要……就…… 虽然……但是…… 不管……总是…… 既然……就…… 因为……所以…… (1)（）太阳离地球太远了，（）我们看上去只有盘子那么大。 (2)雷锋叔叔（）牺牲了，（）他的精神永世长存。 (3)（）多读多写，你的作文水平（）会提高。 (4)他（）多么难做的算术题，（）想尽办法把它算出来。 (5)（）同学选你当组长，你（）要处处起带头作用，把工作做好。 答案1只有才虽然但是因为所以既然就即使也只有才虽然但是如果就
第0章习题 1. 将下列十进制数分别转化为二进制数、八进制数和十六进制数： （1）128 （2）511 （3）1024 （4）65535 （5）1048575 答： （1）10000000、200、80 （2）111111111、777、1FF （3）10000000000、2000、400 （4）1111111111111111、177777、FFFF （5）11111111111111111111、3777777、FFFFF 2. 将下列二进制数转化为十进制数和十六进制数： （1）1100110101B （2）101101.1011B 答： （1）821、335 （2）45.6875、2D.B 3. 写出下列数的原码、反码、补码：15、-20、-27/32 答： （1）00001111、00000000、00001111 （2）10010100、11101011、11101100 （3）1.1101100、1.0010011、1.0010100 4. 16位无符号定点整数的数值表示范围为多少？8位补码的表示范围是多少？16位补码的表示范围是多少？ 答： 0～65535、-128～127、-32768～32767 5．1968年Dijkstra提出结构化程序设计的思想的原因是什么？简要回答结构化程序设计的经典定义。 答： 结构化程序设计概念的提出主要是源于程序结构的层次性与模块化使得构造出来的软件具有良好的可理解性和可维护性，随着软件规模的扩大与复杂性的提高，程序的可维护性成为程序设计者们关注的重要问题之一。 如果一个程序的代码块仅仅通过顺序、选择和循环这3种基本控制结构进行连接，并且每个代码块只有一个入口和一个出口，则称这个程序是结构化的。 6．C程序在内存中存储在哪儿？计算机的内存空间是如何分区的？分区存放不同类型的数据的目的是什么？ 答：
================================================== 题号：1482 执行以下程序段后，输出结果和a的值是（）。int a=10; printf("%d",a++); A、11 和10 B、11 和11 C、10 和11 D、10 和10 答案： C 题号：2100 已知字符'A'的ASCⅡ代码值是65,字符变量c1的值是'A',c2的值是'D'.执行语句printf("%d,%d",c1,c2-2);后,输出结果是 A、65,66 B、A,B C、65,68 D、A,68 答案： A 题号：5055 相同结构体类型的变量之间，可以（）。 A、比较大小 B、地址相同 C、赋值 D、相加 答案： C 题号：3217 int a[10];合法的数组元素的最小下标值为（）。 A、1 B、0 C、10 D、9 答案： B
能正确表示逻辑关系:" a≥10或a≤0 "的C语言表达式是 A、a>=0 | a<=10 B、a>=10 or a<=0 C、a>=10 && a<=0 D、a>=10 || a<=0 答案： D 题号：157 main() {int x=1,a=0,b=0; switch (x) { case 0: b++; case 1: a++; case 2: a++;b++;} printf("a=%d,b=%d",a,b); }该程序的输出结果是( ) A、2,2 B、2,1 C、1,1 D、1,0 答案： B 题号：4784 设变量a是整型，f是实型，i是双精度型，则表达式10+'a'+i*f值的 数据类型为（）。 A、不确定 B、double C、int D、float 答案： B 题号：1647 以下程序中，while循环的循环次数是______ main() { int i=0;
关联词练习及答案 一、 1.我们要组织到公园参加游园晚会，你不去，他（）不去。 2.天安门广场西侧的人民大会堂（）高大，（）庄严。 3.我问小刚：“你（）参加美术小组，（）参加航模小组？” 4.小刚让我猜他参加了什么兴趣小组，我说：“（）美术组，（）航模组。” 5.（）他不一定能来，我们（）要通知他。 6.这里的花（）很多，（）没有奇花异草。 7.鲁迅先生（）爱惜自己的时间，（）爱惜别人的时间。 8.我们（）可以看见铁丝网和胸墙，（）可以看见火力点，（）连敌人讲话都听得见。 9.（）天气很冷，爷爷（）要坚持早锻炼。 10．（）我们现在不好好学习，将来（）不能担当起建设祖国的重任。 11．很多同学在实践中体会到，（）多读多写，作文（）会有进步。 12．（）困难有多大，我们（）能克服。 13．（）他热情地为同学们服务，（）受到同学们的好评。 14．（）你答应找小兰一起去看画展，（）应该准时去找他。 15．刘胡兰（）牺牲自己的生命，（）说出党的机密。 16．放学后，我们（）在街上乱跑，（）回家读一读课外书。 17．我（）知道这件事情，（）并不了解事情的全过程。 18．（）你去，（）他去，总得有一个人去。 19．他（）牺牲自己，（）暴露党的组织。 20．同学们（）走着，（）谈论着。 21．（）是什么人，谁向我们指出（）行。 22．小李在学习上（）有这么好的成绩，是（）他平时刻苦学习的结果。23．（）风浪再大，我（）要把你送过河去。 24．王老师（）关心我们的学习，（）关心我们的身体。 25．（）多读多练，（）会提高作文水平。 26．我们的教室（）宽敞（）明亮。 27．现在我们的生活水平（）有了提高，（）还要注意节约。 28．（）没有老师的耐心教育和帮助，我（）不会有这么大的进步。 29．（）芦花村的孩子们几乎都会凫水，（）能像雨来游得这么好的却没有几个。30．（）人人都献出一点爱，世界（）会变成美好的人间。 31．（）走到天涯海角，我（）不会忘记自己的祖国。 32．凡卡（）在城里受罪，（）回到乡下爷爷那里去。 33．邱少云（）牺牲自己，（）暴露潜伏部队。 34．（）工作再忙，他每天晚上（）挤出时间学习英语。 35．每天上学，（）王洁来找我，（）我去找他，我俩总是结伴去学校。 36．他把他的大提包扔在一边，怀里（）紧紧地抱着一个纸箱子。 37．（）我做了充分准备，这次试验（）没有成功。 38．（）困难再大，我们（）要按时完成任务。 39．（）明天下雨，我们（）下个星期再去游乐园吧。 40．（）石块有多重，小草（）要从下面钻出来。 41．我（）说了，（）不怕发表。
C 语言理论上机考试选择题部分（共200题） 1、下面程序的输出是___D______ #include
a+=a-=a*a 后,a 的值是____D____ A) 552 B) 264 C) 144 D) -264 9、执行下面程序中的输出语句后,输出结果是____B__. #include
1.我们(与其把轮船停在港口,(不如冒着狂风暴雨前进。 2.(只有从小学好本领,(才更好地为国家建设出力。 3.鲁迅(不仅是伟大的文学家,(还是伟大的思想家和革命家。 4.(尽管今天下雨了,我们(还是要去探望李老师。 5.因为长城是那样雄伟壮丽,(所以吸引了很多游客。 6.一滴水(虽然很小很小,(但是无数滴水汇集起来,就可以形成江河湖海。 7.如果我们现在不好好学习,将来(就不能担当起建设祖国的重任。 8.很多同学在实践中体会到,(只要多读多写,作文(就会有进步。 9.(无论困难有多大,我们(都能克服。 10.(因为他热情地为同学们服务,(所以受到同学们的好评。 11.(如果你答应找小兰一起去看画展,(就应该准时去找他。 12.刘胡兰(宁可牺牲自己的生命,(也不说出党的机密。 13.我(虽然知道这件事情,(但是并不了解事情的全过程。 14.(要么你去,(要么他去,总得有一个人去。 15.他(宁可牺牲自己,(也不暴露党的组织。 16.同学们(一边走着,(一边谈论着。 17.(不管是什么人,谁向我们指出(都行。 18.小李在学习上(之所以有这么好的成绩,(是因为他平时刻苦学习的结果。 19.(不管风浪再大,我(都要把你送过河去。
20.王老师(不但关心我们的学习,(而且关心我们的身体。 21.(只要多读多练,(就会提高作文水平。 22.我们的教室(不但宽敞(而且明亮。 23.现在我们的生活水平(虽然有了提高,(但是还要注意节约。 24.(如果没有老师的耐心教育和帮助,我(就不会有这么大的进步。 25.(虽然芦花村的孩子们几乎都会凫水,(但是能像雨来游得这么好的却没有几个。 26.(只要人人都献出一点爱,世界(就会变成美好的人间。 27.(不管走到天涯海角,我(都不会忘记自己的祖国。 28.凡卡(宁可在城里受罪,(也不回到乡下爷爷那里去。 29.邱少云(宁可牺牲自己,(也不暴露潜伏部队。 30.(即使工作再忙,他每天晚上(也挤出时间学习英语。 31.每天上学,(要么王洁来找我,(要么我去找他,我俩总是结伴去学校。 32.他把他的大提包扔在一边,怀里(仍然紧紧地抱着一个纸箱子。 33.(虽然我做了充分准备,这次试验(但是没有成功。 34.(如果明天下雨,我们(就下个星期再去游乐园吧。 35.(不管石块有多重,小草(都要从下面钻出来。 36.王平和我同桌三年,(因此我很了解他。
C语言习题集 习题一 一．填空题 1．C程序是由（函数）构成的，一个C程序中至少包含（main函数）。因此，( 函数) 是C程序的基本单位。 2．C程序注释是由( /*) 和( */ ) 所界定的文字信息组成的。3．函数体一般包括( 变量声明) 和( 语句) 。 二．判断题 1．一个C程序的执行总是从该程序的main函数开始，在main函数最后结束。【错】 2．main函数必须写在一个C程序的最前面。【错】 3．一个C程序可以包含若干的函数。【对】 4．C程序的注释部分可以出现在程序的任何位置，它对程序的编译和运行不起任何作用。但是可以增加程序的可读性。【对】 5．C程序的注释只能是一行。【错】 6．C程序的注释不能是中文文字信息。【错】 8．可以使用Visual C++ 6.来编译和连接一个C程序。【对】 9．可以使用Visual C++ 6.来运行一个C程序。【对】 10．可以使用Visual C++ 6.来实时调试（即动态调试）一个C程序。【对】三．简答题 1．写出一个C程序的基本结构。 2．简要叙述使用Visual C++ 6.0编译和运行一个程序的步骤。 四．编程题 1．提高题：参照课本例1.1，试编写一个C程序，输出如下信息。（提示：使用键盘上的一些符号）。 2．提高题：试编写一个C程序，输出如下信息。 ********************** *** @ @ *** *** @ *** ********************** 试试看，可以输出其他组合图案吗？
习题二 一．选择题 1、合法的字符常量是（ACD）。 A）…\t?B) “A” C）…a?D）?\x32? 2、合法的字符常量是( D) 。 A）…\084?B) …\84? C）…ab?D）?\x43? 3、（B）是C语言提供的合法的数据类型关键字。 A）Float B）signed C）integer D）Char 4、在以下各组标识符中，合法的标识符是（(4)）。 （1）A）B01 B）table_1 C）0_t D）k% （2）A）Fast_ B）void C）pbl D）
关联词练习题 小学语文关联词复习（一） 一、知识整理： 1、并列句（各分句间的关系是平行并列的）如：“这衣裳既漂亮，又大方。” 常用的关联词语有：又……又……、既……又……、一边……一边……、那么……那么……、是……也是……（不是）、不是……而是…… 2、承接句（各分句表示连续发生的事情或动作，分句有先后顺序）如：“看了他的示范动作后，我就照着样子做。” 常用的关联词语有：……接着……、……就……、……于是……、……又……、……便…… 3、递进句（分句间是进一层的关系）如：“海底不但景色奇异，而且物产丰富。” 常用的关联词语有：不但（不但）……而且……、不但……还……、……更(还)……、……甚至…… 4、选择句（各分句列出几种情况，从中选出一种）如：“我们下课不是跳橡皮筋，就是踢毽子。” 常用的关联词语有：不是……就是……、或者……或者……、是……还是……、要么……要么……、宁可（宁愿）……也不……、与其……不如…… 5、转折句（后一个分句与前一个分句的意思相反或相对，或部分相反）如：“虽然天气已晚，但是老师仍在灯下伏案工作。”
常用的关联词语有：虽然……但是……、即使……不过……、……不过……、……却…… 6、因果句（分句间是原因和结果的关系）如：“因为这本书写得太精彩了，所以大家都喜欢看。” 常用的关联词语有：因为(因为)……所以……、……因而(所以)……、既然……就……、之所以……是因为…… 7 、假设句（一个分句表示假设的情况，另一个分句表示假设实现后的结果）如：“如果明天下雨，运动会就不举行了。” 常用的关联词语有：如果……就……、即使……也…… 8、条件句（一个分句说明条件，另一个分句表示在这个个条件下产生的结果）如：“只要我们努力，成绩就会持续地提升。” 常用的关联词语有：只要……就……、无论（不管、不论）……也（都）……、只有……才……、凡是……都……、除非……才…… 1. （无论）是什么人，谁向我们指出（都）行。 2. 小李在学习上（所以）有这么好的成绩，是（因为）他平时刻苦学习的结果。 3. （即使）风浪再大，我（也）要把你送过河去。 4. 王老师（不但）关心我们的学习，（而且）关心我们的身体。 5. （只要）多读多练，（就）会提升作文水平。
第一章 C语言概述 一、选择题： 1、一个C程序的执行是从（ A ）。 A本程序的main函数开始，到main函数结束 B本程序文件的第一个函数开始，到本程序文件的最后一个函数结束 C本程序的main函数开始，到本程序文件的最后一个函数结束 D本程序文件的第一个函数开始，到本程序main函数结束 [ 2、在 C 语言中，每个语句必须以（ D ）结束。 A. 回车符 B. 冒号 C. 逗号 D. 分号 3、C 语言规定：在一个源程序中，main函数的位置（ C ）。 A. 必须在最开始 B. 必须在系统调用的库函数的后面 C. 可以任意 D. 必须在最后 4、一个C 语言程序是由（ B ）。 ~ A. 一个主程序和若干子程序组成 B. 函数组成 C. 若干过程组成 D. 若干子程序组成 5、下列说法中错误的是( D )。 A. 主函数可以分为两个部分：主函数说明部分和主函数体 B. 主函数可以调用任何非主函数的其他函数 C. 任何非主函数可以调用其他任何非主函数 D. 程序可以从任何非主函数开始执行 》 6、用 C 语言编写的源文件经过编译，若没有产生编译错误，则系统将( C )。 A. 生成可执行目标文件 B. 生成目标文件 C. 输出运行结果 D. 自动保存源文件 二、填空题： 1、C 语言只有 32 个关键字和 9 种控制语句。 ~ 2、每个源程序有且只有一个 main 函数，系统总是从该函数开始执行C语言程序。 3、C 语言程序的注释可以出现在程序中的任何地方，它总是以 \* 符号作为开始标记，以 */ 符号作为结束标记。 4、C 语言中，输入操作是由库函数 scanf 完成的，输出操作是由库函 数 printf 完成的。 5、系统默认的C 语言源程序文件的扩展名是 .c ，经过编译后生成的目标文件的扩展名是 .obj ，经过连接后生成的可执行文件的扩展名是 .exe 。 6、C 语言的标识符只能由字母、数字和下划线三种字符组成。
程序填空题 导读：在程序填空题中，已经给出了程序的主干，读者首先要理解程序的思路，再选择正确的内容填入空白处，使程序完成既定的功能。这类习题的设计就是要引导读者逐步掌握编程的方法。本节习题的难度适中，可能有些典型的程序在课堂上已经有所接触，读者一定要独立完成它，这样就可以逐步提高自己的编程能力。在程序设计语言学习的中期，读者对程序设计已经有了初步的了解，而自己编写程序又不知从何处入手，此时解答此类题目可以避免盲目性，从而提高学习的效率。 【】下面程序的功能是不用第三个变量，实现两个数的对调操作。#include <> main() { int a,b； scanf("%d%d",&a,&b)； printf("a=%d,b=%d\n",a,b)； a= ①； b= ②； a= ③； printf("a=%d,b=%d\n",a,b)； }
【】下面程序的功能是根据近似公式：π2/6≈ 1/12+1/22+1/32+ …… +1/n2,求π值。 #include <> double pi(long n) { double s=； long i； for(i=1；i<=n；i++) s=s+ ①； return( ②)； } 【】下面的程序的功能是求一维数组中的最小元素。 findmin(int *s,int t,int *k) { int p； for(p=0,*k=p；p C语言函数题库及答案 Company Document number：WTUT-WT88Y-W8BBGB-BWYTT-19998 第六部分函数 一、单项选择题 1．C语言中的函数返回值的类型是由（D）决定 A．return语句中的表达式B．调用函数的主调函数 C．调用函数时临时D．定义函数时所指定的函数类型 2.下面不正确的描述是（B）。 A．调用函数时，实参可以是表达式 B．调用函数时，实参和形参可以共用内存单元 C．调用函数时，将形参分配内存单元 D．调用函数时，实参与形参的类型必须一致 3.在C语言中，调用一个函数时，实参变量和形参变量之间的数据传递是 （D） A．地址传递B．值传递 C．由实参传递给形参，并由形参传回给实参D．由用户指定传递方式 4.下面的函数调用语句中含有（A）个实参 inta,b,c; intsum(intx1,intx2); …… total=sum((a,b),c); A．2B．3C．4 D．5 5.在C语言中（C） A．函数的定义可以嵌套，但函数的调用不可以嵌套 B．函数的定义和调用均不可以嵌套 C．函数的定义不可以嵌套，但是函数的调用可以嵌套 D．函数的定义和调用均可以嵌套 6.关于Ｃ语言中的return语句正确的是（C） A．只能在主函数中出现 B．在每个函数中都必须出现 C．可以在一个函数中出现多次 D．只能在除主函数之外的函数中出现 7.两个形参中，第一个形参为指针类型、第二个形参为整型，则对函数形参的说明有错误的是（D） (floatx[],intn) (float*x,intn) (floatx[10],intn) (floatx,intn) 8.在C语言中，函数的数据类型是指(A) A.函数返回值的数据类型 B.函数形参的数据类型 C.调用该函数时的实参的数据类型 D.任意指定的数据类型 9.已知如下定义的函数： fun1(a) {printf("\n%d",a)； } 则该函数的数据类型是(C) 小学语文关联词练习题 1.我们（与其）把轮船停在港口，（不如）冒着狂风暴雨前进。 2.（只有）从小学好本领，（才）更好地为国家建设出力。 3.鲁迅（不仅）是伟大的文学家，（还）是伟大的思想家和革命家。 4.（尽管）今天下雨了，我们（还是）要去探望李老师。 5.（因为）长城是那样雄伟壮丽，（所以）吸引了很多游客。 6.一滴水（虽然）很小很小，（但是）无数滴水汇集起来，就可以形成江河湖海。 7．如果）我们现在不好好学习，将来（就）不能担当起建设祖国的重任。 8．很多同学在实践中体会到，（只要）多读多写，作文（就）会有进步。 9．（无论）困难有多大，我们（都）能克服。 10.（因为）他热情地为同学们服务，（所以）受到同学们的好评。 11．（如果）你答应找小兰一起去看画展，（就）应该准时去找他。 12．刘胡兰（宁可）牺牲自己的生命，（也不）说出党的机密。 13．我（虽然）知道这件事情，（但是）并不了解事情的全过程。 14．（要么）你去，（要么）他去，总得有一个人去。 15．他（宁可）牺牲自己，（也不）暴露党的组织。 16．同学们（一边）走着，（一边）谈论着。 17．（不管）是什么人，谁向我们指出（都）行。18．小李在学习上（之所以）有这么好的成绩，（是因为）他平时刻苦学习的结果。 19．（不管）风浪再大，我（都）要把你送过河去。 20．王老师（不但）关心我们的学习，（而且）关心我们的身体。 21．（只要）多读多练，（就）会提高作文水平。 22．我们的教室（不但）宽敞（而且）明亮。 23．现在我们的生活水平（虽然）有了提高，（但是）还要注意节约。 24．（如果）没有老师的耐心教育和帮助，我（就）不会有这么大的进步。 25．（虽然）芦花村的孩子们几乎都会凫水，（但是）能像雨来游得这么好的却没有几个。26．（只要）人人都献出一点爱，世界（就）会变成美好的人间。 27．（不管）走到天涯海角，我（都）不会忘记自己的祖国。 28．凡卡（宁可）在城里受罪，（也不）回到乡下爷爷那里去。 29．邱少云（宁可）牺牲自己，（也不）暴露潜伏部队。 30．（即使）工作再忙，他每天晚上（也）挤出时间学习英语。 31．每天上学，（要么）王洁来找我，（要么）我去找他，我俩总是结伴去学校。 32．他把他的大提包扔在一边，怀里（仍然）紧紧地抱着一个纸箱子。 33．（虽然）我做了充分准备，这次试验（但是）没有成功。 34．（如果）明天下雨，我们（就）下个星期再去游乐园吧。 35．（不管）石块有多重，小草（都）要从下面钻出来。 36．王平和我同桌三年，（因此）我很了解他。 37．我们一定要把京张铁路修好，否则（不但）那些外国人会讥笑我们，（而且）会使中国工程师失去信心。 38．他干的活计（不但）速度快，（而且）质量好。39．（只有）这种草，（才）是坚韧的草。 40．这艘轮船（不但）载客多，（而且）速度非常快。 C语言程序设计第二版 习题参考答案 Document serial number【LGGKGB-LGG98YT-LGGT8CB-LGUT- C语言程序设计习题参考答案 习题 1 一、判断题 1．在计算机中，小数点和正负号都有专用部件来保存和表示。 2．二进制是由0和1两个数字组成的进制方式。 3．二进制数的逻辑运算是按位进行的，位与位之间没有进位和借位的关系。 4．在整数的二进制表示方法中，0的原码、反码都有两种形式。 5．有符号数有三种表示法：原码、反码和补码。 6．常用字符的ASCII码值从小到大的排列规律是：空格、阿拉伯数字、大写英文字母、小写英文字母。 解：1．F2．T 3．T 4．T 5．T 6．T 二、单选题 1．在计算机中，最适合进行数值加减运算的数值编码是。 A. 原码 B. 反码 C. 补码 D. 移码 2．已知英文小写字母m的ASCII码为十进制数109，则英文小写字母y的ASCII 码为十进制数。 A. 112 B. 120 C. 121 D. 122 3．关于ASCII码，在计算机中的表示方法准确地描述是。 A. 使用8位二进制数，最右边一位为1 B. 使用8位二进制数，最左边一位为1 C. 使用8位二进制数，最右边一位为0 D. 使用8位二进制数，最左边一位为0 4．设在机器字长4位，X＝0111B，Y＝1011B，则下列逻辑运算中，正确的是 ___________。 A. X∧Y＝1000 B. X∨Y＝1111 C. X⊕Y＝0011 D. ˉY＝1000 5．下列叙述中正确的是（）。 A．高级语言就是机器语言 B．汇编语言程序、高级语言程序都是计算机程序，但只有机器语言程序才是计算机可以直接识别并执行的程序 C．C语言因为具有汇编语言的一些特性，所以是汇编语言的一种 D．C源程序经过编译、连接，若正确，执行后就能得到正确的运行结果6．用C语言编写的源程序经过编译后，若没有产生编译错误，则系统将（）。 A．生成可执行文件B．生成目标文件 C．输出运行结果D．自动保存源文件 7．下列叙述中不正确的是（）。 A．main函数在C程序中必须有且只有一个 B. C程序的执行从main函数开始，所以main函数必须放在程序最前面 C. 函数可以带参数，也可以不带参数。 2019年C语言考题答案 1、程序填空题 给定的程序的功能是调用fun 函数建立班级通讯录。通讯录中记录每位学生的编号、姓名和电话号码班级的人数和学生的信息从键盘读入，每个人的信息作为一个数据块写到名为myfile5.dat 的二进制中。 填空：( 1) STYPE(2)FILE(3)fp 改错：(1) for(i=0;i<=sl;i++)(2)t[2*sl]= 0“ 或t[sl+sl]= 0“ 编程： *c=(a/10)*1000+(b/10)*100+(a%10)*10+(b% 10)； 2、程序填空题给定程序的功能是：从键盘输入若干文本 (每行不超过80 个字符)，写到文件myfile4.txt 中，用-1 作为字符串输出输入的标志。然后将文件的内容读出显示在屏幕上。文件的读写分别由自定义函数ReadText 和Writetext 实现。 填空：(1)*fw(2)str (3) str 改错：(1)voidfun(longs,long*t)(2) s1=s1*10; 编程：int i,j=0,min=a[0].s; for(i=0;i else if(min==a[i].s) b[j++]=a[i]; } return j; 3、程序填空题 给定程序中，函数fun 的功能是：讲自 然数1~10 以及它们的平方根写到名为myfile3.txt 的文本中，然后再按顺序读出显示在屏幕上。 填空：( 1) fp( 2)fclose(fp)(3)myfile3.txt 改错：( 1)for(i=j+1;i 关联词语的使用： （1）一般方法：初读句子，弄清分句之间的关系。选择关联词语，填入句子。在读句子，检查句子是否通顺，句意是否正确。 （2）两个注意点 搭配要得当：使用一组关联词语是要前后呼应，要"成双配对"，不能交叉使用，这样才能是句意畅通、明确。 运用要合理：该用的时候用，不该用的时候就不用，不要生搬硬套。根据句子表达的需要，正确的选择关联词语。 练习题： 1、选择关联词语填空。 不是……就是…… 不但……而且…… （1）小敏的课外活动丰富多彩，每天放学后（）到图书馆看书，（）到科技小组活动。（2）我和张平是好朋友，暑假里（）我到他家去玩，（）他到我家来做作业。 （3）激光作为一种新兴的人造广源，（）可用于科研、军事、医学方面，（）可用于通讯、教育、宣传等方面。 因为……所以…… 如果……就…… （1）（）他学习刻苦，工作认真，积极参加体育锻炼，（）被评为"三好"学生。 （2）（）我说得不对，（）请你给我指出来。 （3）（）我们往足球里打气，足球（）变得硬梆梆的了。 不是……而是…… 即使……也…… （1）（）我们的生活条件很好，（）不能丢掉勤俭节约的好传统。 （2）台湾（）独立的国家，（）中华人民共和国领土不可分割的一部分。 （3）这次接力赛我们落后了，（）我们跑得太慢，（）接棒不够默契。 宁可……也不…… 与其……不如…… （1）江姐（）牺牲自己，（）泄露党的机密。 （2）凡卡（）在莫斯科的鞋铺受折磨，（）回到乡下爷爷那里去。 （3）凡卡（）回到乡下与爷爷一起吃苦，（）愿留在莫斯科的鞋铺。 2、选择关联词语填空。 （1）虽然……但是…… 不管……也…… 与其……不如…… 之所以……是因为…… 放学后，我们（）在街上乱跑，（）回家读书。 （）怎样风浪再大，我（）要送你过河去。 这里的花（）很多，（）没有奇花异草。 小明在学习上（）有这么好的成绩，（）他平时的刻苦学习。 （2）即使……也…… 既然……就…… 只要……就…… 不仅……还…… 虽然……可是…… 因为……所以…… 爸爸（）技术高明，（）积极肯干。再难的活儿，（）一到爸爸的手里，（）能化难为易。（）是别人不愿意干的活儿，他（）从不推辞。他觉得做难度大的活儿（）人累一点，（）能提高自己的技术。 3、填入恰当的关联词 第一章1.1 题目内容： 使用printf()在屏幕上输出hello world! 提示： #include 输入格式: 输出格式： 输出提示信息： "hello world!\n" "hello hit!\n" "hello everyone!\n" 输入样例： 输出样例： hello world! hello hit! hello everyone! #include 精选考试类应用文档，如果您需要使用本文档，请点击下载，另外祝您生活愉快，工作顺利，万事如意！ 大学C语言考试题库及答案 姓名成绩 温馨提示：同学们，经过培训学习，你一定积累了很多知识，现在请认真、仔细地完成这张试题库吧。加油！ 一单项选择题库 1. 在C语言中，以 D 作为字符串结束标志 A)’\n’ B)’ ’ C) ’0’ D)’\0’ 2.下列数据中属于“字符串常量”的是（ A ）。 A.“a” B.{ABC} C.‘abc\0’ D.‘a’ 若干个字符构成字符串 在C语言中，用单引号标识字符；用双引号标识字符串 选项B，C，分别用{}和’’标识字符串 选项D，标识字符。 3、以下说法中正确的是（ C ）。 A、C语言程序总是从第一个定义的函数开始执行 B、在C语言程序中，要调用的函数必须在main( )函数中定义 C、C语言程序总是从main( )函数开始执行 D、C语言程序中的main( )函数必须放在程序的开始部分 4.下列关于C语言的说法错误的是（B ）。 A) C程序的工作过程是编辑、编译、连接、运行 B) C语言不区分大小写。 C) C程序的三种基本结构是顺序、选择、循环 D) C程序从main函数开始执行 5.下列正确的标识符是（C ）。 A.-a1 B.a[i] C.a2_i D.int t 6．下列C语言用户标识符中合法的是（B ）。 A)3ax B)x C)case D)-e2 E)union 7．下列四组选项中，正确的C语言标识符是（C ）。 A）%x B）a+b C）a123 D）123 8、下列四组字符串中都可以用作C语言程序中的标识符的是（A ）。 A、print _3d db8 aBc B、I\am one_half start$it 3pai C、str_1 Cpp pow while D、Pxq My->book line# His.age 9.C语言中的简单数据类型包括（D ）。 A、整型、实型、逻辑型 B、整型、实型、逻辑型、字符型 C、整型、字符型、逻辑型 D、整型、实型、字符型 10.在C语言程序中，表达式5%2的结果是 C 。C语言函数题库及答案
小学语文关联词练习题及答案
C语言程序设计第二版习题参考答案
2019二级C语言题库参考答案解析
小升初关联词语练习及答案
c语言习题及答案
大学C语言考试题库及答案
相关主题
文本预览