1樓：匿名使用者
在模組裡定義：
function aa(a)
aa=a
end function
窗體裡呼叫：
x=aa(1)
msgbox x
2樓：匿名使用者
vb函式分
baisub（無返回值）以及dufunction（有返回值）簡單範例
public function ss() as stringss = "我是
zhi"
end function
注意，想定dao義的函式能夠在窗體或別版的權模組呼叫，該函式必須是public的，也就是第一個關鍵字必須為public
function的呼叫很簡單，直接寫函式名和引數如 msgbox ss
而sub的呼叫直接call，如：
public sub ss()
ss = "我是"
end sub
呼叫call ss
另外一點需要注意，呼叫模組定義的函式，直接寫函式名。但如果呼叫窗體的函式，就得把窗體加上。比如，我要呼叫sheet1下的bb函式，則該寫成 call sheet1.bb
如何在ecel的if函式中輸入包含選項
if iserror find 東芝 a2,1 a2 如果在a2單元格找不到 東芝 兩字 出錯 就置空，如果找到，就返回結果a2 if如果 iserror出錯 find查詢 只要前兩個字直接用 如你的資料在a列 left a1,2 公式下拉就行了 如果你只要顯示東芝的，那麼 if left a1,2...
ecel中如何在工作表中順序引用另工作表
表一的名稱預設的sheet1 在表2裡輸入如下公式 下拉 感覺你說的是資料有效性吧 方法 a2設定有效性的方法 其他單元格複製 a2 資料有效性 目錄 公式為 offset sheet2 b1,counta sheet2 b b 設定完成之後，你就可以在下拉選單裡找你需要的sheet2裡b列的內容，...
VBA設定文字為物件，VBA中如何定義文字型變數
strname main.textbox6 strname賦值 該賦值沒有錯 strname串值 main.textbox6 set obj strname 設定文字為物件 錯誤 將一個串值賦予一個物件變數，型別不匹配 建議 使用如下語句可以解決。使用窗體controls屬性 帶索引號 賦予物件變數...