资源新版在线天堂-桌下含校园污肉高h-坠落女教师-椎名由奈在线播放-六月色婷婷-六月丁香婷婷天天在线

VIP標識 上網做生意,首選VIP會員| 設為首頁| 加入桌面| | 手機版| RSS訂閱
食品伙伴網服務號
 

第四課理解變量和變量的作用(1)

放大字體  縮小字體 發布日期:2006-06-16
4.1 代碼存在的位置:模塊

  VBA代碼必須存放在某個位置,這個地方就是模塊。有兩種基本類型的模塊:標準模塊和類模塊。模塊中的每個過程或者是函數過程,或者是子程序概念.本課的最后部分將討論函數過程和子程序的區別。

  新術語:
  模塊:它是作為一個單元保存在一起的VBA定義和過程的集合。
  類模塊:VBA允許你創建自己的對象,對象的定義包含在類模塊中。

  你的大部分工作集中在標準模塊中(簡稱為模塊)當錄制宏時如果不存在模塊,EXCEL自動創建一個。EXCEL和VBA不關心代碼存放在哪一個模塊中,只要代碼存在于打開的工作簿中即可。

  4.2 對模塊的概覽

  過程被定義為VBA代碼的一個單元,過程中包括一系列用于執行某個任務或是進行某種計算的語句。工作簿的每個過程都有唯一的名字加以區分。

  有兩種不同的過程:子程序和函數過程。子程序只執行一個或多個操作,而不返回數值。當錄制完宏查看代碼時,所看到的就是子程序。宏只能錄制子程序,而不能錄制函數過程。一個子程序的例子如清單4-1所示。

程序清單4-1 子程序的例子

Sub cmdSmallFont_Click()
With Selection.Font
.Name="Arial"
.FontStyle="Regular"
.Size=16
End With
End sub

  上面列出的過程實際上是一個事件過程。通過它的名字,就可以知道這是一個事件過程。這個過程的名字是由一個對象的名字CmdSmallFont和一個事件的名字Click組成的,兩者之間用下劃線分開。如果還不明白,可以告訴你,CmdSmallFont是一個命令按鈕的名字。也就是說,當單擊這個命令按鈕時,就會運行這個事件過程。

  函數過程通常情況下稱為函數,要返回一個數值。這個數值通常是計算的結果或是測試的結果,例如False 或True.正如前面所說,可以用VBA創建自定義函數。實際上可以在工作表上使用你創建的函數。程序清單4-2是一個計算價格的10%為運費的簡單例子。

程序清單4-2 簡單的用戶定義函數示例。

Public Function Shipping(Price)
Shipping = Price * 0.1
End Function

  請注意,這個函數使用一個參數(Price).子程序和函數都可以使用參數。不論Price的值是多少,它都將決定運費額。Price可以是數字和單元格引用。函數返回計算出來的運費,這個函數可以用在單元格中。

A B 
1 Price 100
2 Shipping =shipping(B1)


  4.2.1 創建過程

  創建第一個過程需要兩個基本步驟。首先,需要向工作簿中添加一個模塊。接著需要向模塊中添加一個工程。對于創建的每一個應用程序,只需添加一次模塊?梢允褂枚鄠模塊,但這是不必要的。某些開發者喜歡使用多個模塊,以便根據他們的目的或者窗體對過程進行組織。在本練習中,創建的過程只顯示一個消息框。

  在本練習中創建的過程只顯示一個消息框。在本練習中使用Msgbox是為了提供一個可見的例子,雖然我們還沒有介紹過Msgbox語句,但是在本例中將使用它。要創建該過程,請按如下步驟進行:

  1)打開一個新工作簿。
  2)選擇"工具"-"宏"-"Visual Basic編輯器",打開VBA編輯器窗口。
  3)在`VBA編輯器的左面,可以看到“工程資源管理器”窗口。在工程資源管理器窗口的“Thisworkbook"上單擊鼠標右鍵,選擇“插入”-“模塊”,這樣就將一個模塊添加到應用程序中了。(如果你沒有看見“工程資源管理器”窗口,可以按Ctrl+R)
  4)選擇“插入”“過程”,顯示“添加過程”對話框。
  5)輸入“第一個工程”作為過程名字。在“類型”分組框中,確認選擇了“子程序”。單擊“確定”按鈕。這樣一個新的過程就添加到模塊中了?梢栽谀K中看到以 Public Sub 第一個過程()開始,以End Sub結束的語句結構。
  6)在過程中插入光標,輸入以下語句并回車:
Msgbox "這是我的第一個過程"
在輸入Msgbox后,會自動彈出一個消息框告訴你有關這條命令的信息,稱之為自動列表技術。輸入完成的過程如下所示:
Public Sub 第一個過程()
Msgbox "這是我的第一個過程"
End Sub

  VBA對子程序和函數有如下的命名規則:
  * 名字中可以包含字母數字和下劃線。
  * 名字中不能包含空格句號驚嘆號,也不能包含字符@ & $ #.
  * 名字最多可以包含255個字符。
 
  4.2.2 運行宏

  創建這個過程后,可以運行一下。運行一個過程有幾種方法:可以直接使用“運行”菜單,“運行子程序/用戶窗體”工具欄按鈕或按下F5鍵。要運行一個過程,可以按照如下步驟:

  1)單擊“運行子程序/用戶窗體”工具欄按鈕,過程執行并顯示一個消息框。
  2)單擊消息框之中的“確定”按鈕,關閉該消息框。

  4.3 保存對模塊所做的改變

  要保存新過程,需要保存過程所駐留的工作簿.可以用VBA編輯器保存工作簿.具體步驟如下:

  1)選擇"文件"-"保存工作簿".因為本工作簿還沒有保存過,所以要給它命名.
  2)輸入"HOUR4"作為文件名并按回車鍵,則工作簿和模塊與過程都保存下來了.

 
[ 網刊訂閱 ]  [ 食品專題搜索 ]  [ ]  [ 告訴好友 ]  [ 打印本文 ]  [ 關閉窗口 ] [ 返回頂部 ]

 

 
推薦圖文
推薦食品專題
點擊排行
 
 
Processed in 0.472 second(s), 745 queries, Memory 2.55 M
主站蜘蛛池模板: 久久99久久成人免费播放| 国产精品网红女主播久久久| 成人性生交片无码免费看| 久久精品免费看网站| 亚洲乱码国产一区三区| 国产精品久AAAAA片| 四虎影院2022| 国产成人高清在线观看播放| 日本色呦呦| 大香伊人中文字幕精品| 强奸日本美女小游戏| cntv官网| 三级黄色在线| 国产精品2020观看久久| 午夜家庭影院| 韩国伦理电影在线神马网| 亚洲免费在线视频| 精品无码乱码AV| 中文字幕人成人乱码亚洲影视S| 乱精品一区字幕二区| 99RE6国产精品视频播放| 漂亮的av女演员| 俄罗斯摘花| 亚洲国产欧美另类| 久久久96| beeg日本高清xxxx| 三级aa久久| 国产亚洲欧洲日韩在线三区 | 亚洲幼女网| 久久精品无码人妻无码AV蜜臀 | 亚洲熟少妇在线播放999| 久久亚洲成a人片| 99re6久久热在线播放| 欧美free嫩交hd| 国产成人免费不卡在线观看| 亚洲福利网站| 伦理片在线线看手机版| 成人无码国产AV免费看直播| 亚洲 中文 自拍 无码| 久久久久久久网站| 扒开老师粉嫩的泬10P|