幫忙解個VB題

2022-08-09 19:25:10 字數 747 閱讀 7977

1樓:

private sub command1_click()dim arr(1 to 5) as integer, flag as boolean

dim i as integer, j as integerarr(1) = 63

arr(2) = 21

arr(3) = 50

arr(4) = 42

arr(5) = 78

print "原始數列:"

for i = 1 to 5

print arr(i);

next i

print

for i = 1 to 4

for j = 1 to 5 - i

if arr(j) > arr(j + 1) thent = arr(j)

arr(j) = arr(j + 1)

arr(j + 1) = t

end if

next j

print "第"; i; "趟"

for s = 1 to 5

print arr(s);

next s

if i = 3 then flag = trueif flag = true then exit subprint

next i

end sub

2樓:匿名使用者

boolean是布林型,值只有true和false兩種.

好好看書

數學題幫忙解,有數學題幫忙解解

雞兔共100只,腳320,雞兔各幾隻!解釋 雞兔共100只,腳320,雞兔各幾隻 那麼我把這100只全想做是雞,那麼就有100 2 200 只 腳,少了320 200 120 只 腳,這是為什麼呢?因為一隻兔子有四隻腳,將兔想成是雞,就少了兩隻腳,也就是說,一共減少了120只腳。說明把120 2 6...

請問有幫忙解高數題的嗎,請問有幫忙解高數題的嗎

要看什麼題型,如果是求導 積分這樣的計算題,matlab就可以做到 可以的,沒問題的,我也是大一的學生,高數一般般,可以幫忙解決一下你的疑難 有什麼軟體可以幫忙解答大學高數題 要看什麼題型,如果是求導 積分這樣的計算題,matlab就可以做到 這個不行吧?你不如設計個人工智慧來試試?不過話說回來,你...

幫忙解個夢

大概是有兩層含義吧 一 也許是你有思鄉的心情了,那條路就是你回家的路,山東會下雪,你走在有雪的路上,象徵回家的路 二 雪化了,成了泥濘的路,表明回家的路難走,可能說明現實中工作或學習的路還長,離成功還遠吧,衣錦還鄉的日子路還長吧。後面的那些應該是回家後的情景了吧,呵呵 解夢之類的不要信,特別是周公解...