【VB数组小例】产生随机数并求和（附带添加图片用法）

刚学VB，最熟悉的控件就是TextBox了，下面将用9个TextBox和1个CommandButton做一个数组的小例子：产生随机数并求和。

效果如下：

前面板的控件选取就不用多说了，来说说这个添加图片的用法：首先，在窗体上添加image1控件，

然后在它的属性Picture上设置，找到一张图片导入即可。

代码部分：

Dim i As Integer, sum As Integer
Private Sub Command1_Click()sum = 0
For i = 0 To 8
Text1(i) = Int(Rnd * 100 + 200) '产生200-299之间的随机数
sum = sum + Text1(i)
Next
Print sum  ‘输出求和值End Sub

大家赶紧去试试吧。

以上就是今天的内容，喜欢的话记得一键三连哦。

【VB数组小例】产生随机数并求和（附带添加图片用法）相关推荐

微信小程序多维数组筛选（以二维数组为例）
微信小程序多维数组筛选(以二维数组为例) 我们在遇到微信小程序进行筛选的时候,一般会使用到filter函数来进行筛选,但是有时候遇到多维数组怎么办呢? //例如这是我们的数组 arr: [{id: 1 ...
Vue.js 极简小例： 4 种方式样式绑定、style 的多种方式实现
前些天发现了一个巨牛的人工智能学习网站,通俗易懂,风趣幽默,忍不住分享一下给大家.点击跳转到教程. 代码: <template><div id="app"> ...
libSVM分类小例C++
from:http://www.doczj.com/list_31/ 使用libSVM求解分类问题的C++小例 1.libSVM简介训练模型的结构体 struct svm_problem//储存参加 ...
VB数组快速排序算法
VB数组排序模块,使用的是快速排序法,支持 Variant.Double.Long.String--等多种数据类型数组排序. Option Explicit Private Sub Quicksort ...
厦大C语言上机 1510 小明的随机数
小明的随机数描述小明想在学校中请一些同学一起做一项问卷调查,为了实验的客观性,他先用计算机生成了N个1到1000之间的随机整数(),对于其中重复的数字,只保留一个,把其余相同的数去掉.然后,再把这 ...
docker-compose 使用小例
前些天发现了一个巨牛的人工智能学习网站,通俗易懂,风趣幽默,忍不住分享一下给大家.点击跳转到教程. 只是一个很简单的小例. 1. 原本有的容器 2. docker-compose.yml 写法: ge ...
数组小案例（求数组最大最小值、反转数组中元素、指定元素第一次出现的索引）
数组小案例(求数组最大最小值.反转数组中元素.指定元素第一次出现的索引) 练习1 数组最值的求取定一个数组,求数组中的最大值和最小值 public class Demo01 {public stat ...
VB.net小技巧——使用DataGridView显示EXECL表格内容
VB.net小技巧--使用DataGridView显示EXECL表格内容直接上代码 Private Sub Button24_Click(ByVal sender As System.Object, ...
VB.net小技巧——ReoGrid控件添加到工具箱说明
提示:文章写完后,目录可以自动生成,如何生成可参考右边的帮助文档 VB.net小技巧--ReoGrid控件添加到工具箱说明 Add Control by Programming for Windows ...
VB.net小技巧——读取文本文件并显示到文本框中
VB.net小技巧--读取文本文件并显示到文本框中第一步,在工具箱添加OpenFileDialog控件第二步 openfiledialog 属性 filter设置为: 文本文件(*.txt)|*. ...

【VB数组小例】产生随机数并求和（附带添加图片用法）

【VB数组小例】产生随机数并求和（附带添加图片用法）相关推荐

最新文章

热门文章