-
有返回和結果處理引數。 你不知道嗎?
-
有兩種方法可以從子例程傳遞值。
1)使用模組級或全域性變數。例如。
option explicit
r 是模組級變數。
dim r as integer
sub add(byval x as integer, byval y as integer)
將計算結果儲存到 r
r = x + y
end sub
private sub form_click()'呼叫子例程 add
call add(10, 20)
獲取計算結果並列印出來。
print r
end sub
2)使用byref引數實現計算結果的返回。例如,選項顯式
add 子例程使用 byref r 作為整數來返回值 sub add(byref r 作為整數,byval x 作為整數,byval y 作為整數)。
r = x + y
end sub
private sub form_click()dim r as integer
呼叫子例程 add,並將結果傳遞回變數 rcall add(r, 10, 20)。
列印結果。 print r
end sub
-
function aaaa() as integer
aaa=2 '這是返回值,即左邊是函式名稱,右邊是要返回的值。
end function
-
VB中函式的引數預設是定址的,這意味著子程式中主程式中引數的變化會反映在主程式中,函式的返回值也可以用來使主程式獲得子程式中生成的值。
-
VB 的子例程有兩種型別的引數:
關鍵字 byval 宣告為 pass 引數。
address 引數使用關鍵字 byref 宣告。
例如,子例程 aaaa:
sub aaaa(vyval a as integer,byref b as integer)
a=99b=100
end sub
現在去呼叫它,如下所示:
dim x as integer,y as integerx=1y=2
print x,y
aaaa x,y
print x,y
是的,我們可以看到 x 的輸出是相同的,而 y 的輸出是不同的。
y 將子例程的結果傳遞給另乙個子例程。
當然,編寫乙個函式可以傳遞結果,但函式名只能傳遞乙個結果,而使用 byref 可以傳遞多個結果。
-
如果你編寫的子程式是乙個函式,你就沒問題了。
例如:function say(byval s as string)msgbox s
say="ok"
end function
兩個命令按鈕,兩個標籤,兩個文字"
private sub command1_click()r = >>>More
可以考慮寫二進位資料,二進位模式開啟**,adodb可以使用【變數】寫二進位資料,資料控制應該也可以,但是我不記得了。 但是,如果使用資料控制項,則可以懶得顯示**:將 visible=false picturebox 的 field 屬性繫結到 field 屬性並直接輸出,然後非常方便。 >>>More
3月8日22:25修訂。
1.先做乙個word文件,在裡面畫乙個**,每行乙個格仔,把題目和**的文字放在同乙個格仔裡,每題一行,不要留空行,然後儲存在專案目錄下,命名為“Title”。 doc”; >>>More