vb.net中嵌套结构体传值复制的问题

因为数组是引用类型，所以直接赋值会出现这种情况

为遵义等地区用户提供了全套网页设计制作服务，及遵义网站建设行业解决方案。主营业务为成都网站建设、网站建设、遵义网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！

可以在kb=k后单独复制数组

kb.rr=k.rr.Clone

这样两个数组就是独立的了

之所以先kb=k是为了当其含有多个成员时值型成员可以直接复制，只需Clone引用类型的就行了

VB.NET 如何将ListBox列表框的所有项复制到一个数组中，便于排序？谢谢解答

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim ListboxTotalItem As Integer = ListBox1.Items.Count - 1

Dim a(ListboxTotalItem) As String

For i As Integer = 0 To ListboxTotalItem

a(i) = i

Next

Label1.Text = a(5)

End Sub

End Class

-------------

一个Form1

一个Label1

一个Listbox1

一个Button1

在Listbox1中加入10个值

-------------

只是一个演示，其他的要靠自己。

请教VB一个数组复制的问题

如果你用的是VB6.0的话，那有一个相当简单的方法来完成数组复制操作。即使用VB6.0中提供的动态数组增强功能。

它的使用也很简单，首先是声明数组，然后是直接赋值。例如对于你上面的提供的代码，改为使用动态数组增强功能的话，代码如下：

Dim a() As Single '注意a数组必须是动态数组，如写为Dim a(1000000) As Single则错误

Dim b(1000000) As Single

Dim i As Integer

for i=0 to 999999

a(i)=b(i)

next i

a=b '直接赋值，够简单吧

必须注意的是，这里作为目的数组的a不能为固定数组（即在声明时就指定了大小的数组），否则会引发错误。

分享名称：vb.net复制数组数据 vb生成数组
文章路径：http://scyanting.com/article/hgccjg.html