不需设置borderstyle为0,只需在属性窗口中,依次把Form1的Caption改为空,ControlBox设为False,ShowInTaskBar设为True如果要在任务栏中也显示,就用API函数吧:代码中写:Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Private Sub Form_Load()SetWindowText Me.hwnd, "你想显示什么呢?"End Sub...
模块代码掉用方法 call FrmStyle(Me.hwnd)Private Declare Function SetWindowLong Lib "User32" Alias "SetWindowLongA" (ByVal Hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) ...