有   3个label  当鼠标移到label1时 show出flash1（ShockwaveFlash框内显示），且label1文字变色（label2和label3字体颜色不变）当鼠标移到label2时 show出flash2（flash1关闭），且label2文字变色（label1和label3字体颜色不变），label3类推。
 本人初学，希望前辈能给个详细代码以供参考。在此谢过。

帮个忙啊 ？？？

你看看是不是想要这个效果
Private Sub Form_Load()
Label1.ForeColor = "0,0,0"
Label2.ForeColor = "0,0,0"
Label3.ForeColor = "0,0,0"
Fla1.Movie = "h:/c/vc++ 视频/101.swf"
Fla1.Playing = True
End Sub
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = "0,0,255"
Label2.ForeColor = "0,0,0"
Label3.ForeColor = "0,0,0"
Fla1.Playing = True
End Sub
Private Sub Label2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = "0,0,0"
Label2.ForeColor = "0,0,255"
Label3.ForeColor = "0,0,0"
Fla1.Stop
End Sub
Private Sub Label3_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = "0,0,0"
Label2.ForeColor = "0,0,0"
Label3.ForeColor = "0,0,255"
Fla1.Playing = True
End Sub