标签与图片闪动问题

zyz218

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim Ctrl As Control
    For Each Ctrl In Me.Controls
        If TypeOf Ctrl Is Image And Left(Ctrl.Name, 5) = "Image" Then
            If Ctrl.BorderColor <> 14869218 Then
                Ctrl.BorderColor = 14869218
            End If
        End If
    Next Ctrl
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Me.Image1.BorderColor <> 16711680 Then
        Me.Image1.BorderColor = 16711680
    End If
End Sub
当鼠标在窗体的LABEL上移动时，LABEL与IMAGE都不停地闪动，在IMAGE上移动时没问题，这个问题能否解决？

fan0217

把你的例子上传.

有时候不是代码的问题,如果你的图片是放在选项组控件里面,选项卡上面或者窗体有背景图片都会出现很严重的闪烁.

zyz218

http://www.office-cn.net/forum.php?mod=viewthread&tid=37997&replyID=2759&skin=1

在此

fan0217

正如我说的，你的图片和标签放在选项卡之上的。

解决之法：摒弃选项卡。

[此贴子已经被作者于2006-4-9 16:37:54编辑过]

zyz218

以下是引用fan0217在2006-4-9 16:30:00的发言：


正如我说的，你的图片和标签放在选项卡之上的。

解决之法：摒弃选项卡。

只能摒弃吗？我这个东东已在用了，换掉是个大量工作，用选项卡来做切换面板较简单实用，我也看到许多高手的主窗体做得很精彩，如果在下去瓢取的话应不是问题，但在下认为用选项卡比较方便，呵呵！

fan0217

网络上有很多切换面板提供,可直接采用,当然不算剽窃.

转换切换的成本不高啊,比起在鼻梁上架副眼睛便宜多了.

75501241

[em01]