转载网址:http://www.qqread.com/vbdotnet/t472767000_2.html
转载网址:http://www.builder.com.cn/2007/1120/645193.shtml
___________________________________________________________________________________
Visual Basic中的For循环语句
For<循环变量>=<初值>To<终值>[Step步长]
<循环体>
[Exit For]
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。基于您的数据库的信息执行比较。 |