Question

VB中 如何实现 点击两张张图片，出现一条线，之后图片和线一起消失？？

有一点类似连连看那种

Answer 1

思路：

1，你这个图片肯定是使用控件的。在这两个控件之间的下面（层下面）放一个控件，绘制一个条线。

2，一开始隐藏那个有线的控件，当完成了点击两张图片后，就显示。

或者,将两个图片控件,放在同一个作为容器的图片控件里,直接在作为容器的图片控件里绘制直线.

没有单击前

单击后的

追问

恩 我现在已经能做到点击图片后 隐藏的线显示，但是不知道 怎么让线随着我的图片的消失而消失
因为我设定的是 两张图片都点击之后图片消失 在图片消失之前 线要先出来一下 怎么做？？

追答

如果是采取前面方法,用控件的,就隐藏该控件,设置它的Visible = false

如果是采取下面方法的,容器对象.Cls

Answer 2

点击两张张图片，出现一条线，之后图片和线一起消失
实现上面效果，应该不难，只要为每张图片和每一条线，设置一个值，这个值小于1（或其它数）然后，消失（注意：一张图片，对应一个值，而不是所有的图片对应一个值。）。

关于连连看那种，方法很多。
我有一个思路：
1、
A点，找出左右所有相邻的空位（包括A点）
B点，找出左右所有相邻的空位（包括B点）
然后，从这AB两点上的左右空位开始，找出上下一条空位，形成通路，即可成功连接。
2、同理
A点，找出上下所有相邻的空位（包括A点）
B点，找出上下所有相邻的空位（包括B点）
然后，从这AB两点上的上下空位开始，找出左右一条空位，形成通路，即可成功连接。

追问

设定一个值 值小于一个定值这个事怎么一回事？？能详讲一下吗？谢谢

追答

如：
图1 定义一个变量为 Z1，Z1>=1 就表述 图1 可以显示，当 Z1=1就表述 线1 可以显示，当 S1<1 时 线1 消失。

Answer 3

难点不在于图片，在于线路的计算。