VB中二維數(shù)組賦值和取值

賦值:

在龍巖等地區(qū)，都構(gòu)建了全面的區(qū)域性戰(zhàn)略布局，加強(qiáng)發(fā)展的系統(tǒng)性、市場(chǎng)前瞻性、產(chǎn)品創(chuàng)新能力，以專注、極致的服務(wù)理念，為客戶提供網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站 網(wǎng)站設(shè)計(jì)制作按需設(shè)計(jì)網(wǎng)站,公司網(wǎng)站建設(shè),企業(yè)網(wǎng)站建設(shè),品牌網(wǎng)站設(shè)計(jì),成都營銷網(wǎng)站建設(shè),成都外貿(mào)網(wǎng)站建設(shè)公司,龍巖網(wǎng)站建設(shè)費(fèi)用合理。

weekname(1,1)="星期一"

weekname(2,1)="星期二"

weekname(3,1)="星期三"

取值

dim S1 as string

s1=weekname(1,1) '取出星期一 一次類推

VB.net中如何求出2維數(shù)組，每個(gè)維度上的值得個(gè)數(shù)

每行的數(shù)字個(gè)數(shù)不同,你說的這是不規(guī)則數(shù)組,解決方案如下:

Dim b As String = ""

Dim a As Integer()() = New Integer(9)() {}

a(0) = New Integer() {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}

a(1) = New Integer() {0, 3, 4, 5}

a(2) = New Integer() {0, 4, 5, 6, 7}

a(3) = New Integer() {0, 6, 5, 8, 9, 1}

a(4) = New Integer() {0, 2, 5, 1, 7}

a(5) = New Integer() {0, 4, 2, 6, 7, 3}

a(6) = New Integer() {0, 4, 5, 3, 2}

a(7) = New Integer() {0, 4, 1, 6, 2, 8, 5, 3}

a(8) = New Integer() {0, 4, 9, 6, 3, 5, 7}

a(9) = New Integer() {0, 1, 5, 9, 7, 6, 2, 4, 3, 8}

For i As Integer = 0 To a.GetUpperBound(0)

b = "第" i + 1 "行有" a(i).GetUpperBound(0) + 1 "個(gè)數(shù)" vbCrLf

Next

MessageBox.Show(b)

vb.net 如何給二維數(shù)組賦值 我要第一維存值，第二維存值的位置(像excel一樣) 該怎么做，謝謝！

Dim xlsApp As Excel.Application

Dim xlsBook As Excel.Workbook

Private Sub Command1_Click()

Dim I, J As Integer

Dim A(500, 2)

Set xlsApp = Excel.Application

xlsApp.Visible = False

'假設(shè)Excel文件在：D:\Book1.xls

Set xlsBook = xlsApp.Workbooks.Open("D:\Book1.xls")

For I = 1 To 500

For J = 1 To 2

A(I - 1, J - 1) = xlsapp.cells(I, J)

Next J

Next I

'以下是退出Excel

xlsBook.Close (False)

xlsApp.Quit

Set xlsApp = Nothing

'=================================

'Excel中的500×2的數(shù)據(jù)已讀入到數(shù)組A()中，以下可以添加你要運(yùn)算的代碼。

'=================================

End Sub

VB.NET 動(dòng)態(tài)二維數(shù)組如何循環(huán)賦值和取值

for i =0 to ...

for j =0 to ...

keyarray(i,j)=

next

next

雙重循環(huán)，賦值和讀取一樣

vb 二維數(shù)組賦值并讀?。?/h2>

結(jié)論：數(shù)組聲明方式和訪問方式不同導(dǎo)致。

先貼一個(gè)測(cè)試通過的數(shù)組遍歷方式的代碼：

二維數(shù)組遍歷

注意遍歷使用的方法，兩層數(shù)據(jù)，每次的訪問方式，是直接對(duì)該元素?cái)?shù)組填寫索引值獲取。

所以你的正確訪問方式是：

Debug.Print d(1)(1)

補(bǔ)充知識(shí)：為什么使用二維數(shù)組的方式訪問不到？

因?yàn)檫@與數(shù)組的聲明方式有關(guān)。本題目中使用 Dim d 的方式，聲明了一個(gè)variant類型的變量。

variant data type

接著賦值的時(shí)候，給與了一個(gè)二維數(shù)組，所以范文方式必須與賦值方式持平。

如何正確使用一個(gè)二維數(shù)組？

官方文檔給出的方式，是顯式聲明數(shù)組的維度，并挨個(gè)賦值。VB就是這樣。比如下面的示例：

二維數(shù)組的聲明和使用

寫在最后

總而言之，使用明確的數(shù)據(jù)類型聲明二維數(shù)組，是根據(jù)索引正確訪問數(shù)組的關(guān)鍵。

我是@程序員小助手，持續(xù)分享編程知識(shí)，歡迎關(guān)注。

分享文章：vb.net二維數(shù)組取值 vbnet定義二維數(shù)組
網(wǎng)站網(wǎng)址：http://weahome.cn/article/hgdgjp.html