VB编程实验报告
2012-03-26 19:03
309 查看
VB
编程实验报告
教
育
学
院
专业
教育学
姓名
王宏宏
学号 11110142018
一. 实验目的
1. 生成随机数
2. 实现大小的转换
3. 随机生成个位数
为了学习到真正的运用VB知识做题,要学会运用如何随机生成随机数,大小写的转换,生成个位数。
二. 实验内容
1.生成随机数
再窗体上放三个文本框,一个command按钮,三个label.
Label1属性是输入随机数的下界,Label2的属性是输入随机数的上界,Label3的属性是生成的随机数。
Privatesub command click ()
Dimm as integer
Dimn as integer
m=Val(Text1.text)
n=Val(Text2.text)
Text3.text=m+ Lit (Rod *(n-m+1))
EndSub
在窗体的load事件过程中调用Randomize函数
PrivateSub Form _Load ()
Randomize
End Sub
2.实现大小写的转换
建立Form1的属性字母转换,Label的属性是请输入英文字母,Text1的属性为空,command1的属性是转大写,command2的属性是转小写,command3的属性是还原。
a. 在通用声明中,声明模块级变量x
Dimx as string
b. 在代码窗口中选择form控件的load事件,代码程序
Privatesub form _load ()
x=Text1.text
EndSub
c. 在代码窗口中选择command1控件click
事件写代码
PrivateSub command1_click ()
Text1.text=Vcase (x)
EndSub
d. 在代码窗口中选择command2控件click
事件,编写程序。[/b]
PrivateSub command2_click ()
Text1.text=Lcase (x)
EndSub
e. 在代码窗口中选择command3控件click事件,编写程序。
PrivateSub command3_ click ()
Text1.text=x
EndSub
3.生成个位数
PrivateSub command1 _click ()
Dima, b, c as integer
Cols
Randomize
a=lnt (10* Rod)
b=lnt (100* Rod)
c=Int (1000* Rod)
Print“a =”&a
Print“b =”&b
Print“c=”&c
EndSub
三. 心得体会
VB的题太难做了,自己只会照着书上的做,不会自己设计,做完这三个题,我都是花了好长的时间做的,VB知识的只要我们认真的学习,VB我们相信我们一定会的。
四. 没有解决的问题
在随机数,大小写转换,生成个位数中,没有解决的问题还有很多,例如,不知道该怎样编写程序,我也不会编写程序,这一直是最大的问题。
五. 解决的办法
上网查找相关知识,找到问题的答案,到图书馆去找书籍,解决问题。
大二大三的学姐帮助解决问题,再加上自己的一些学习,自己也懂得一些知识。VB课程,我们一定会克服它的。
编程实验报告
教
育
学
院
专业
教育学
姓名
王宏宏
学号 11110142018
一. 实验目的
1. 生成随机数
2. 实现大小的转换
3. 随机生成个位数
为了学习到真正的运用VB知识做题,要学会运用如何随机生成随机数,大小写的转换,生成个位数。
二. 实验内容
1.生成随机数
再窗体上放三个文本框,一个command按钮,三个label.
Label1属性是输入随机数的下界,Label2的属性是输入随机数的上界,Label3的属性是生成的随机数。
Privatesub command click ()
Dimm as integer
Dimn as integer
m=Val(Text1.text)
n=Val(Text2.text)
Text3.text=m+ Lit (Rod *(n-m+1))
EndSub
在窗体的load事件过程中调用Randomize函数
PrivateSub Form _Load ()
Randomize
End Sub
2.实现大小写的转换
建立Form1的属性字母转换,Label的属性是请输入英文字母,Text1的属性为空,command1的属性是转大写,command2的属性是转小写,command3的属性是还原。
a. 在通用声明中,声明模块级变量x
Dimx as string
b. 在代码窗口中选择form控件的load事件,代码程序
Privatesub form _load ()
x=Text1.text
EndSub
c. 在代码窗口中选择command1控件click
事件写代码
PrivateSub command1_click ()
Text1.text=Vcase (x)
EndSub
d. 在代码窗口中选择command2控件click
事件,编写程序。[/b]
PrivateSub command2_click ()
Text1.text=Lcase (x)
EndSub
e. 在代码窗口中选择command3控件click事件,编写程序。
PrivateSub command3_ click ()
Text1.text=x
EndSub
3.生成个位数
PrivateSub command1 _click ()
Dima, b, c as integer
Cols
Randomize
a=lnt (10* Rod)
b=lnt (100* Rod)
c=Int (1000* Rod)
Print“a =”&a
Print“b =”&b
Print“c=”&c
EndSub
三. 心得体会
VB的题太难做了,自己只会照着书上的做,不会自己设计,做完这三个题,我都是花了好长的时间做的,VB知识的只要我们认真的学习,VB我们相信我们一定会的。
四. 没有解决的问题
在随机数,大小写转换,生成个位数中,没有解决的问题还有很多,例如,不知道该怎样编写程序,我也不会编写程序,这一直是最大的问题。
五. 解决的办法
上网查找相关知识,找到问题的答案,到图书馆去找书籍,解决问题。
大二大三的学姐帮助解决问题,再加上自己的一些学习,自己也懂得一些知识。VB课程,我们一定会克服它的。
相关文章推荐
- Java编程第四周实验报告2
- 20155326 《Java程序设计》实验五网络编程与安全实验报告
- 20155320 《Java程序设计》实验五网络编程与安全实验报告
- 2016-2017-2 20155312 实验五网络编程与安全实验报告
- 《数据结构》实验一:vc编程工具的灵活使用(实验报告)
- 20162302 实验五《网络编程与安全》实验报告
- 20145219 《Java程序设计》实验五 Java网络编程及安全实验报告
- VB实验报告
- 《数据结构》实验一:VC编程工具的灵活使用 实验报告
- UNIX实验报告之Shell编程方法
- 20155338 《JAVA程序设计》实验五网络编程与安全实验报告
- 实验五 网络编程与安全实验报告 20162306陈是奇
- VB实验报告
- 【实验报告】《数据结构》实验一: VC编程工具的灵活使用
- 20155310《Java程序设计》实验五(网络编程与安全)实验报告
- 20155319 《Java程序设计》实验五(网络编程与安全)实验报告
- 20145221 《Java程序设计》实验报告五:网络编程及安全
- 20145205 《Java程序设计》实验报告五:Java网络编程及安全
- 20155227 《Java程序设计》实验五 Java网络编程及安全实验报告
- 实验五 网络编程与安全 实验报告 20162305 李昱兴