VB.net 数组的使用

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click

让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：域名注册、虚拟空间、营销软件、网站建设、广元网站维护、网站推广。

Dim a(15) As Integer

Dim i As Integer

Dim tmpStr As String

Randomize()

For i = 0 To a.Length - 1

a(i) = Int(100 * Rnd() + 1)

Next

TextBox1.Text = ""

tmpStr = ""

For i = 0 To a.Length - 1

tmpStr = tmpStr a(i) " "

'在Textbox中每行显示5个

If (i + 1) Mod 5 = 0 Then

TextBox1.AppendText(tmpStr vbCrLf)

tmpStr = ""

End If

Next

End Sub

vb.net如何在数组中查找数组?

'''这个函数功能就是用来把数组转为string的格式'''如byte()={1,2,3,4,5,6}转化后变为",1,2,3,4,5,6,"Function ByteArrayToString(bytes() As Byte) As String Dim s As String = "" For i As Integer = 0 To bytes.Length s = Convert.ToString(bytes(i)) "," Next Return “," sEnd Function Sub Search()Dim a as byte()={1,2,3,4,5,6}

Dim b as byte()={2,3,4}

Dim astr As String = ByteArrayToString(a)Dim bstr As String = ByteArrayToString(b)Dim index As Integer = astr.IndexOf(bstr) '这个index就是b数组在a数组的位置，下标从0开始，不过记得处理下逗号，因为这时候是字符串。'''如果index小于0说明没有匹配内容End Sub 现在说明下ByteArrayToString为什么要在字符串开头加个","，如果不加，可能出现a="1,23,4,5,6,", b="3,4,5,"，结果导致查询位置错误，匹配了a的位置

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 多维数组怎么表示

array(2,2)是多维数组的访问方式，其数组的定义和初始化方法为：

Dim array As Integer(,) = {{1, 2, 3}, {4, 5, 6}}

每一行的元素数量是固定且相等的。

array(2)(2)是交错数组（即数组的数组）的访问方式。也就是，你有一个数组，这个数组的每个元素也是数组。其数组的定义和初始化方法为：

Dim array As Integer()() = {New Integer() {1, 2, 3}, New Integer() {4, 5, 6, 7, 8}}

由于每个元素是独立的数组，所以交错数组每一行的元素数量不固定，且可以不等。

VB.NET数组问题，关于数据的调用问题~

新建一个类，然后使用类的实例来创建数组。

下面代码放在申明处，类的里面，比如Class Form1的下面

‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’

Dim person() As New member

‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’

下面一段的在该文件的最下面插入

‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’

Class member

Dim name As string

Dim male As Boolean '这里True表示男，False表示女

Dim age As Integer

Dim birthym As Long

End Class

‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’

然后如果你想要调用一个年龄，比如第一个人的，就用

person(0).age

来表示

That's all

vb.net 对象数组

你只是定义了一个对象，类而已

首先要给对象设置变量，这个还不是数组

Public class As Single的class 应该是关键字请换一个名字

Dim KidsX(1 to 100) as kids

KidsX(1).classx=1

KidsX(1).grade=1

KidsX(1).name=”张某"

KidsX(2).classx=1

KidsX(2).grade=2

KidsX(2).name=”王某"

……

文章名称：vb.net数组交集,c语言数组交集与并集
当前地址：http://azwzsj.com/article/hdopcc.html