VB6.0是不是有BUG？
请看下面一段代码，是求二维数组鞍点的
Private Sub Command1_Click()
Dim a(3, 4), i, j, m, n, max, flag As Integer
flag = 0
For i = 1 To 3
For j = 1 To 4
a(i, j) = InputBox("")
Next j
Next i
For i = 1 To 3
For j = 1 To 4
Print a(i, j); Space(3);
Next j
Print
Next i
For i = 1 To 3
max = a(i, 1)
For j = 1 To 4
If a(i, j) >= max Then
max = a(i, j)
m = j
End If
Next j
For n = 1 To 3 Step 1
If max > a(n, m) Then Exit For
Next n
If n = 4 Then
Print "鞍点= "; "a("; i; ","; m; ")"; "="; max
flag = 1
End If
Next i
If flag = 0 Then Print "No found!"
End Sub
问题来了，用1～12进行调试，鞍点应该是4，但是显示无法找到。
同样，如果给数组直接用1～12赋值，就可以找到鞍点是4。
那么问题就出现了，为什么直接输入无法找到，而直接赋值，并且数据相同却可以知道到，这个是不是VB6.0的问题？
不是vb的bug，是你声明变量的写法有问题。 像 Dim a(3, 4), i, j, m, n, max, flag As Integer 这样的写法只有最后一个变量flag认为是Integer型的， 前面的a(3, 4), i, j, m, n, max都会等到赋值的时候才能决定类型。 所以用Input输入之后默认不会识别成Integer型，而是当成String放到数组a里了。 看这段程序，i、j这些变量倒是不要紧，初值就是数值；但如果就想用逗号的形式声明的话至少也要把a(3, 4)后面加上“ As Integer”才行。可以写成 Dim a(3, 4) As Integer, i, j, m, n, max, flag As Integer
答：这些问题一直都有从1.25号更新到现在都一个多月了还是这样龟速对于玩家的态度就是这样 坑钱活动一直都有新英雄也一直出唯独Bug却没人管 对于玩家而言龟速就只会坑...详情>>
答：我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛，你可以自己注册一个用户进去看看，你可以和他们交流也可以寻求他们的帮助，我想没有你解决不了的问题，...详情>>
答：格式化文本区域的段落标记，用于规定文本和层的属性和位置等。比如： 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>
