VB6 获取当前打开窗口数量，如何获取当前打开窗口数量，本示例打开一个窗口后，在测试时会打开另外一个窗口，然后主窗口中会统计到这个打开的窗口，把当前打开窗口的数量填入文本框中。本程序可学习一下DoEvents()的用法。调用新窗口显示可参考以下代码： Private Sub Command1_Click() Form2.Show Call Form_Activate End Sub Private Sub Form_Activate() Text1.Text =
VB让窗口标题栏闪烁效果源码，不过我测试没有发现标题栏闪烁，咋回事呢？实现的思路是：声明API函数Flashwindow，然后编写下面的代码： Call FlashWindow(hwnd, 1) If Me.Caption = "闪烁的标题栏" Then Me.Caption = "欢迎使用管理软件！ " Else Me.Caption = "闪烁的标题栏-www.codesc.net" End If
