软件下载 | 资讯教程 | 最近更新 | 下载排行 | 一键转帖 | 发布投稿
您的位置:最火下载站 > 源码下载 > VB源码 > 游戏编程 > VB小游戏: 押大小掷骰子源代码下载

VB小游戏: 押大小掷骰子源代码

  • 界面语言:简体中文 / 国产软件
  • 文件大小:22 KB
  • 资源等级:3星级
  • 相关链接:Home Page
  • 有无插件:无插件,请您放心使用!
  • 授权方式:免费版
  • 更新时间:2010-07-30 14:32:21
  • 运行环境:windows

VB掷骰子游戏

  一款VB掷骰子游戏,押大校

  程序从这里开始(加载窗体)

  Private Sub Form_Load()

  ‘ 各变量赋初值

  Betting = False ‘ 骰子还没滚动

  Money = 1000 ‘ 现金等,各变量的意义见上

  Bet = 0

  Label2.Caption = Money ‘ 显示现金及押注

  Label4.Caption = Bet

  ‘ 接下来:

  ‘ 当按“押注”按钮时,系统自动调用 Command1_Click() 函数

  ‘ 骰子没滚动时,若按“开始”按钮,则调用 Command2_Click()

  ‘ 骰子滚动时,“开始”按钮已变成“停1按钮(参见 Command2_Click())

  ‘ 若按“停1按钮,则调用 Command2_Click()

  ‘ 当按“金盆洗手”按钮时,调用 Command3_Click()

  ‘ 每隔 0.05 秒时,系统调用 Timer1_Timer()

  ‘ 请分别参考下面的函数实现

 报告下载错误
点击链接开始下载
推荐下载
下载说明
栏目导航
推荐下载