vb.net 數(shù)組求最值

dim A(9) as integer

創(chuàng)新互聯(lián)是一家專注于網(wǎng)站建設(shè)、做網(wǎng)站與策劃設(shè)計,遂平網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)十年,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:遂平等地區(qū)。遂平做網(wǎng)站價格咨詢:18982081108

dim x as integer=A(0)

dim i as integer

for i=1 to 9

if xA(i) then x=A(i)

next

messagebox.show x

上面只是進(jìn)行比較和輸出結(jié)果，至于輸入的過程和輸出的方式有很多種，你可以自己選擇一種，我就不說了，我也是初學(xué)的，如有不到之處還請見諒

利用VB.NET編寫：已知數(shù)組A＝Array(7,6,5,1,8,5,3,9,4)，編寫一程序，刪除數(shù)組中值為x（例如為3）...

For?i?=?0?To?10?'假設(shè)數(shù)組長度為10

If?a(i)?=?3?Then

For?j?=?i?To?10?-?1

a(j)?=?a(j?+?1)

Next?j

ReDim?Preserve?a(10?-?1)

Exit?For

End?If

Next?i

If?i??10?Then

For?k?=?0?To?10?-?1

Print?a(k)

Next

Else

For?k?=?0?To?10

Print?a(k)

Next

End?If

vb.net 數(shù)組顯示矩陣的一道題

'這是在vb6中的代碼，在vb.net中基本差不多，你可以參考一下

Private Sub cmdCommand1_Click()

Me.AutoRedraw = True

Dim Grp

Grp = Array(1, 2, 3, 4, 5)

Dim i, j As Long

Dim StrPrt As String

For i = 0 To UBound(Grp)

'i為位移量

StrPrt = ""

For j = i To UBound(Grp)

StrPrt = StrPrt Grp(j)

Next j

For j = 0 To i - 1

StrPrt = StrPrt Grp(j)

Next j

Me.Print StrPrt

Next i

End Sub

本文題目：vb.net數(shù)組練習(xí) 數(shù)組vb編程問題
網(wǎng)頁路徑：http://chinadenli.net/article18/dojjodp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供企業(yè)網(wǎng)站制作、軟件開發(fā)、手機(jī)網(wǎng)站建設(shè)、營銷型網(wǎng)站建設(shè)、外貿(mào)網(wǎng)站建設(shè)、外貿(mào)建站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)