最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
vb.net数组(长度,赋值 )
时间:2011-04-30 编辑:简简单单 来源:一聚教程网
下面三个关于vb.net数组操作实例主要对数据元素,数据长度,数据改变值来讲了,下面来看三个实例代码
增加数据长度
imports system
public class mainclass
shared sub main()
'declare an array
dim strfriends(4) as string'populate the array
strfriends(0) = "r"
strfriends(1) = "b"
strfriends(2) = "s"
strfriends(3) = "s"
strfriends(4) = "k"redim preserve strfriends(6)
strfriends(5) = "m"
strfriends(6) = "j"for each strname as string in strfriends
system.console.writeline(strname)
nextend sub
end class
重新给数据元素指定值
imports system
public class mainclass
shared sub main(byval args as string())
dim friends() as string = {"a", "b", "c","d", "e"}' make friends bigger!
redim friends(6)
friends(5) = "f"
friends(6) = "g"
addfriendstolist(friends)
end sub
shared sub addfriendstolist(byval friends() as string)
dim friendname as string
for each friendname in friends
console.writeline("[" & friendname & "]")
next
end subend class
改变数据长度
imports system
public class samplesarray
public shared sub main()
dim myarr as string() = {"the", "quick", "brown", "fox", "jumps教程", "over", "the", "lazy", "dog"}printindexandvalues(myarr)
array.resize(myarr, myarr.length + 5)
printindexandvalues(myarr)
array.resize(myarr, 4)
printindexandvalues(myarr)
end sub 'main
public shared sub printindexandvalues(myarr() as string)
dim i as integer
for i = 0 to myarr.length - 1
console.writeline("[{0}] : {1}", i, myarr(i))
next i
end subend class
-
下一个: vb.net 数据排序倒序代码
相关文章
- C#复制数组的两种方式及效率比较解读 10-24
- ASP.NET Identity用法解析 10-24
- ASP.NET MVC使用Identity增删改查用户介绍 10-24
- C语言中atoi函数模拟实现介绍 10-18
- .Net反向代理组件Yarp用法介绍 10-10
- .NET使用YARP通过编码方式配置域名转发实现反向代理教程 10-10