vb.net中 listbox内所有数据的和

Dim a(14) As Integer

我们拥有十载网页设计和网站建设经验，从网站策划到网站制作，我们的网页设计师为您提供的解决方案。为企业提供网站设计制作、网站设计、微信开发、小程序定制开发、手机网站开发、H5开发、等业务。无论您有什么样的网站设计或者设计方案要求，我们都将富于创造性的提供专业设计服务并满足您的需求。

For i = 1 To 14

a(i) = Int(Rnd() * 90) + 10

ListBox1.Items.Add(a(i))

Next

Dim b(14) As Integer

Dim sum As Integer = 0

For i = 1 To 14

b(i) = ListBox1.Items.Item(i - 1)

sum = sum + b(i)

Next

Dim avg As Double

avg = sum / 14

MsgBox(avg)

我写的可以，你可以把代码贴出来看看

vb.net在数组定义中如何使用复合数据类型

你可以用结构数组的,如下:

...

Private Structure test

Dim name As String

Dim sex As String

Dim age As Integer

Dim salary As Integer

End Structure

Dim list(2) As test

Private Sub insert()

list(0).name = "张三"

list(0).age = "20"

list(0).salary = "1500"

list(0).sex = "男"

list(1).name = "李四"

list(1).age = "21"

list(1).salary = "1500"

list(1).sex = "女"

End Sub

...

你可以放到main()里输出一下，就是这样...

VB.NET 找出数组中相同的元素，并按相同元素排序到另外一个数组中。

先把strA排序，

ind = 2

if len(strA) = 0 then return

strB(1) = strA(1)

for each s in strA

if (strA(ind) strA(ind - 1) then

count = 0

strB(ind) = strA(ind)

else

strB(ind) = strA(ind - 1)

end if

ind = ind + 1

next s

vb语法忘了。。。大概是这么个意思吧。。。。 排序N LOG N，后面是线性的N，所以总共是NLOGN

关于对象数组VB.NET的

你虽然定义了数组，但是数组中的hhh并没有初始化。

比如你要使用b(0)，就得先 b(0) = New hhh()

如果全部要初始化，可以用循环

vb.net 怎么把数据库数据一条记录存入数组啊 最好给出代码

Dim da As New DataTable

Dim myda As OleDb.OleDbDataAdapter("SELECT * FROM 表“, oconnection)

myda.Fill(da)

姓名=da.Rows(0)(0) ‘张三

姓名=da.Rows(1)(0) ‘李四

姓名=da.Rows(2)(0) ‘王五

姓名=da.Rows(3)(0) ‘赵六

姓名=da.Rows(4)(0) ‘刘琦

这个不一定要用数组，直接用table就可以操作了。

分享文章：vb.net数组数据整理 vb数组
标题网址：http://kswjz.com/article/docjgjh.html