从品牌网站建设到网络营销策划,从策略到执行的一站式服务
可以用二维数组将填入后的九宫格数子储存,然后在判断行是否满足要求,列是否满足要求,每个格是否满足要求。
青海网站建设公司成都创新互联,青海网站设计制作,有大型网站制作公司丰富经验。已为青海千余家提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的青海做网站的公司定做!
你把label控件设为控件数组:Label1()
Private Sub Command1_Click()
Dim a(9) As Integer, i As Integer
Do While '这里你的条件实在看不懂,如果对a()没有限制,就把Do While 和Loop删掉
Randomize
For i = 1 To 9
a(i)=Int(Rnd*3)+1
Next i
Loop
For i=1 to 9
Label1(i).Caption=a(i)
Next i
End Sub
虽然我不会VB,但我用C语言自己编出过一个解数独的程序
你要保证一行的不重复性的话可以这样:一行所有的数字乘起来是362880,加起来是45
你要做一个数独游戏的话,我用的随机出一个每行每列不重复的数独,但解一下看看解是不是唯一
我刚大一,水平有限,只能帮你到这里了,有问题再追问吧
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图