1樓:匿名使用者
'假設陣列是 dim k(1 to 5, 1 to 4) as single
dim maxx as integer, maxy as integer
sub findmax()
dim i as integer, j as integerdim tempmax as singletempmax = -1.401298e-45for i = 1 to 5
for j = 1 to 4
if k(i, j) > tempmax thenmaxx = i
maxy = j
tempmax = k(i, j)
end if
next i, j
end sub
'maxx 和maxy就是最大數的位置
2樓:
private sub findmax(arr(5,4) as integer)
dim max%
dim x%
dim y%
max=arr(0,0)
for i=0 to 5
for j=0 to 4
if max < arr(i,j) thenmax = arr(i,j)
x=i+1
y=j+1
else
next j
next i
print "陣列中的最大數為:";maxprint "該最大數的行列為:";x;yend sub
求一VB程式 定義Sub過程,判斷數是否是素數
private sub form click dim n as integer,i as integern inputbox 請輸入要判斷的數 call zh n,i end sub private sub zh n,i as integer 這裡是sub if n 2 or n 3 thenpri...
VB過程這一章關於Sub的問題
1,標準模組最的作用是資源共享,就像你經常都要用到的變數可以在模組那裡定義,而且要用public而不是用dim 2,就要看你需要什麼樣的資料型別了,int,string single,boolean.都行 3,每一個過程或者函式都要這樣的,sub 和end sub 組成一個完整的過程,當然包括你自定...
VB計算器做法,用VB編寫計算器,控制元件都弄好了,求程式碼!
dim choice as string dim current as double dim prev as double private const pi 3.14159265 equal 為 sigh 為 正負號切換 cls為清零 bs 為backspace plus為 minus為 aster...