实验报告(二)

原创 2012年03月26日 19:50:48

一、实验目的

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事件,编写程序。

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课程,我们一定会克服它的。

SEM实战教程(二)

-
  • 1970年01月01日 08:00

上海大学操作系统2实验报告

  • 2015年09月16日 09:38
  • 1.85MB
  • 下载

Linux 系统实验报告:实验二

Linux内核编译实验报告 报告提交日期:2017.03.17 报告提交截止日期:2017.03.15 姓名:曾鑫星 学号:1505010615 班级:计算机科学与技术6班 一、 实验...
  • loveforthelefthand
  • loveforthelefthand
  • 2017-03-01 18:39:04
  • 133

操作系统实验二进程控制 实验报告

  • 2012年12月24日 15:13
  • 50KB
  • 下载

软件工程总体设计说明书实验报告

  • 2010年06月16日 17:24
  • 1.72MB
  • 下载

操作系统实验二实验报告

学堂在线-清华操作系统课程-实验二实验报告
  • jasonyuchen
  • jasonyuchen
  • 2017-07-31 12:18:29
  • 487

操作系统进程同步和互斥的实验报告

  • 2008年12月17日 21:11
  • 57KB
  • 下载

数据结构实验报告2

1.采用链式存储实现栈的初始化、入栈、出栈操作。 typedef struct node { int data; struct node *next; } Node,*LinkList...
  • wilver
  • wilver
  • 2016-05-03 20:36:26
  • 534

【实验报告】数据结构实验二:线性表的实验

一..实验目的      巩固线性表的数据结构,学会线性表的应用。 1.回顾线性表的逻辑结构,线性表的物理存储结构和常见操作。 2.学习运用线性表的知识来解决实际问题。 3.进...
  • u011282704
  • u011282704
  • 2014-10-19 16:34:05
  • 960

C++面向对象实验二:类与对象

C++实验二:类与对象一、实验目的 类的创建和使用类来创建对象。 类的数据成员的声明。 成员函数的声明和定义。 Private,public访问限定符的使用。 使用提供的公有的成员函数给对象成员赋值。...
  • acingdreamer
  • acingdreamer
  • 2016-11-24 17:25:13
  • 1085
收藏助手
不良信息举报
您举报文章:实验报告(二)
举报原因:
原因补充:

(最多只允许输入30个字)