急求！一道VB程式設計題謝謝，10道VB題 急求答案！！！謝謝高手了

1樓：

private sub procmin(a() as integer, byval amin as integer)

dim i%, amin0%

for i = lbound(a) to ubound(a)print a(i);

amin0 = a(lbound(a))

if a(i) < amin0 then amin = a(i)next i

print

print "amin="; amin

end sub

private sub command1_click()dim a(1 to 10) as integer, i% ', amin0%

for i = 1 to 10

a(i) = int(501 * rnd + 300)next i

call procmin(a(), amin)end sub

2樓：匿名使用者

主程式dim a(10) as integerrandomize

for i = 0 to 9

a(i) = int((800 - 300 + 1) * rnd + 300)

next

procmin(a())

--子函式

function procmin(a() as integer) as integer

dim min as integer

min = a(0)

for i = 1 to 9

if min > a(i) then

min = a(i)

end if

next

procmin = min

end function

10道vb題 急求答案！！！謝謝高手了

3樓：匿名使用者

bcddaabdbc

樓上第一題b跟第六題a沒看清楚？明顯答案就是衝突的所以第六題是a

第二題是基礎基礎基礎啊 居然選a？應該是c

4樓：何宜校

badda dbdbc

(僅供參考)

求一道VB題目急求，一道關於vb的題目，急求

按照你的意思，相當於把陣列按正序和反序分別輸出。編寫程式如下 dim a 1 to 20 as integer,i as integer for i 1 to 20 a i inputbox 請輸入第 str i 個數 next i for i 1 to 20 print a i next i pr...

一道c 程式設計題 求大神解答！急

文庫地攤 int comparefenshu int ifenzi1,int ifenmu1,int ifenzi2,int ifenmu2 引數 第一個分數的分子,分母,第二個分數的分子,分母 因為函式只在乎比較大小,所以通分之後分母是多少不必計算if ifenzi1 ifenzi2 return...

一道C程式設計題一道C程式設計題

include using namespace std class dif dif int lw,int hi 建構函式，用引數lw和hi分別初始化low和high int isdiff int y void process void show int dif isdiff int y 判斷引數y的...