VB.net 控件數(shù)組

你這是控件數(shù)組？你這明明就是9個(gè)不同的 TextBox 控件啊，只不過名字長(zhǎng)得像而已。

創(chuàng)新互聯(lián)建站專注于網(wǎng)站建設(shè)|成都網(wǎng)站維護(hù)|優(yōu)化|托管以及網(wǎng)絡(luò)推廣，積累了大量的網(wǎng)站設(shè)計(jì)與制作經(jīng)驗(yàn)，為許多企業(yè)提供了網(wǎng)站定制設(shè)計(jì)服務(wù)，案例作品覆蓋成都主動(dòng)防護(hù)網(wǎng)等行業(yè)。能根據(jù)企業(yè)所處的行業(yè)與銷售的產(chǎn)品，結(jié)合品牌形象的塑造，量身制作品質(zhì)網(wǎng)站。

vb.net 數(shù)組的定義方法

1、點(diǎn)擊VS工具。

2、打開后，新建一個(gè)Windows窗體應(yīng)用程序。

3、新建完畢后，如圖所示。

4、拖動(dòng)一個(gè)按鈕。

5、定義數(shù)組最常見的方法，如圖示。

6、運(yùn)行后，點(diǎn)擊按鈕，彈出提示正常。

7、定義數(shù)組第二種方法，屬于動(dòng)態(tài)的方法。

8、運(yùn)行后，點(diǎn)擊按鈕，數(shù)組成功輸出。

vb.net 怎樣創(chuàng)建控件數(shù)組？

Dim Str(20) As String '20數(shù)據(jù)元素

Dim Text(20) As TextBox

Dim n As Integer = 0

For Each i In Text

i = New TextBox '實(shí)例化

i.Location = New Point(50, n * 20)

Me.Controls.Add(i) '添加窗體

Dim Index As Integer = i.TabIndex '沒index屬性

Str(n) = Index

i.Text = Str(n) 'str數(shù)組值賦值給文本框

n += 1

Next

VB.net 里調(diào)用全局?jǐn)?shù)組的問題！

Public?長(zhǎng)度()?As?TextBox?=?{?Pipe_0?,??Pipe_1?,?Pipe_2?,?Pipe_3?}

這個(gè)數(shù)組定義是有問題的，你定義的是TextBox數(shù)組，{}號(hào)里必須是而TextBox類型，例如：

Public?長(zhǎng)度()?As?TextBox?=?{?New?TextBox?,??New?TextBox?,?New?TextBox?}

Pipe_0-3不是任何類型和值，這個(gè)VS應(yīng)該直接報(bào)錯(cuò)才對(duì)！標(biāo)準(zhǔn)的定義應(yīng)該如下：

Public?Class?Pipe

Public?長(zhǎng)度()?As?TextBox

Sub?New()

Me.長(zhǎng)度?=?{New?TextBox,?New?TextBox,?New?TextBox,?New?TextBox}

End?Sub

Private?Sub?xxxxxxxxxxxx.Click

MsgBox(長(zhǎng)度(2).Name)

End?Sub

End?Class