VB呼叫函式過程,VB中的函式過程怎麼呼叫??

2022-01-28 13:21:19 字數 6077 閱讀 6642

1樓:匿名使用者

function gys(byval x as integer,byval y as integer) as integer

do while y<>0

preminder = x/y

x=yy=preminder

debug.print x,y '這樣你就能看清楚計算過程loop

gys=x

end funtion

private sub command_click()dim a as integer ,b as integera =10

b=2x=gys(a,b)

print x

end sub

第一個問題給你加句,自己看吧。第二個問題,你宣告瞭兩個整數型變數,計算結果自動四捨五入。

2樓:**大師兄

。。。麻煩下次排版好一點。。。

函式裡的迴圈,是在y不等於0的時候執行,第一次迴圈:p=5,x=2,y=5;第二次:p=0,x=5,y=0

返回值是x,所以是等於5

3樓:愛梔竹的人

因為y是整形, y=0.4這個語句執行後 y=0 ,小數自動捨棄.

vb中的函式過程怎麼呼叫??

4樓:泡影果果

1、呼叫的函式名和定義的函式名不一樣應改為一致。

2、這是個遞迴函式,詞句在不斷的呼叫後,最終會使b(除數)為0。這樣系統就會報錯,應該在maxmod()中新增一句當b=1時,讓其退出函式。

修改後的函式如下:

private function maxmod(byval a as long, byval b as long) _

as long

if b = 1 then

exit function

end if

dim p as long

p = a mod b

if p = b then

maxmod = b

else

maxmod = maxmod(b, p)end if

end function

private sub command1_click()dim a as long

dim b as long

dim answer as long

a = val(text1.text)

b = val(text2.text)

answer = maxmod(a, b)print answer

end sub

5樓:匿名使用者

print caesarjia(a,b) a,b是你要代入的2陣列變數

可以呼叫~一樣的

vb中如何獲得呼叫函式的過程的名字?

6樓:

為calc()函式增加一個引數,在呼叫的時候填入一個引數判斷呼叫者,在calc()的內部就可以直接知道是誰呼叫了。

例如:private sub form_load()calc "form_load"

end sub

'-------------------------------private sub command1_click()calc "command1_click"

end sub

'-------------------------------private sub command2_click()calc "command2_click"

end sub

'-------------------------------private sub calc(callname as string)

'.......

msgbox "呼叫過程名稱是" & callname'.......

end sub

7樓:

不知道你這個calc()函式是什麼樣的函式

類?過程?還是dll?

一個比較好的方法就是為calc()函式新增一個引數,呼叫的時候填入一個引數判斷呼叫者,比如可以填入窗體名,控制代碼,或者自定義的引數值等

vb程式通過什麼呼叫該函式過程?

8樓:匿名使用者

private sub command1_click()dim a(20) as integer

dim b as integer

list1.clear

for i = 1 to 10

list1.additem i

next i

for i = 1 to 10

randomize

b = int(rnd * list1.listcount)print list1.list(b) & " ";

list1.removeitem (b)

next i

end sub

9樓:伈雨

你的問題描述不清,能說詳細點嗎?

vb如何呼叫函式

10樓:麻木

用myfile = dir("c:\windows\*.ini")函式,若第二次呼叫 dir 函式,但不帶任何引數,則函式將返回同一目錄下的下一個 *.ini 檔案。

這個可選的errornumber引數可以為任何有效的錯誤號。如果errornumber是有效的錯誤號,但尚未被定義,則error將返回字串「應用程式定義的錯誤或物件定義的錯誤」。

如果errornumber不是有效的錯誤號,則會導致錯誤發生。如果省略errornumber,就會返回與最近一次執行時錯誤對應的訊息。如果沒有發生執行時錯誤,或者errornumber是 0,則error返回一個長度為零的字串 ("")。

11樓:匿名使用者

1.定義一個加法函式

private function addition(a as double, b as double) as double

addition = a + b

end function

2.在command1單擊事件中觸發,先在窗體中加入2個文字框和一個按鈕command1

private sub command1_click()debug.print addition(text1.text, text2.text)

end sub

12樓:匿名使用者

private function fn1() as string '函式fn1,返回字串型別的值

'函式體

fn1 = "你好"

end function

private function fn2(n as boolean) as string '函式fn2

fn2 = iif(n,"真","假")

end function

呼叫時:

dim str as string

str = fn1 'str = "你好"

str = fn2(true) 'str = "真"

在vb中呼叫function過程,是怎麼呼叫?直接在過程中引用名稱名?

13樓:匿名使用者

有3種模式。架設函式叫a,那麼可以call a(),a,變數\屬性=a()(包括在語句中直接呼叫,如if a()="asss" then beep。前兩種拋棄返回直,最後一種返回值,注意()的問題。

14樓:匿名使用者

呼叫函式過程:

通常,呼叫自行編寫的函式過程的方法和呼叫 visual basic 內部函式過程(例如 abs)的方法一樣;即在表示式中寫上它的名字。

就像呼叫 sub 過程那樣,也能呼叫函式。下面的語句都呼叫同一個函式:

call year (now)

year now

當用這種方法呼叫函式時,visual basic 放棄返回值。

15樓:匿名使用者

cls用於清空螢幕上已經「print」的資料print rand();" ";是不是算引用了function rand了?------呼叫。

print

兩句用於在螢幕上輸出

print指令如果在最後沒有分號「;」就不會自動換行,所以要加上print的空指令輸出一行空行

vb 模組中的過程如何呼叫?

16樓:匿名使用者

呼叫過程,呼叫過程有諸多技巧,它們與過程的型別、位置以及在應用程式中的使用方式有關。下面說明如何呼叫 sub 過程和 function 過程。

呼叫 sub 過程

與 sub 過程不同,在表示式中,sub 過程不能用其名字呼叫。呼叫 sub 過程的是一個獨立的語句。sub 過程還有一點與函式不一樣,它不會用名字返回一個值。

但是,與 function過程一樣,sub 過程也可以修改傳遞給它們的任何變數的值。

呼叫 sub 過程有兩種方法:

'以下兩個語句都呼叫了名為 myproc 的 sub 過程。

call myproc (firstargument, secondargument)

myproc firstargument, secondargument

注意,當使用 call 語法時,引數必須在括號內。若省略 call 關鍵字,則也必須省略引數兩邊的括號

呼叫函式過程

通常,呼叫自行編寫的函式過程的方法和呼叫 visual basic 內部函式過程(例如 abs)的方法一樣;即在表示式中寫上它的名字。

'下面的語句都呼叫函式 todec。

print 10 * todec

x = todec

if todec = 10 then debug.print "out of range"

x = anotherfunction ( 10 * todec)

就像呼叫 sub 過程那樣,也能呼叫函式。下面的語句都呼叫同一個函式:

call year (now)

year now

當用這種方法呼叫函式時,visual basic 放棄返回值。

呼叫其它模組中的過程

在工程中的任何地方都能呼叫其它模組中的公用過程。可能需要指定這樣的模組,它包含正在呼叫的過程。呼叫其它模組中的過程的各種技巧,取決於該過程是在窗體模組中、類模組中還是標準模組中。

窗體中的過程

所有窗體模組的外部呼叫必須指向包含此過程的窗體模組。如果在窗體模組 form1 包含 somesub 過程,則可使用下面的語句呼叫 form1 中的過程:

call form1.somesub(arguments)

類模組中的過程

與窗體中呼叫過程類似,在類模組中呼叫過程要呼叫與過程一致並且指向類例項的變數。例如,democlass 是類 class1 的例項:

dim democlass as new class1

democlass.somesub

但是不同於窗體的是,在引用一個類的例項時,不能用類名作限定符。必須首先宣告類的例項為物件變數(在這個例子中是 democlass )並用變數名引用它。

標準模組中的過程

如果過程名是唯一的,則不必在呼叫時加模組名。無論是在模組內,還是在模組外呼叫,結果總會引用這個唯一過程。如果過程僅出現在一個地方,這個過程就是唯一的。

如果兩個以上的模組都包含同名的過程,那就有必要用模組名來限定了。在同一模組內呼叫一個公共過程就會執行該模組內的過程。例如,對於 module1 和 module2 中名為 commonname 的過程,從 module2 中呼叫 commonname 則執行 module2 中的 commonname 過程,而不是 module1 中的 commonname 過程。

從其它模組呼叫公共過程名時必須指定那個模組。例如,若在 module1 中呼叫 module2 中的 commonname 過程,要用下面的語句:

module2.commonname (arguments)

public   用於宣告對所有模組中的所有其它過程都可以使用的過程。

private  用於宣告只能在包含該宣告的模組中使用的過程。

vb程式設計例項編制通用函式過程,計算double型別以為陣列所有元素的平均值

你的題目不完整,不知道你的陣列中的數,是不是一個等差數列,如果是的話,按下面的方法來做,隨便給出兩個位置,及相應的值,即可算出平均值 private sub command1 click dim a 1 to 10 as doublem 4 a m 1.667 n 10 a n 3.333 step...

分段函式求f(x)導數,過程謝謝

按區間求導不就行了。求導會不會?f 0 lim x 0 xe 1 x 0f 0 f 0 lim x 0 ln 1 x 0x 0,f x 連續 f 0 lim h 0 he 1 h f 0 h lim h 0 e 1 h 0f 0 lim h 0 ln 1 h f 0 h lim h 0 h h 1 ...

VB中RND函式的問題,VB中 rnd函式問題?

rnd 函式 返回一個包含隨機數值的 single。語法rnd number 可選的 number 引數是 single 或任何有效的數值表示式。返回值如果 number 的值是 rnd 生成 小於 0 每次都使用 number 作為隨機數種子得到的相同結果。大於 0 序列中的下一個隨機數。等於 0...