用戶定義的函數過程是以關鍵字“Function”開頭的函數過程。
自定義函數過程的語法格式如下:
[public | private] [static]函數函數過程名([參數列表]) [As類型]
舉例:比如計算內圓和外圓之間的環形面積。
私有子命令1_Click()
Dim r1!,r2!,s1!,s2!分別代表內徑、外徑、內圓面積和外圓面積。
r1=val(text1.text)
r2=val(文本2 .文本)
s 1 =面積(r1)
s2 =面積(r2)
標簽4。caption = format (S2-S1," 0.00)`以固定格式顯示結果。
末端接頭
私人功能區(r!)作為單身`這是樓主要看的重點。區域-用戶自定義函數名,r!參數+參數類型
Dim s!
s=3.14*r*r
面積=s
結束功能
0 0所以樓主大概懂了,如果不懂,我就詳細說說。