alguien me podria decir como debo hacer las comparaciones necesarias para diseñar un memorama y ver si las cartas son iguales, y si es asi las deje visibles de lo contrario ocultarlas, a continuación les muestro mi codigo para que se den una idea. Gracias.
Private Sub Image2_Click(Index As Integer)
Static T As Integer
T = T + 1
If T = 1 Then
Image1(Index).Visible = True
Image2(Index).Visible = False
PRIMERA = LoadPicture(Image1(Index))
'P(Index) = LoadPicture(Image2(Index))
ElseIf T = 2 Then
Image1(Index).Visible = True
Image2(Index).Visible = False
SEGUNDA = LoadPicture(Image1(Index))
'S(Index) = LoadPicture(Image2(Index))
If PRIMERA(Index) = SEGUNDA(Index) Then
'P(Index).Visible = False
'S(Index).Visible = False
T = 0
Else
'P(Index).Visible = True
'C(Index).Visible = True
T = 0
End If
End If
End Sub