Msgbox消息框


       於“自”《軟件開發工具》一本書有這樣的制劑,讓我回憶——程序員可以做,讓用戶做;它允許用戶做的少,即使是那些誰需要做的程序設置。我們應該做的。

這不是宣言。該是踐行。

       在程序執行過程中,經常須要彈出一些提示信息,與用戶交流。

需採用強制方式,將焦點移動到提示框上來。待用戶處理完預先設置的對話之后,才干接着后面的操作。

       這些提示框的使用都是本着協助用戶更准確。更有效地與計算機交互的意義而設置的,是一個貼心的使用助手。一個有力的助手。就要能在繁雜處給予清晰的指引,在危急處提出警示,在關心的問題上及時給予回饋,在選擇問題上要將不同選擇的厲害關系講明了。這樣才干成為好助手。既然是協助,就又不能老在眼前晃,要在適當的時候適時地出現。出現得太多,影響效率,反而幫了倒忙。由於僅僅是助手,那么提建議、擺觀點時盡量使用感嘆語氣、出警示的時候又不能太生硬,

       (1)捷報:力度最輕、親。

MsgBox("   操作成功!", vbOKOnly + vbInformation, "提示")


       (2)選擇:力度中等,需認真對待。

   

       If MsgBox("是否繼續?", vbYesNo + vbQuestion, "選擇") = MsgBoxResult.Ok Then
            '//繼續
        Else
            Exit Sub  '//否則退出,或做其它操作。
        End If

(3)警告:力度最大,問題嚴重。需用戶停止如今的操作。更改操作。

        If MsgBox("電量不足,請盡快蓄電!

", vbOKOnly + vbExclamation, "警示") = MsgBoxResult.Ok Then Else Exit Sub End If

在編程中,發現有些信息少數字描寫敘述不清楚。字數多了以后發現重要信息易被淹沒,用戶較難找到重點。

這時。我找到一種方法。就是採用轉行的方式,將最重要的簡練寫在第一行,其它內容轉行詳寫。這時僅僅需用轉行符(“vbCr或“vbCrLf”)就能夠解決。


例:MsgBox("系統的基本數據未設定好,暫不支持上機操作。" & vbCrLf & "請聯系管理員!

", MsgBoxStyle.Exclamation, "提示")


最后,再看看一條MsgBox語句

        If MsgBox("是否繼續?", vbYesNo + vbQuestion + vbQuestion + vbMsgBoxSetForeground + vbDefaultButton1, "選擇") = MsgBoxResult.Ok Then
            '//繼續
        Else
            Exit Sub  '//否則退出。或做其它操作。
        End If</span>
上面的程序沒有語法錯誤。中間以vb開頭的keyword也沒有順序的要求,從這里能夠看出使用非常easy。

以下對一些經常使用的進行整理:

+ vbAbort:彈出“中止”button

+ vbIgnore :彈出“忽略”button

+ vbRetry :彈出“重視”button

MsgBoxResult.Abort單擊"中止"button 

MsgBoxResult.Ignore 單擊"忽略"button 

MsgBoxResult.Retry 單擊"重試"button 



版權聲明:本文博主原創文章,博客,未經同意不得轉載。


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM