Question

按键精灵用数组求和怎么做，求大神指导

应该是图片上的对角线的和

Answer 1

Dim array(3, 3)
Dim sum

array(0, 0) = 1
array(1, 0) = 2
array(2, 0) = 3
array(0, 1) = 4
array(1, 1) = 5
array(2, 1) = 6
array(0, 2) = 7
array(1, 2) = 8
array(2, 2) = 9
sum = array(0, 0) + array(1, 1) + array(2, 2)
MessageBox sum

用的是二维数组，如果不懂，自行百度“按键精灵数组及数组的使用”

Answer 2

先问下你会吧里面的数据用按键精灵读出来吗？读出来是什么形式的？