计算机，网络，编程语言
1个回答
展开全部
Dim NumIndex As String '期号
Dim red1 As Integer '红球1
Dim red2 As Integer '红球2
Dim red3 As Integer '红球3
Dim red4 As Integer '红球4
Dim red5 As Integer '红球5
Dim red6 As Integer '红球6
Dim blue As Integer '蓝球
Dim TotalMoney As Double '奖池奖金
Dim FirstPrize As Integer '一等奖注数
Dim FirstPrizeMoney As Double '一等奖金额
Dim SecondPrize As Integer '二等奖注数
Dim SecondPrizeMoney As Double '二等奖金额
Dim BET As Double '投注额
Dim AwardDate As Date '开奖日期
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
