vb的函式返回值問題,VB的函式返回值問題

時間 2021-09-05 01:55:42

1樓:

你這個函式只可能返回一個值0。因為你沒有給aaa賦什麼值,其預設值為0。

一般來說,函式中的值是否返回是由程式設計者來決定的。如果返回a的值,則作以下更改:

private function aaa() as integer

dim a, b as integer

a=1b=2

aaa=a '新增這條語句,返回a

end function

要返回多個值一般通過自定義資料型別來實現。如下例定義了有兩個子項的自定義資料型別,可以返回兩個值。(你定義了幾個子項就可以返回幾個)

vb6新建一工程,在窗體上拖入一個按鈕控制元件,然後進入**區,刪除所有**後,貼上以下**即可。

option explicit

private type abc '自定義資料型別abc,內有兩小項x,y

x as long

y as long

end type

private sub command1_click()

dim k as abc

k = aaa(5, 6) '呼叫函式

print k.x, k.y '將兩個返回值列印到窗體上

end sub

private function aaa(a as integer, b as integer) as abc

aaa.x = a * 10 '函式的第一個返回值

aaa.y = b * 100 '函式的第二個返回值

end function

效果圖:

還有一種方式,不太好理解,這裡不示例了。

2樓:51cto學院

工具-新增過程-單選函式項

我輸入的函式名為:ssif

格式為 只有一個引數為整型

是素數返回真 不是返回假

public function ssif(nos as integer) as boolean

for i = 2 to nos

if nos mod i = 0 thenssif = false

exit for

end if

next i

ssif = true

end function

3樓:匿名使用者

該函式沒有返回值,只是做一些特定運算。

用asp 寫函式 返回值,asp函式返回值

function 函式名 引數 as 返回值型別 string integer 函式體。函式名 返回值。end function 以下為一個把字串中的 變為 的函式。function getstr string1 getstr replace string1,end function 例如 str1...

關於C 函式臨時變數返回值問題

所謂 未定義行為 就是說什麼情況都有可能出現,程式設計師無法確定會發生什麼 如果硬要追究原因的話,p a b 之後又執行了幾次 運算,函式a的引數所佔的記憶體區域早已被其他變數覆蓋,而a b 之後立即訪問返回的地址處的變數,函式a的引數所佔的記憶體區域還沒有被覆蓋,所以能夠得到正確的值 這種東西,測...

沒有返回值的函式有什麼用,c 問題,呼叫有返回值和沒有返回值的函式,為什麼不同呢?

小鏡子 無返回值的話就是函式本身無值,只起到處理的作用 輸入 輸出 賦值等 其功能相當於 由幾個語句構成的函式。通俗理解就是它本身是一段語句。一個函式的函式名既是該函式的代表,也是一個變數。由於函式名變數通常用來把函式的處理結果資料帶回給呼叫函式,即遞迴呼叫,所以一般把函式名變數稱為返回值。函數語言...