在VB中可不可以改变MSGBOX提示框的样子啊(外观))

解决方案 »

  1.   

    自己写Msgbox:'模块
    Public varform2---------------------------------'form1.frm:
    Private Sub Command1_Click()
        '以下相当于拿FORM2当MSGBOX
        varform2 = 1
        form2.Show
        Do While varform2 = 1
             DoEvents
        Loop
        
        MsgBox "ok!"
    End Sub--------------------------------------
    'form2.frm:   你的Msgbox
    Private Sub Command1_Click()
    varform2 = 0
    Unload Me
    End Sub
      

  2.   

    最好用标准的。其实规范的界面很美观。Word Dreamwaver IE VB VS.NET WinRAR Nero ACDSee UltraEdit ... 其实界面都很规范的。
      

  3.   

    varform2 = 1
        form2.Show
        Do While varform2 = 1
             DoEvents
        Loop
    靠,系统资源就这样被你搞死了