VB.NET 学习--（6）

发布时间：2020-12-16 23:33:47 所属栏目：大数据来源：网络整理

导读：转载网址：http://www.qqread.com/vbdotnet/t472767000_2.html 转载网址：http://www.builder.com.cn/2007/1120/645193.shtml ___________________________________________________________________________________ Visual Basic中的For循环语句 For循环变

转载网址：http://www.qqread.com/vbdotnet/t472767000_2.html

转载网址：http://www.builder.com.cn/2007/1120/645193.shtml

___________________________________________________________________________________

Visual Basic中的For循环语句

For<循环变量>=<初值>To<终值>[Step步长]
　　<循环体>
　　[ExitFor]
　　Next<循环变量>

^_____________________________________________________________________

字符串函数

mid(字符串，从第几个开始，长度) ByRef 在[字符串]中[从第几个开始]取出[长度个字符串]

　　例如 mid("小欣无敌",1,3) 则返回 "小欣无"

　　instr(从第几个开始,字符串1,字符串2) ByVal 从规定的位置开始查找，返回字符串2在字符串1中的位置

　　例如 instr(1,"小欣无敌","小") 则返回 1,instr(2,"小")，则返回 0 。 0 表示未找到

　　InStrRev(字符串1,字符串2,从第几个开始) ByVal 从规定的位置开始，从后住前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。

　　例如 instrRev("小欣无敌","小",2) 则返回 2 ; instrRev("小欣无敌","欣",1) 则返回 0,因为它从"小欣无敌"的第1个字开始往前查找，所以找不到。0 表示未找到。　　left(字符串,长度) ByVal 从[字符串]的左边开始返回[长度]个字符

　　例如 Left("小欣无敌,3) 则返回 "小欣无"

　　right(字符串,长度) ByVal 从[字符串]的右边开始返回[长度]个字符

　　例如 Right("小欣无敌",3) 则返回 "欣无敌"

　　ucase(字符串) ByVal 返回[字符串]的大写形式，只对英文字符有效

　　例如 ucase("xiaoXINwuDi") 则返回 "XIAOXINWUDI"

　　lcase(字符串) ByVal 返回[字符串]的小写形式，只对英文字符有效

　　例如 lcase("xiaoXINwuDi") 则返回 "xiaoxinwudi"

　　asc(字符) Byval返回[字符]的ascii编码，若有多个字符，则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程

　　例如 asc("小") 则返回 -12127 ; asc("小欣无敌") 也返回 -12127

　　chr(ASCii编码) Byval 返回[Ascii]编码所代表的字符，和Chr()函数是一个可逆的过程

　　例如 chr(-12127) 则返回 "小" ;chr(asc("小")) 则返回"小"(这里是为了说明asc和chr的可逆性，例用此特性可以加密文本)

　　trim(字符串) Byval 返回去掉了前、后之后的[字符串]

　　例如 trim(" 小欣无敌 ") 则返回 "小欣无敌" ，中间的空格不受任何影响

　　string(个数,字符) Byval 返回[个数]个[字符]

　　例如 string(3,"小") 则返回 "小小小",而 string(3,"小欣无敌") 也返回 "小"，只有首字符才有效

　　space(个数) Byval 返回[个数]个空格

　　例如 space(5) 则返回 " "

　　strconv(字符串,转换的类型) Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角

　　例如 strconv("xiao",vbwide) 则返回 "XIAO",而strconv("XIAO",vbnarrow) 则返回 "XIAO"

　　'备注 vbwide = 4,vbnarrow = 8

　　len(字符串) Byval 返回[字符串]的长度

　　例如 len("小欣无敌") 则返回 4

————————————————————————————————————————

在msgbox 中换行："名称：通讯录管理" & vbCrlf & "版本：个人1.0版" & vbCrlf & "制作人：学习"

vbCrlf常量可以让MsgBox换行

_____________________________________________________________________________-

VB Split函数

_______________________________________________________________

：返回一个下标从零开始的一维数组，它包含指定数目的子字符串。

Split(expression[,delimiter[,count[,compare]]])

expression

必需的。包含子字符串和分隔符的字符串表达式。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。

delimiter	可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的expression字符串。
count	可选的。要返回的子字符串数，-1表示返回所有的子字符串。
compare	可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。

设置值

compare参数的设置值如下：

常数	值	描述
vbUseCompareOption	-1	用Option Compare语句中的设置值执行比较。
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文字比较。
vbDatabaseCompare	2	仅用于Microsoft Access。基于您的数据库的信息执行比较。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!