在一个窗体里面有很多的图片控件(Image控件),我想做的功能就是单击右键出来菜单然后选择隐藏,选择的图片就会消失,请问怎样才能实现这个功能?

解决方案 »

  1.   

    数组控件里,有Index属性.......................
      

  2.   

    需要在通用里声明一个变量来记录和区分点了那个
    Dim I As Integer
    Private Sub Image1_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
        If Button = 2 Then
            I = Index
            Form1.PopupMenu YinCang
        End If
    End SubPrivate Sub YinC_Click()
        Image1(I).Visible = False
    End Sub