vb.net数组add vbscript 数组

vb.net 一个数组怎么添加新数据

list1.additem j 意思就是把j添加至list1列表中,这是在一个for 循环中，循环了10次，添加了10次 j，即 list1 中 有10列分别为：1,3,6,10,15,21,28,36,45,55

下面又来了一个循环， list1.removeitem 删除列，删除的是 list1.listcount - i ，list1.listcount 就是总列数为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

结果为：3,15,28

'ListCount返回列表框中的项目总数

'ListCount-1是列表框中最后一个项目的索引号

'亏你提醒了，我写错了，上面修改了，第一个索引为0，最后一个为9.

'也就是，问题所问的第二列的索引为1，第四列的索引为3...

相关问答

Q1: 怎样在VB.NET中，定义了一个不知大小的一维数组，然后给这个数组添加值

使用动态定义

ReDim a() AS **********'定义一个动态数组

...........

计算出第一个Y

ReDim a(0)

a(0)=Y

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

计算出第二个Y

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

a(1) =Y

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

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

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

a(N) =Y

Q2: VB.net ListBox 的值怎样添加？

用ListView的方法比较简单，直接添加一个控件顺便把0001写到Tag属性里去就行了。如果只用ListBox的话，

先创建一个类代表城市

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需要这个函数来显示

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

遍历之类的可以灵活使用，你也可以在类里面加些其它内容。

vb.net数组add的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbscript 数组、vb.net数组add的信息别忘了在本站进行查找喔。