主题：[讨论][求助]开发窗口程序就是卡顿，希望有解决方案

试试

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试卡顿项目.foxdb

Public  Sub Form1_SizeChanged(sender As Object, e As EventArgs)
If sender.windowstate= 1 Then
    basemainform.opacity = 0
ElseIf sender.windowstate= 2 Then
    basemainform.opacity = 1
End If
End Sub

-----------------------

AddHandler basemainform.SizeChanged, AddressOf Form1_SizeChanged