字符串型变量

字符串型变量 字符串型变量 字符串型变量用于存放字符串，字符串就是一串字符，VB要求字符串要放在一对英文双引号里面，例如”hello world”和”欢迎光临”都是字符串。字符串型变量用关键字string进行定义。 字符串变量应用例子: Dim str As String ‘定义一个string类型的变量，变量名是str str = InputBox("请输入用户名") ‘输入字符串并保存到字符串型变量 str = str & "欢迎光临" Print str 提示:符号&用于连接字符串，符号&左右两边一定要有空格。语句:str&”欢迎光临”，将会报错，因为&符号左右两边没有留空格。 VB有强大的字符串处理函数，应用这些函数，你能够轻松处理字符串。VB常用字符串操作函数如下: 1. Len(X): 计算字符串X的长度 (也就是字符的个数) [格式]: P=Len(X) [说明]: 空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。 [范例]: (1) Dim x as String Dim strlen as Integer 1 X=”” ‘空字符串 strlen = Len(X) print strlen’输出结果为0 (2) 令X=”abcd” strlen = Len(X) print strlen输出结果为4 (3) 令X=”VB教程” strlen = Len(X) print strlen输出结果为4 2. Mid(X)函数:截取一段字符 [格式]: P=Mid(X,n) 由字符串X的第n个字符读起，读取后面的所有字符。 P=Mid(X,n,m) 由X的第n个字符读起，读取后面的m个字符。 [范例]: (1) X=”abcdefg” P=Mid(X,5) Print p 结果为:efg (2) X=”abcdefg” P=Mid(X,2,4) Print p 结果为bcde (3) X=”abcdefg” P=Mid(X,3,1) Print p 结果为c 3. Replace: 将字符串中的某些特定字符串替换为其他字符串 [格式]: 2 P=Replace(X,S,R) [说明]:将字符串X中的字符串S替换为字符串R，然后返回。 [范例]: X=”VB is very good” P=Replace(X,”good”,”nice”) ‘X保存的字符串中的”good”替换为”nice” 输出结果为:P=”VB is very nice” 4. StrReverse:反转字符串 [格式]: P=StrReverse(X) [说明]: 返回X参数反转后的字符串 [范例]: (1)X=”abc” P=StrReverse(X) 输出结果:P=”cba” 5. trim(字符串)去掉字符串左右两边的空格 例如 trim(" 小 欣 无敌 ") 则返回 "小 欣 无敌" ，去掉了字符串左右的空格，中间的空格不受任何影响 6. split分割字符串函数，以某个指定字符进行分割，将字符串分割成为若干段字符串。 split函数的一般格式，split (要分割的字符串, 指定分割符) arr=split("張三&李四&王五","&") ‘以符号&作为分隔符分割 print arr(0) ‘输出"張三" print arr(1) ‘输出"李四" print arr(2) ‘输出"王五" 7. Ucase(X)，Lcase(X):转换英文字母的大小写 [格式]: P=Lcase(X) ‘ 将X字符串中的大写字母转换成小写 P=Ucase(X) 3 ‘ 将X字符串中的小写字母转换成大写 [说明]:除了英文字母外，其他字符或中文字都不会受到影响。 [范例]: (1) 令 X=”VB and VC” 则Lcase(X)的结果为”vb and vc”，Ucase(X)的结果为”VB AND VC” 练习3:语文考试中要求写一遍作文，要求字数不少于800字。请你做一个程序，输入一段字符，输出字符的总数。(保存程序的文件夹命名为len) 练习4:论坛提供了一个自由交流的平台，但有些人却在论坛上发布一些粗俗的言论，实在令斑竹(版主)很头疼。所以他决定做一个程序，自动屏蔽这些粗俗用语。斑竹列了一个粗俗用语取代，例如:仆街用符号**取代，畜生用符号##取代。请你完成这个程序。(保存程序的文件夹命名为replace) 输入输出样例1: 输入:你个仆街 4 输出:你个** 输入输出样例2: 输入:畜生骂谁 输出:##骂谁 练习5:为了保护客户的隐私，柜员机转账的时候不会显示客户的全名，而是将名字第二个字符用符号“*”取代。现在请你做一个程序，输入客户的名字，将名字中的第二个字符用“*”取代后输出显示。(保存程序的文件夹命名为mid) 输入输出样例: 输入:李小龙 输出:李*龙 5 6