编辑：说三道四文库 发布时间：2017-10-23 08:33
HTML文档下载
WORD文档下载
PDF文档下载
一般情况下任务栏上显示的窗体的标题，但是没有标题如何也能让他显示呢？
比如我的标题原先是“目录”，现在取消了标题如何在任务栏里能看到“目录”两个字呢
Option Explicit
Dim temp As String
Private Sub Command1_Click()
Me.WindowState = vbMinimized
End Sub
Private Sub Form_Load()
Me.Caption = ""
temp = Me.Caption
End Sub
Private Sub Form_Resize()
If Me.WindowState = vbMinimized Then
temp = Me.Caption
Me.Caption = "最小化" '"目录"
'Me.Caption = App.Title
Else
Me.Caption = temp
End If
End Sub
用“ ”
ok
to playyuer:
老大，你只是用了个小技巧，但是我要的效果是窗口正常显示时任务栏和windows的工具条上依然显示窗口标题文字而vb的窗口上不显示标题
用API函数CREATERECTRGN 和
SETWINDOWRGN
WINAMP就是这样做的
说三道四