Question

VB中控件数组元素“”不存在~~求大神指导

Private Sub 黑名单_Click(index As Integer)
PicFamily(index).Visible = False
PicFriend(index).Visible = False
PicBlack(index).Visible = True
End Sub

Private Sub 家人_Click(index As Integer)
PicFamily(index).Visible = True
PicFriend(index).Visible = False
PicBlack(index).Visible = False
End Sub

Private Sub 我的好友_Click(index As Integer)
PicFamily(index).Visible = False
PicFriend(index).Visible = True
PicBlack(index).Visible = False
End Sub

其中控件的index属性都是0.~~初学求指导谢谢~~

Answer 1

首先概念上有问题了!
以第一段程序为例说明如下:
Private Sub 黑名单_Click(index As Integer)
PicFamily(index).Visible = False
PicFriend(index).Visible = False
PicBlack(index).Visible = True
End Sub

这明显是一个名字叫"黑名单"的 Click() 事件,该主体 "黑名单"明显不是一个,而是一组,所以就有 Index 变量来表示是那一个 "黑名单"了,下面的 PicFamily(index)也是一组 名字叫 PicFamily 的控件,该控件也有 Index 变量来表示是具体的那一个 PicFamily ,这两个虽然都叫 Index 变量,但两个是不同的变量,在变量的值 也许有可能相等,但要具体的判断,所以你这样笼统的使用 Index ,搞不好就报错误了:数组元素“”不存在!
所以先搞清两个 Index 的值表示的各是哪个才可以哦....

追问

我应该怎么改呢？另外，为什么变成这样以后：
Private Sub 黑名单_Click()
PicFamily.Visible = False
PicFriend.Visible = False
PicBlack.Visible = True
End Sub
会提示：过程声明与同名事件或过程的描述不匹配。
求帮助！~~谢谢

追答

你先说明一下:
1、“黑名单”是否放置在窗体中按扭？
2、PicFamily 是什么控件？
3、它们都有各自成一组吗？各有几个

追问

“黑名单”是放置在窗体中的commandbutton。picfamily是
picturebox控件。它们都在一个form下面。都是单个的，不是一组吧。。。。。同一个form下还有三个button和两个picturebox。

追答

哦,那就不用Index 变量了.
1、你最好先把按扭的名字改成英文的形式,选种按扭,按F4 在属性中将" 名称"改成英文的,如"黑名单"改为 cmdHMD,...等
2、你双击窗体的按扭,回出现Click()事件的,看看回出现 Sub cmdHMD_Click() 事件的,如果该按扭只有一个,那就没有index,如果有一组 就出现 Sub cmdHMD_Click(Index)
3、如果picfamily 也是一个，没有一组，直接写 picfamily.Visible=True 就OK