用ListView的方法比較簡單,直接添加一個控件順便把0001寫到Tag屬性里去就行了。如果只用ListBox的話,
10年積累的成都網(wǎng)站制作、網(wǎng)站建設經(jīng)驗,可以快速應對客戶對網(wǎng)站的新想法和需求。提供各種問題對應的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡服務。我雖然不認識你,你也不認識我。但先建設網(wǎng)站后付款的網(wǎng)站建設流程,更有蘆溪免費網(wǎng)站建設讓你可以放心的選擇與我們合作。
先創(chuàng)建一個類代表城市
Public Class City
Public Name As String
Public Num As String
Public Sub New(na As String, nu As String)
Name = na
Num = nu
End Sub
Public Overrides Function ToString() As String 'ListBox需要這個函數(shù)來顯示
Return Name
End Function
End Class
然后把這個類的實例添加進去即可,比如:
ListBox1.Items.Add(New City("北京", "0001"))
讀取的話就很簡單,比如我要讀第一項
Dim obj = ListBox1.Items(0)
If TypeOf obj Is City Then
Dim c As City = obj
'c.Name就是"北京",c.Num就是"0001"了
End If
遍歷之類的可以靈活使用,你也可以在類里面加些其它內(nèi)容。
Dim
sl
As
New
ArrayList
sl.Add("單個字符串")
Dim
sa
As
String()
=
{"a",
"b",
"c"}
sl.AddRange(sa)
'添加字符數(shù)組
Dim
objs
As
Object()
=
sl.ToArray
'將數(shù)據(jù)轉(zhuǎn)換為數(shù)組
注意,ArrayList不是類型安全的集合方式,如果你的集合只要存儲字符串的話,建議用List(Of
String)來進行操作。
使用動態(tài)定義
ReDim a() AS **********'定義一個動態(tài)數(shù)組
...........
計算出第一個Y
ReDim a(0)
a(0)=Y
.....................
計算出第二個Y
ReDim Preserve a(1) '再次分配元素并保留原有元素
a(1) =Y
.........................
.........................
ReDim Preserve a(N) '第N次分配元素并保留原有元素
a(N) =Y
VB.NET編程讀取txt文本文檔中的數(shù)據(jù),并把數(shù)據(jù)保存為數(shù)組,代碼如下:
'寫配件文件
Private?Sub?saveIni(ByVal?filePath?As?String,?ByVal?str?As?String)
Dim?sw?As?StreamWriter?=?New?StreamWriter(filePath,?True)?'true是指以追加的方式打開指定文件
sw.WriteLine(str)
sw.Flush()
sw.Close()
sw?=?Nothing
End?Sub
'讀配件文件
Private?Function?readIni(ByVal?filePath?As?String)
Dim?iniDt?As?New?DataTable
iniDt.Columns.Add("text")
iniDt.Columns.Add("value")
Try
Dim?sr?As?StreamReader?=?New?StreamReader(filePath,?System.Text.Encoding.Default)
Dim?line?As?String?=?""
While?Not?sr.EndOfStream
Dim?str?=?sr.ReadLine()'讀取當前行
iniDt.Rows.Add(New?String()?{
str(0),
str(1)
})
End?While
sr.Close()
sr?=?Nothing
Catch?ex?As?Exception
End?Try
Return?iniDt
End?Function
list1.additem j 意思就是把j添加至list1列表中,這是在一個for 循環(huán)中,循環(huán)了10次,添加了10次 j,即 list1 中 有10列分別為:1,3,6,10,15,21,28,36,45,55
下面又來了一個循環(huán), list1.removeitem 刪除列,刪除的是 list1.listcount - i ,list1.listcount 就是總列數(shù)為10,減去 i ,i 是1到4,即10-1,9-2,8-3,7-4 每減掉一次,list1.listcount 就少了一條記錄。
(注意,list1.listcount-1 是最后一條記錄)
減掉了第 9,7,5,3列
剩余為 1,3,6,15,28,45
結(jié)果為:3,15,28
'ListCount返回列表框中的項目總數(shù)
'ListCount-1是列表框中最后一個項目的索引號
'虧你提醒了,我寫錯了,上面修改了,第一個索引為0,最后一個為9.
'也就是,問題所問的第二列的索引為1,第四列的索引為3...
list1.additem j 意思就是把j添加至list1列表中,這是在一個for 循環(huán)中,循環(huán)了10次,添加了10次 j,即 list1 中 有10列分別為:1,3,6,10,15,21,28,36,45,55
下面又來了一個循環(huán), list1.removeitem 刪除列,刪除的是 list1.listcount - i ,list1.listcount 就是總列數(shù)為10,減去 i ,i 是1到4,即10-1,9-2,8-3,7-4 每減掉一次,list1.listcount 就少了一條記錄。
(注意,list1.listcount-1 是最后一條記錄)
減掉了第 9,7,5,3列
剩余為 1,3,6,15,28,45
結(jié)果為:3,15,28
'ListCount返回列表框中的項目總數(shù)
'ListCount-1是列表框中最后一個項目的索引號
'虧你提醒了,我寫錯了,上面修改了,第一個索引為0,最后一個為9.
'也就是,問題所問的第二列的索引為1,第四列的索引為3...