面向对象程序设计实习报告模板
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
（本报告为vb实习报告，封面请自行填写）
实习报告
题目:
所属系、部:
班级:
姓名:
学号:
指导教师:
2011
、实习目的
熟练掌握面向对象的概念、特点和基本的程序设计方法，熟悉使用常用的算 法解决实际问题。
二、实习时间
2011年6月13日-17日
三、实习地点
教学楼A302机房
四、实习内容
1、编写程序，将乘法“九九表”存入数组中，单击显示按扭，可以在当前窗口 中显示出来；单击交换按扭后，弹出输入框，根据输入框里输入的数据交换 乘法“九九表”中任意两行对应的数。
2、由随机函数产生10道一位整数与两位整数相加的加法题。产生的加法题依次 显示在屏幕上，每产生一道题后，由用户输入答案，如果答案正确，记10分；
如果答案错误，允许第二次输入答案，第二次输入答案正确，记5分，错误记0
分。最后给出总得分。
《十道加法题》设计代码
Private Sub Comma nd1_Click()
=Val(I nputBox(m&"
第二次回答","作答"))
If a+b = c The n
s = s+5
n = m&" 5分"
Else
n = m&百度文库0分”
End If
End If
Form1.Pri nt n
Form1.Print "当前得分",s, "分"
Print
Next i
Form1.Pri nt "
硏歹
25
□*1-
&
6*2=
i?
e«3=
18
&*4=
24
6*5=
30
6*6=
2*1=
2
2*2^
q
3a 1=
a
8*3=
24.
6*4=
32
3*5=
40
3*6=
43
8*7i
56
64
3*1=
9
9*2=
曲
0*3-
27
0*4=
35
9>+5=
45
9*6=
54
9*7=
&3
g*&二
72
1*1-
9*9=61
图1-1《99乘法表交换》运行界面
^•1=
2
2*2=
4
3*1=
3
3*2=
5
3*3=唱
4«1=
4
4^=
8
J*3=
12 4*4=
IB
5*1=
5
5*2
10
5*3=
15
5*4=
羽
5*5=
25
3*1=
&
6*2=
e«a=
18
6*4=
21
6*5=
30
6*吕=
36
r*i=
T
7*2=
u
7*3=
21
744=
Z3
T*5=
35
T*6=
4?
3*1=&
3*2=
1&
S*3=
24
6*4=
32
8*5=
40
8*6-
3*1-?
g*2-
id
^«3=
27
M=
更
9*5-
45
i
1*1-
T#7s
7*1=
T
7*2=
14
7*3-
21
1+4=
曲
7*9=
35
7*5=
3*1=
3
3*2=
& 3*3=呜
4*1=
4
4*2=
3 4*3=
12 4*4=
IB
5
5*2^
10
E«3=
15
5*4=
20
s = 0
For i = 1 To 10 a = In t(10 * Rnd)
b = In t(10+10 * Rnd)
m ="第"&i&"题"&a&"+"&b
c=Val(I nputBox(m&"第
一次回答","作答"))
If a+b=c The n
s = s+10
n = m&" 10分"
Else
实习报告
题目:
所属系、部:
班级:
姓名:
学号:
指导教师:
2011
、实习目的
熟练掌握面向对象的概念、特点和基本的程序设计方法，熟悉使用常用的算 法解决实际问题。
二、实习时间
2011年6月13日-17日
三、实习地点
教学楼A302机房
四、实习内容
1、编写程序，将乘法“九九表”存入数组中，单击显示按扭，可以在当前窗口 中显示出来；单击交换按扭后，弹出输入框，根据输入框里输入的数据交换 乘法“九九表”中任意两行对应的数。
2、由随机函数产生10道一位整数与两位整数相加的加法题。产生的加法题依次 显示在屏幕上，每产生一道题后，由用户输入答案，如果答案正确，记10分；
如果答案错误，允许第二次输入答案，第二次输入答案正确，记5分，错误记0
分。最后给出总得分。
《十道加法题》设计代码
Private Sub Comma nd1_Click()
=Val(I nputBox(m&"
第二次回答","作答"))
If a+b = c The n
s = s+5
n = m&" 5分"
Else
n = m&百度文库0分”
End If
End If
Form1.Pri nt n
Form1.Print "当前得分",s, "分"
Next i
Form1.Pri nt "
硏歹
25
□*1-
&
6*2=
i?
e«3=
18
&*4=
24
6*5=
30
6*6=
2*1=
2
2*2^
q
3a 1=
a
8*3=
24.
6*4=
32
3*5=
40
3*6=
43
8*7i
56
64
3*1=
9
9*2=
曲
0*3-
27
0*4=
35
9>+5=
45
9*6=
54
9*7=
&3
g*&二
72
1*1-
9*9=61
图1-1《99乘法表交换》运行界面
^•1=
2
2*2=
4
3*1=
3
3*2=
5
3*3=唱
4«1=
4
4^=
8
J*3=
12 4*4=
IB
5*1=
5
5*2
10
5*3=
15
5*4=
羽
5*5=
25
3*1=
&
6*2=
e«a=
18
6*4=
21
6*5=
30
6*吕=
36
r*i=
T
7*2=
u
7*3=
21
744=
Z3
T*5=
35
T*6=
4?
3*1=&
3*2=
1&
S*3=
24
6*4=
32
8*5=
40
8*6-
3*1-?
g*2-
id
^«3=
27
M=
更
9*5-
45
i
1*1-
T#7s
7*1=
T
7*2=
14
7*3-
21
1+4=
曲
7*9=
35
7*5=
3*1=
3
3*2=
& 3*3=呜
4*1=
4
4*2=
3 4*3=
12 4*4=
IB
5
5*2^
10
E«3=
15
5*4=
20
s = 0
For i = 1 To 10 a = In t(10 * Rnd)
b = In t(10+10 * Rnd)
m ="第"&i&"题"&a&"+"&b
c=Val(I nputBox(m&"第
一次回答","作答"))
If a+b=c The n
s = s+10
n = m&" 10分"
Else