用VB實現全屏幕圖形界面及動態功能提示

王華 張暉 黃潤發


一、 全屏幕圖形界面設計

    圖形界面是現代軟件中人機交互的主要手段。為了追求界面的統一和美觀，在軟件開放過程中，圖形界面大多采用全屏幕構圖方式。這是通過將窗體的邊框設置為無邊框（BorderStyle=None），將窗體顯示模式設置為極大化（WindowState=Maximized）來實現的。

    當一個窗體界面的設計中要容納多張圖片和多個控制時，將出現窗體顯示速度明顯變慢的現象，嚴重影響了程序運行的流暢性。為了解決這一問題，在開放過程中，采用了一種將【界面設計窗體】與【功能實現窗體】分開處理的方法。

    在【界面設計窗體】中，首先按功能的需要和界面設計的創意，將所需的大量圖片和控制在屏幕上安排好，選擇美觀的字體、顏色、線型，對屏幕界面進行設計、修飾加工；然后在其全屏幕運行的狀態下，利用剪貼技術，將這一設計完成的圖形界面全屏幕復制到剪貼板上；接著將這一屏幕映象作為一張圖片粘貼在【功能實現窗體】的背景上。這樣，從外觀上看，兩個窗體的形狀完全相同，而在屏幕的顯示速度上，后者明顯加快。這時，【功能實現窗體】中的控件已變成一個象征性的圖標，對它的操作，可在控制圖標的對應位置上設置一個Image 類型的圖象框，通過對圖象框的操作，來代替原先對控制對象的操作。

    采用這種方法，使窗體界面設計的靈活性大大增加，可以任意發揮，而不用擔心控件、圖片太多，影響窗體的顯示速度。但采用這種方法，將不可避免地增加應用程序本身所占的存儲容量，這是以容量換取速度必須付出的代價。

二、 動態功能提示信息的實現

    在現代軟件設計中，多數功能圖標、按鈕都在界面上直接確定其對應的名稱，同時也提供了動態提示的功能，即當鼠標移至某一控件時，或使鼠標的形狀用一具有象征意義的圖標代替，或自動出現一條文字提示，下面介紹一下如何實現這種先進的提示模式。

    動態改變鼠標的圖形形狀，是通過控件的MousePointer屬性設置為13（自定義），然后在MouseIeon屬性中選取一ICO圖標文件來完成的；動態文字提示功能是利用控件的MouseMove事件來實現的：將功能提示處理程序設計在對應的MouseMove事件過程中，當鼠標移動到該控件范圍區域時，即可觸發程序執行，完成動態功能提示；為了防止處理程序反復觸發，必須設置一控制開關，使處理程序只在鼠標第一次觸發該控件區域時被執行；取消功能提示的處理程序設計在窗體的MouseMove事件中，說明程序如下：

Dim FirstTouch As Boolean '防止反復觸發處理程序的控制變量

Private Sub ControlObject- MouseMove ()

If FirstTouch Then

FirstTouch =False '顯示功能提示字符

End Sub

　

Private Sub Form- MouseMove ()

FirstTouch =True '取消功能提示字符

End Sub

原文轉自：http://www.anti-gravitydesign.com