vb中一題,vb 迴圈結構中的一題

時間 2022-03-09 15:35:21

1樓:匿名使用者

加括號是「傳值」,不加括號是「傳址」。

傳址會把變數的記憶體地址傳遞到sub裡,在sub裡對變數所做的修改就是對原來的變數進行修改,而傳值只是把變數的值傳遞到sub裡,此時在sub裡修改變數的值不會影響原來的變數。

2樓:匿名使用者

選b2.65358979335278d-006表示2.65358979335278乘以10的(-6)次冪

3樓:天天快樂郎

time lib "winmm.dll" () as longdeclare function gettickcount lib "kernel32" () as long

timegettime、gettickcount這兩個函式都可以得到開機到現在的時間長,單位毫秒,分別在程式執行開始前和結束後各取一次值,再相減就能得到很精確的時間長,單位是毫秒,如果要得到單位是秒的時長,再除以1000,注意除1000後的值要賦給小數型的變數。

不論是從程式執行的效率上來說,還是從結果的精確上來說,這兩個函式都要遠高於vb自帶的timer函式,第二個函式比第一個的效率還要高一點點。

vb 迴圈結構中的一題

4樓:匿名使用者

確切的說因為條件是0 所以 如果迴圈體中沒有跳出迴圈的話,那麼永遠會一直執行下去,

但迴圈體中有可能包括跳出迴圈,所以迴圈體至少執行一次^^如果不考慮跳出迴圈的問題的話,那麼將會無限迴圈執行迴圈體。

如果條件為1時(或真),才會像你想像一樣一次都不執行,注意do until true才是一次也不執行。

5樓:勾慧利

你的理解是

do while 條件

迴圈體loop

的功能。現在是until,功能與while是相反的。until後的條件值為false,才執行迴圈體的。

6樓:匿名使用者

常數為零,條件為假,樓上厲害

vb如何做一個選擇題的考試系統?

7樓:匿名使用者

軟體資料庫有87個試題,系統隨機選取20個試題,在答題介面,點選option1控制元件就可以實現答題操作,答題20個以後,【交卷】按鈕有效,點選【交卷】,可以判斷正確和錯誤試題,並將錯題答案和正確答案繼續對比。

如果需要原始檔,提供傳送地址。

8樓:匿名使用者

你好朋友,可以把原始檔給我發一份嗎?謝謝,[email protected]

9樓:匿名使用者

朋友,給我一份吧,提前謝謝了[email protected]

10樓:我在偷偷笑

**能發我麼?急用[email protected]

第一題vb作業的**怎麼寫,謝謝

11樓:匿名使用者

private sub ni_click()end sub

public function gethls(a() as integer) as double

if ubound(a) = 1 thengethls = a(0, 0) * a(1, 1) - a(0, 1) * a(1, 0)

end if

if ubound(a) > 1 thendim rres as double

dim lres as double

dim cnum as integer

dim tnum as double

dim i as integer

rres = 0

lres = 0

for i = 0 to ubound(a)cnum = i

tnum = 1

if i = 0 then

for j = 0 to ubound(a)tnum = tnum * a(j, j)next j

end if

if i > 0 then

call yd(i)

for j = 0 to ubound(a)tnum = tnum * a(j, cc(j))next j

end if

rres = rres + tnum

next i

for i = 0 to ubound(a)cnum = i

tnum = 1

if i = 0 then

for j = 0 to ubound(a)tnum = tnum * a(j, ubound(a) - j)next j

end if

if i > 0 then

call yd(i)

for j = 0 to ubound(a)tnum = tnum * a(ubound(a) - j, cc(j))

next j

end if

lres = lres + tnum

next i

gethls = rres - lres

end if

end function

public sub yd(n as integer)dim n1 as integer

n1 = ubound(aa)

redim bb(n1)

redim cc(n1)

for i = 0 to n1 - n

bb(i) = aa(n + i)

next

for i = 0 to n1 - n

cc(i) = bb(i)

next

for i = n1 - n + 1 to n1cc(i) = aa(i - n1 + n - 1)next

end sub

12樓:匿名使用者

什麼毛病,求人家幫助,自己還不把影象放正?

一題物理題,一題物理題

勻速下降時,重力向下,阻力和浮力向上,3個力的合力為0.mg f f阻 可知阻力f阻 mg f 要使潛水器勻速上升,重力和阻力向下,浮力向上,3個力的合力為0.即 f f阻 m2g 2式子合併可得 m2g 2f mg 即m2 2f g m 排除水的質量m m m2 2m 2f g 速度v勻速下降 m...

第一題求步驟,第一題求步驟

如圖如果你認可我的回答,請點選 採納回答 祝學習進步!手機提問的朋友在客戶端右上角評價點 評價 然後就可以選擇 滿意,問題已經完美解決 了 a 1 s 1 2a 1 2,a 1 2.a n 1 s n 1 s n 2a n 1 2 2a n a n 1 2a n 2 a n 1 2 2 a n 2 ...

求解關於曲線的數學題,後加分能解一題是一題我另外加分1 直線y kx

都很簡單。下面都是解題的詳細步驟包括答案。第1題 設a x1,y1 b x2,y2 由於它們是直線和拋物線的交點,所以同時滿足直線和拋物線的方程。也就是說,x1和x2同時滿足將y kx 2代入y 2 8x 0後得到的一元二次方程 kx 2 2 8x 0 整理後變為k 2 x 2 4k 8 x 4 0...