1樓:和睦空大
dim a(15) as string
for i=0 to 15
a(i)=char(rnd*(90-65+1)+65)for j=0 to i
if(a(j)=a(i)) then
i--exit for
endif
next j
next i
這是第bai
一個du
dim x(10) as interagefor k=1 to 10
x(k)=k
print x(k); '交換
前zhi
的列印dao
版next k
for i=1 to 5
for j=10 to 5 step -1x(i)=x(j)
next j
next i
for y=1 to 10 '交換後的權print y(k);
next y
vb練習題答案
2樓:一○○度
1.新增一個窗體 form1,在窗體中放一個按鈕 ***mand1
2.新增一個類模
塊:class1
3.----------將下面**複製到窗體**中:
private sub form_load()
***mand1.caption = "計算得分"
end sub
private sub ***mand1_click()
dim nfen as new class1, s as single
s = nfen.defen(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
msgbox "去掉一個最高分,去掉一個最低分,平均得分:" & s, vbinformation
end sub
4.-----------將以下**複製到類模組:
public property get defen(paramarray fen()) as single
dim s1 as long, s2 as long, i as long, min as single, max as single
s1 = lbound(fen): s2 = ubound(fen)
'查詢最低和最高分
min = fen(s1): max = fen(s1)
for i = s1 to s2
if fen(i) < min then min = fen(i)
if fen(i) > max then max = fen(i)
next
'計算總分
for i = s1 to s2
s = s + fen(i)
next
defen = (s - min - max) / (s2 - s1 + 1)
end property
vb練習題求答案1建立vb應用程式的主要步
1.建立使用者介面 設定屬性 編寫 2.窗體設計視窗 3.ctrl 4.緹5.工程 窗體 6.f4 7.caption 8.透明 9.210.寬度 11.text 12.label textbox 13.14.續行符 空格 15.click 16.雙擊 17.dblclick picture1 pi...
繁星春水的練習題答案繁星春水的練習題答案
1 冰心原名 謝婉瑩 是著名的 詩人 作家 翻譯家 兒童文學家 2 冰心於1923年發表的兩部詩集是 繁星 春水 創作上受到印度詩人 泰戈爾 的影響,其詩歌作品,在當時吸引了很多青年的模仿。3 冰心的詩有豐富而深刻的哲理,並恰當地使用對比,如 言論的話開得愈大,行為的果子結得愈小 4 冰心早年藝術上...
文言文《屈原列傳》練習題答案,屈原列傳課後習題答案
屈原列傳 節選 習題 i don t know 屈原列傳課後習題答案 韓信知道漢王畏忌自己的才能,常常託病不參加朝見和侍行。從此,韓信日夜怨恨,在家悶悶不樂,和絳侯 灌嬰處於同等地位感到羞恥。史記練習題?要有答案 快!你這問題問的,恐怕就是司馬遷轉世也不能給個滿意的回答吧 屈原列傳 文言知識 關於 ...