在VB.NET中,使用Redim語(yǔ)句重新定義一個(gè)數(shù)組是,需要注意什么問(wèn)題

1. 前提一定要聲明一個(gè)數(shù)組,不需要賦值或者標(biāo)明維數(shù)，例如dim a() as integer

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

2. 如果使用redim重新定義一個(gè)數(shù)組，數(shù)組里數(shù)據(jù)全部被初始化，要保留原有數(shù)據(jù)加上preserve

3 redim只能修改數(shù)據(jù)最后的維數(shù)，不能改變數(shù)組類型

4 redim 不能夠全局聲明

關(guān)于VB.net中定義動(dòng)態(tài)數(shù)組并賦值的問(wèn)題

你在最后兩行之間加一行代碼，看看數(shù)組的規(guī)模大小的結(jié)果；

Msgbox Ubound(cartnum)

怎樣在VB.NET中，定義了一個(gè)不知大小的一維數(shù)組，然后給這個(gè)數(shù)組添加值

使用動(dòng)態(tài)定義

ReDim a() AS **********'定義一個(gè)動(dòng)態(tài)數(shù)組

...........

計(jì)算出第一個(gè)Y

ReDim a(0)

a(0)=Y

.....................

計(jì)算出第二個(gè)Y

ReDim Preserve a(1) '再次分配元素并保留原有元素

a(1) =Y

.........................

.........................

ReDim Preserve a(N) '第N次分配元素并保留原有元素

a(N) =Y

求指點(diǎn) vb.net Structure 里面 怎么定義數(shù)組大小呢?

那就是不能初始長(zhǎng)度了，而且結(jié)構(gòu)中定義個(gè)無(wú)參數(shù)的構(gòu)造函數(shù)也不行，所以無(wú)法初始長(zhǎng)度。

這有必要嗎，在使用時(shí)重定義它的長(zhǎng)度也可以。

Structure MODULEENTRY32

Dim Size As Integer

Dim Mid As Integer

Dim pid As Integer

Dim gusage As Integer

Dim pusage As Integer

Dim base As Integer

Dim 大小 As Integer

Dim 句柄 As Integer

Dim 文件名() As Byte

Dim 完整路徑() As Byte

Sub t()

文件名 = Array.CreateInstance(GetType(Byte), 45) '建立數(shù)組

ReDim 文件名(45) '定義數(shù)組長(zhǎng)度，其實(shí)數(shù)組也是對(duì)象，相當(dāng)生成個(gè)實(shí)例。

文件名 = System.Text.ASCIIEncoding.ASCII.GetBytes("c:\windows\test.txt") '這兩個(gè)數(shù)組內(nèi)容多半是從字符串轉(zhuǎn)換而來(lái)的，根本就不需要初始長(zhǎng)度

End Sub

vb.net2013中創(chuàng)建控件數(shù)組

我是VB.Net 2010，你看看能行不。

Public Class Form1

Private MyTextBoxArray As New ArrayList

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

For i = 0 To 8 '利用循環(huán)語(yǔ)句動(dòng)態(tài)加入控件數(shù)組。

Dim FirstTextBox As New TextBox

'定義文本框?qū)ο?/p>

Me.Controls.Add(FirstTextBox)

'將一個(gè)文本框控件加入到Form上

MyTextBoxArray.Add(FirstTextBox)

'將文本框控件加入到例表集合中

MyTextBoxArray.Item(i).top = i * MyTextBoxArray.Item(i).height + 20 '修改新加入控件在Form上的位置

MyTextBoxArray.Item(i).left = 100

FirstTextBox.TabIndex = i

'修改新加入控件的TabIndex值

MyTextBoxArray.Item(i).text = "TextBox" i.ToString '修改默認(rèn)文本。

Next

End Sub

End Class

vb.net 對(duì)象數(shù)組

你只是定義了一個(gè)對(duì)象，類而已

首先要給對(duì)象設(shè)置變量，這個(gè)還不是數(shù)組

Public class As Single的class 應(yīng)該是關(guān)鍵字請(qǐng)換一個(gè)名字

Dim KidsX(1 to 100) as kids

KidsX(1).classx=1

KidsX(1).grade=1

KidsX(1).name=”張某"

KidsX(2).classx=1

KidsX(2).grade=2

KidsX(2).name=”王某"

……