下面小编就以制作一个简单的大乐透彩票选号器为例,来带领要学习VB的童鞋快速掌握VB的编程方法。
工具/原料
电脑
VB6.0
方法/步骤
1
首先打开VB程序,新建一个工程,如图所示。
2
这里我们选择“标准EXE”,单击“确定”按钮。
3
该软件的界面还是比较简洁的,左边是常用的工具箱,右边是相关的属性栏目。
先把我们要制作的软件命名,如图,在“caption”后面输入“随机选号器”。
4
选择“commandbutton”工具,在目标区域用鼠标拖动画出一个按钮,在属性面板输入按钮上显示的文字。
步骤如图中标识所示。
5
用“label”工具在图中2处画出区域,在3处输入要显示的文字。
6
用“textbox”工具在合适位置画出文本框区域,用来显示你选号的结果,如图所示。
7
用鼠标双击刚才插入的按钮,输入代码:Private Sub Command1_Click()Dim a(5) As IntegerDim b(2) As Integer For i = 1 To 5 a(i) = Int(Rnd() * (1 + (35 - 1))) + 1 For j = 1 To i - 1 If a(i) = a(j) Then i = i - 1 End If Next Next For i = 1 To 5 For j = i + 1 To 5 If a(i) a(j) Then T = a(i): a(i) = a(j): a(j) = T End If Next Next For i = 1 To 2 b(i) = Int(Rnd() * (1 + (12 - 1))) + 1 For j = 1 To i - 1 If b(i) = b(j) Then i = i - 1 End If Next Next For i = 1 To 2 For j = i + 1 To 2 If b(i) b(j) Then T = b(i): b(i) = b(j): b(j) = T End If NextNext Text1.Text = a(5) " " a(4) _ " " a(3) " " a(2) " " a(1) " +" b(2) " " b(1)End Sub
8
单击“启动”按钮调试程序。
有错误就需要修改,没有错误的话就可以保存了。
9
我们也可以输出为EXE文件,这样在没有安装VB程序的电脑上也可以运行。
如图,我们选择“生成工程1.EXE”,选择保存的位置即可。
自己试试吧。
END
注意事项
小编使用的是VB6.0,其它版本可以参考。
VB入门很简单,其它工具大家可以自己试着使用。
第七步的代码其实很简单的,大家可以自己分析。
如何用VB制作随机选号器 龙虎和游戏,真人龙虎游戏,网上百家乐 棋牌游戏发展史 棋牌游戏注册送现金 棋牌游戏发布平台 杰克棋牌官网 快速挣钱的棋牌游戏 手机棋牌游戏的代理加盟真相 棋牌游戏源码百度 棋牌游戏发展趋势 杰克棋牌游戏 挣钱最快的棋牌游戏 杰克棋牌作弊器 棋牌游戏源码php 棋牌平台加盟 棋牌游戏发展 网络棋牌挣钱游戏 棋牌游戏源码共享 棋牌游戏发展分析 喜来乐棋牌官方下载 杰克棋牌外挂 手机捕鱼棋牌游戏平台 棋牌游戏发传单 喜来乐棋牌778 什么棋牌游戏能挣钱 ios棋牌游戏源码 棋牌游戏发布站总汇 喜来乐棋牌官网下载 棋牌游戏发展报告 杰克棋牌论坛