十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營維護(hù)+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
你這是控件數(shù)組?你這明明就是9個不同的 TextBox 控件啊,只不過名字長得像而已。
創(chuàng)新互聯(lián)建站專注于網(wǎng)站建設(shè)|成都網(wǎng)站維護(hù)|優(yōu)化|托管以及網(wǎng)絡(luò)推廣,積累了大量的網(wǎng)站設(shè)計與制作經(jīng)驗(yàn),為許多企業(yè)提供了網(wǎng)站定制設(shè)計服務(wù),案例作品覆蓋成都主動防護(hù)網(wǎng)等行業(yè)。能根據(jù)企業(yè)所處的行業(yè)與銷售的產(chǎn)品,結(jié)合品牌形象的塑造,量身制作品質(zhì)網(wǎng)站。
1、點(diǎn)擊VS工具。
2、打開后,新建一個Windows窗體應(yīng)用程序。
3、新建完畢后,如圖所示。
4、拖動一個按鈕。
5、定義數(shù)組最常見的方法,如圖示。
6、運(yùn)行后,點(diǎn)擊按鈕,彈出提示正常。
7、定義數(shù)組第二種方法,屬于動態(tài)的方法。
8、運(yùn)行后,點(diǎn)擊按鈕,數(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
Public?長度()?As?TextBox?=?{?Pipe_0?,??Pipe_1?,?Pipe_2?,?Pipe_3?}
這個數(shù)組定義是有問題的,你定義的是TextBox數(shù)組,{}號里必須是而TextBox類型,例如:
Public?長度()?As?TextBox?=?{?New?TextBox?,??New?TextBox?,?New?TextBox?}
Pipe_0-3不是任何類型和值,這個VS應(yīng)該直接報錯才對!標(biāo)準(zhǔn)的定義應(yīng)該如下:
Public?Class?Pipe
Public?長度()?As?TextBox
Sub?New()
Me.長度?=?{New?TextBox,?New?TextBox,?New?TextBox,?New?TextBox}
End?Sub
Private?Sub?xxxxxxxxxxxx.Click
MsgBox(長度(2).Name)
End?Sub
End?Class