在象棋第一格放一颗谷粒，第二格放两颗，第三格放四颗，每格麦粒比上一次多一倍。

第28格过亿。134217728。

64格约有92亿亿（没错，两个“亿”）

共1+2+2^2+2^3+2^4+……+2^63=2^64-1=18446744073709551615个麦粒。
18446744073709551615÷1.42*10^8≈1.3*10^11立方米。即一千三百亿立方米。

Private Sub Command1_Click()

  s = 1

  t = 1

  For i = 2 To 64

    t = t + t

    s = s + t

  Next i

  Print "64个格子全部放完麦子，"

  Print "总共为"; s; "粒"

End Sub

vb五子棋判定胜负的算法
'新建一个工程 '添加一个按钮command1 '添加一个标签label1，index属性设为0 '黏贴以下代码到窗体代码编辑窗内 'f5运行，单击按钮即可游戏 Dim Ws As Long '棋盘的宽度（即一行可以下几个棋子）Dim Hs As Long '棋盘的高度 Dim Hei() As Boolean ' 代表黑方的棋子 Dim Bai() As Boolean '...

vb 国际象棋放米问题
共需要放2^64-1=18446744073709551615粒米。变量自己声明。s=0 m=1 for i=1 to 64 s=s+m m=m*2 next i print s

这是用VB设计五子棋游戏时判断相同颜色棋子数的代码,帮忙解释下每句的...
Dim connStr as String ‘连接数据库的字符串 connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 你的数据库路径;Persist Security Info=False"if bConnected=True then Exit sub ’如果已连接则退出 Set Conn=New ADODB.RecordSet ‘实例化数据库连接类 Conn.Open ConectionS...

棋盘上的米粒问题
Private Sub Command1_Click()Dim i As Integer Dim milishu As Double Dim n As Integer n = InputBox("输入n数=", n)For i = 1 To n milishu = milishu + 2 ^ (i - 1)Next Text1 = milishu End Sub

(急)这是Vb五子棋悔棋的代码,谁能帮我把每句的注释写下~!!~~
If gamebegin16 = 0 Then ‘如果游戏没有开始 Exit Sub ’悔棋操作无效（退出）ElseIf l116 = -1 And l216 = -1 Then ‘l1和l2应是棋盘上要悔棋点的坐标，如果坐标值无效（即均为-1）Exit Sub ’悔棋操作无效（退出）Else ayy(l116, l216) = 0 ’设置当前坐标点值为0...

求解VB~!!!
Private Sub Command1_Click()Dim s As Double, m As Double, n As Integer s = 0 '麦子总数 m = 1 '当前格麦子数 n = 1 '格子数 Do While n <= 64 '不超过64个格子则循环 m = 2 * m '麦子翻倍 s = s + m '加到总数里 n = n + 1 '下一格 Loop Print "棋盘上的麦粒...

求跳棋游戏VB代码
VB跳棋代码:窗体代码:Dim ChessBoard(-2 To 10, -2 To 10) As Byte ''棋盘(8竖*8棋)Dim x(10) As Integer, y(10) As Integer ''搜索的每种走法Dim x1(10) As Integer, y1(10) As Integer ''搜索的每种走法的可吃子坐标Dim BestLocate As CHESSERDim CurrentPlayer As Byte ''当前玩家Dim ...

国际象棋上的麦粒(电脑编程)
屏的中央，则应向下 下 （填“上”或“下”）调节凸透镜．

国王棋盘小麦问题vb语言
Private Sub Command1_Click()Dim s As Double Dim i As Integer s = 0 For i = 0 To 63 s = s + 2 ^ i Next Text1.Text = s End Sub 结果:1.84467440737096E+19

普通电脑爱好者可以做出桌面对弈围棋棋盘吗?
请问下你说的电脑爱好者是什么类型的，如果你说使用语言编写代码性的还是只用软件做的