Question

用VB编了个小程序，但不知该如何实现以下功能

有一个数组，分别用a(1)，a(2)，a(3)，a(4)表示，其中只能有一个等于“1“，或者都等于0，但不能有两个数组里都是“1”；

这个“1”有时会出现，但有时不存在，想编一个快速查找并记录、显示有“1”的那个数组，程序平均每秒循环运行一次，所以“1”到底在哪个数组里，会随时间改变而改变；

找出有“1”的数组很容易，但该如何记忆之前“1”的位置？并实时显示“1”的位置发生变化的信息？

Answer 1

你可以建立两个全局变量，一个叫“现在位置”，一个叫“上次位置”。每采集一次数据就把“现在位置”复制到“上次位置”中，新采集到的位置保存在“现在位置”中。剩下的就是简单的比较了。

Answer 2

没有看明白你的问题：
1、你说的是同一个数组中有4个元素a(1)，a(2)，a(3)，a(4)，并不是4个数组对不对？因为从命名上看应该是前者。
2、这个数组中元素数值会不断变化，那么是谁修改的呢？是程序自动从什么地方接收到的，还是操作者人为修改的呢？后面提到的“程序平均每秒循环运行一次”，是指每秒检查一次数组元素的值吗？
3、建设性的：可以建立一个文本文档来记录1的位置，内容甚至可以加上实际时间或相对时间。至于实时显示，可以用一排复选框，或者几个带颜色的图形都可以。每次需要重放的时候，读这个文件，显示在图形上。

追问

程序每秒就要刷新一次，每秒保存和读取一次效率低还不可靠；
4个元素a(1)，a(2)，a(3)，a(4)，代表四个位置，程序每秒刷新一次，每秒检查一次小球在哪个位置上；
小球在哪个位置，哪个元素里的值就变成“1”，其余元素里的值，都等于“0”，如此，程序就能马上知道小球到哪个位置上；
但如何在比较后，让程序能及时发现小球的位置是改变了还是没改变？用保存和读取文本的方法，好像不是很理想