Question

VB 如何关联两个image控件 点击一个image控件的时候判断另一个的状态

两个image控件都有0和1两个状态

Answer 1

你说的是什么状态？判断焦点？
还是判断image所显示的图片状态？
思路是设置2个变量来判断image2个控件的状态

追问

判断image显示的图片状态。
但是图片有很多，我设置的是image的控件数组，
也想过设置标志变量表示每个image的状态。
但标志变量也需要设置成数组，并且和image一一对应。
请问这样如何做呢？

追答

比如image控件只有两个，并且是数组，你可以设置标志变量也为数组

Dim 标志变量(1) As Long '因为只设置2个控件，所以定义为1

Private Sub Image1_Click(Index As Integer) '如果选中控件数组

Select Case Index '判断是单击哪个控件
Case 0 '如果选中的是第1个Image1控件
Image1(Index).Picture = LoadPicture("C:\1.jpg")
标志变量(Index) = "第一个控件图片为 C:\1.jpg"

Case 1 '如果选中的是第2个Image1控件
Image1(Index).Picture = LoadPicture("C:\2.jpg")
标志变量(Index) = "第一个控件图片为 C:\2.jpg"
End Select
End Sub

追问

对不起我没有表述清楚，image3(23)是个控件数组，image6(10)是个控件数组，要求在image3和image6之间建立关联，点击某个image6的时候需要先判断某个image3的状态，我在标准模块中设置了全局状态变量state1和state2（也都是数组），代表每一个image3和image6的状态，state1=0和1是两种状态，同样，state2=0和1也是两种状态。如果state2=1的时候state1=0，则报警。有没有直接将某两个控件关联起来的函数呢？

追答

你这样比较麻烦，直接发源码来我帮你看看

邮箱501926812@qq.com