按键精灵如何判断两个二维数组是否相等? 25

二维数组直接赋值怎么赋值呢?例如:Dima0(8,5)a0="0,1,1,1,1,1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,0,1,1,1,1,0,0,... 二维数组直接赋值怎么赋值呢?
例如:
Dim a0(8, 5)
a0 = "0,1,1,1,1,1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,1,0,0,1,1,0"
这样呢?
展开
 我来答
冰日之暖阳
2013-04-19 · TA获得超过988个赞
知道小有建树答主
回答量:1178
采纳率:33%
帮助的人:739万
展开全部
打开一个记事本,测试下面脚本:
Dim sza(2, 3)
Dim szb(2, 3)
sza(1, 2) = 1
szb(1, 2) = 1
Dim pd
pd=1
For a = 0 To 2
For b = 0 To 3
SayString sza(a, b) & "--" & szb(a, b)
KeyPress "Enter", 1
If sza(a, b)<> szb(a, b) Then
pd=0
End If
Next
Next
If pd = 0 Then
SayString "有数据不相同!"
Else
SayString "所有数据都相同!"
End If
更多追问追答
追问
二维数组直接赋值怎么赋值呢?
例如:
Dim a0(8, 5)
a0 = "0,1,1,1,1,1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,1,0,0,1,1,0"
这样呢?
追答
好像不行.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
梦里寻你我他
2013-04-19 · TA获得超过2199个赞
知道大有可为答主
回答量:2171
采纳率:42%
帮助的人:1207万
展开全部
这个题目的两个主题似乎没什么关联啊
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式