1
、顯示使用者窗體
用於以程式設計方式顯示使用者窗體的語法是:
userformname.show
若要顯示使用者窗體名為 userform1,使用以下**:
userform1.show
時可以載入到記憶體使用者窗體而不實際顯示它。 可能需要複雜的使用者窗體幾秒鐘才顯示。 可以預使用者窗體載入到記憶體中,因為您可以決定何時引發此開銷。但不顯示載入到記憶體的 userform1
,使用以下**:
load userform1
您必須使用 show
方法時以前顯示的。
2、如何臨時隱藏使用者窗體
如果想要臨時隱藏使用者窗體,請使用 隱藏 方法。 可以隱藏使用者窗體,如果您的應用程式涉及使用者窗體之間移動。 若要隱藏使用者窗體,使用以下**:
userform1.hide
3、如何從記憶體中刪除使用者窗體
要從記憶體中刪除使用者窗體使用在 解除安裝 語句。 若要解除安裝乙個名為 userform1 使用者窗體,使用以下**:
unload userform1
如果解除安裝與使用者窗體或與使用者窗體上的控制項相關聯的事件過程中使用者窗體 (例如,您單擊commandbutton
控制項),您可以使用"me"關鍵字而不是使用者窗體的名稱。 要使用"me"關鍵字解除安裝使用者窗體,使用以下**:
unload me
4、如何使用使用者窗體事件
使用者窗體支援許多預定義的事件,您可以將附加 vba 過程。 在事件發生時, 該過程附加到該事件就會執行。 由使用者執行的單個操作可以啟動多個事件。 最頻繁使用者窗體使用的事件包括 initialize 事件、 click 事件和 終止 事件。
請注意 visual basic
模組包含事件的過程可能被稱為"隱藏"使用者窗體的模組。 看 microsoft project explorer 視窗的 visual basic 編輯器的 modules 集合中不包含事件過程的模組。 您必須雙擊使用者窗體可以檢視使用者窗體的主體**模組。
5、如何捕獲使用者窗體事件
要捕獲使用者窗體事件,請按下列步驟操作:
在 excel
中建立乙個新工作簿。
在 工具 選單上指向 巨集 ,然後單擊 visual basic 編輯器 。
在 插入 選單中上, 單擊使用者窗體插入您的工作簿的 使用者窗體 。
雙擊 使用者窗體 的使用者窗體中顯示**視窗。
在模組中鍵入以下**:
private sub userform_click()
me.height = int(rnd * 500)
me.width = int(rnd * 750)
end sub
private sub userform_initialize()
me.caption = "events events events!"
me.backcolor = rgb(10, 25, 100)
end sub
private sub userform_resize()
msg = "width: " & me.width & chr(10) & "height: " & me.height
msgbox prompt:=msg, title:="resize event"
end sub
private sub userform_queryclose(cancel as integer, closemode as integer)
msg = "now unloading " & me.caption
msgbox prompt:=msg, title:="queryclose event"
end sub
private sub userform_terminate()
msg = "now unloading " & me.caption
msgbox prompt:=msg, title:="terminate event"
end sub
VBA 使用者窗體的應用(二)
今天繼續講使用者窗體的應用啦.一 文本版進度條昨天的進度條都是現實長度的那種進度條,有時候安裝或者解除安裝檔案,我們會發現有個文字型滴進度條,如何實現呢?path e 新建資料夾 達拉崩吧 黑白 sfile dir path userform1.caption 處理中 userform1.show ...
C 窗體的常用設定
因為第三章題型都差不多,所以我就對常用的一些東西做了如下總結。1.設定窗體的小圖示 icon eg a.this.icon new icon a w11.ico b.更改icon屬性值 在icon屬性後面直接新增要改變的ico。2.設定窗體透明度 opacity 取值範圍 0 100 透明 不透明 ...
EXCELVBA常用語句100句 henry dx
excel vba常用語句100句 定製模組行為 工作簿單元格 單元格區域 圖表 70 activesheet.chartobjects.count 獲取當前工作表中圖表的個數 71 activesheet.chartobjects chart1 select 選中當前工作表中圖表chart1 72...