vb生成随机数

原创 2012年03月28日 20:10:26

一·实验目的

生成随机数。

二·实验内容

1.     建立窗体,画出三个label,分别写上:“请输入随机数下界”,“生成随机数上界”,“生成的随机数”。画出一个command按钮,输入“生成随机数”。画出三个text窗体。

2.     编写程序如下:

Private sub command1_click()

Dim m as integer

Dim n as integer

M=valtext1.text

N=val(text2.text)

Text3.text=m+int(rnd*(n-m+1))

End sub

在空白处双击,编写程序如下:

Private sub form_load()

Randomize

End sub

点击运行即可。

三·心得体会

  通过对vb几个实验题的训练,我能够了解vb的基础运作和编写一些简单的vb程序,同时也使我对vb产生了一些兴趣,最重要的是学习vb使我掌握了一种学习方法就是在遇到困难的时候要尽可能地想办法去解决并且能够充分地利用一切有效的资源,掌握更多的知识。但是我在学习vb的时候也存在着很多问题,比如说作为一个vb语言入门者,觉得很多词汇都很陌生,就觉得很入门很吃力。但我还是尽可能地学好它。

四·遇到的问题及解决问题的方法

不能准确的运用vb语言,在学姐学长的指导下纠正了所犯的错误,常常再输入vb语言的时候出现词汇的拼写错误,解决方法,熟悉vb语言,加上细心耐心专心,突破这个障碍。对于vb的程序语言不能理解,最终通过上网和收集各种资料解决这个问题。

五·没有解决的问题

对于vb语言很陌生,不知道灵活地运用vb语言,脱离了编好的程序语言,自己就不会编写程序语言,对于这个问题我还没有解决,我希望解决这个问题老师能够协助,在学习vb的时候,先给我们讲讲vb语言的基本含义和运用方法。

 

VB中产生10个不重复的随机数

前几天听了米老师的课,才知道自己真的是学得都是似懂非懂,“一桶水不满,半桶水晃荡”这个比喻是最恰当不过了。         米老师经常告诉我们说要脚踏实地地学习,那何为脚踏实地呢?我的理解是把你在哪一...
  • u010927640
  • u010927640
  • 2013年06月07日 18:05
  • 7459

VB作业之生成随机数

一.         实验步骤: 1.   在窗体上放置三个文本框并在其后输入三个文本框,分别用于输入随机数的下界和上界,并在属性值中输入“请输入随机数的下界”“请输入随机数的下界”“显示生成的...
  • MAHYBZ
  • MAHYBZ
  • 2012年04月08日 15:00
  • 2487

Vb生成一定范围内的随机数(含小数部分)

下面这个函数,可以生成一定范围内的随机数,可以指定小数位数。 比如 RndBetween (10, 99, 2) 返回 [10.00~99.00] 范围内的随机数。 Function RndBet...
  • quanxusheng
  • quanxusheng
  • 2016年05月01日 22:29
  • 893

应用VB语言程序生成十个随机数

1.在窗体的适当位置创建一个commandbutton,并在其属性窗口中将caption改为“生成数”。 2.在窗体中双击“生成数”,并在弹出的对话框中输入如下代码: Private Sub Co...
  • l6585699
  • l6585699
  • 2016年04月14日 16:15
  • 296

VB小程序:生成十个不重复的随机数

我们通过随机数函数Rnd结合for循环嵌套来实现生成十个不重复的随机数,代码如下:   Option Explicit Dim a(9) As Integer, i As Integer, j ...
  • Tonyliuchen
  • Tonyliuchen
  • 2013年02月18日 19:45
  • 2239

VB---生成随机数,大小写转换,随机生成个位数

一.                实验目的 1.                 生成随机数 2.                 实现大小的转换 3.                 ...
  • qiyexue116
  • qiyexue116
  • 2012年03月26日 19:59
  • 662

VB随机字母的函数

Function RandABC(N As Long, Optional Model As Long = 1) As String ''N是你想要得到字符串的长度 ''Model是你想得到大写还是...
  • liuzhenfang
  • liuzhenfang
  • 2012年05月08日 08:37
  • 398

如何从一个数组中生成随机数组

有一个需要,给定一个数组,从中生成要求个数的随机数组,不重复,即getRandomArray(int[] originalArray,int number) 这样的一个函数。想了一下,可以这样做: ...
  • ozhaohuafei
  • ozhaohuafei
  • 2014年04月28日 12:35
  • 2729

VB随机生成10个数并排序

Private SubCommand1_Click() Me.Font.Size = 30  Dim a(10) As Integer  Dim i As Integer  For i = 1...
  • xuxiaoping1996
  • xuxiaoping1996
  • 2016年05月12日 17:56
  • 323

vb.net指定范围内获取随机数

最近需要做个随机抽样的小程序,研究了一下vb.net下随机取数的方法: 首先做了个试验,使用Rnd()函数+Math.Round()取整处理,比如说我想在1-100内随机取数(结果应该可能包含1和1...
  • lpwmm
  • lpwmm
  • 2017年05月28日 16:04
  • 1754
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:vb生成随机数
举报原因:
原因补充:

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