当前位置:编程学习 > VB >>

vb 插入字符串

mid $(字符串变量,p[,len])=子字符串 , 用“子字符串”替换“字符串变量”中从p位置开始的len个字符
帮忙举个例子,解释下这个语句的意思! 谢谢!
由于本人没什么分,如有满意答案,定加于您!
答案:Mid("abcdefg", 3, 2)="de" 就是从字符串"abcdefg"中的第3位开始取两位得到"de" 。
用子字符串替换字符串变量用Replace
Replace("abcdefg", "cd", "123") = "ab123efg"
在字符串中"abcdefg"找"cd"然后把cd替换成"123"就是结果

详细的资料:


Mid 函数



返回 Variant (String),其中包含字符串中指定数量的字符。

语法

Mid(string, start[, length])

Mid 函数的语法具有下面的命名参数:

部分 说明
string 必要参数。字符串表达式,从中返回字符。如果 string 包含 Null,将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串 ("")。
length 可选参数;为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。


说明

欲知 string 的字符数,可用 Len 函数。

注意
MidB 函数作用于字符串中包含的字节数据,如同在双字节字符集(DBCS)语言中一样。因此其参数指定的是字节数,而不是字符数。对于使用 MidB的示例代码,请参阅示例主题中的第二个示例。



Replace函数



描述

返回一个字符串,该字符串中指定的子字符串已被替换成另一子字符串,并且替换发生的次数也是指定的。

语法

Replace(expression, find, replacewith[, start[, count[, compare]]])

Replace函数语法有如下几部分:

部分 描述
expression 必需的。字符串表达式,包含要替换的子字符串。
find 必需的。要搜索到的子字符串。
replacewith 必需的。用来替换的子字符串。
start 可选的。在表达式中子字符串搜索的开始位置。如果忽略,假定从1开始。
count 可选的。子字符串进行替换的次数。如果忽略,缺省值是 –1,它表明进行所有可能的替换。
compare 可选的。数字值,表示判别子字符串时所用的比较方式。关于其值,请参阅“设置值”部分。


设置值

compare参数的设置值如下:

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


返回值

Replace的返回值如下:

如果 Replace返回值
expression长度为零 零长度字符串("")。
expression为Null 一个错误。
find长度为零 expression的复本。
replacewith长度为零 expression的复本,其中删除了所有出现的find 的字符串。
start > Len(expression) 长度为零的字符串。
count is 0 expression.的复本。


说明

Replace函数的返回值是一个字符串,但是,其中从start所指定的位置开始,到expression字符串的结尾处的一段子字符串已经发生过替换动作。并不是原字符串从头到尾的一个复制。

这么说吧:用A替换B是这样的:


你好A世界

替换后:

你好B世界


A被替换成了B

mid$格式

dim A as string

a=mid$(主字符串Str1,起始位置i,长度l)

mid$的功能是从Str1中的起始位置i开始取出l个字符,放入变量A中,你这个写法是不是判断等号前的与子字符串是否相等?如果是的话,是这样的意思,我帮你解释一下

 

mid$(字符串变量str1,p[,len])=子字符串str2

 

意思是说用mid$函数从str1中,位置p开始取字符串,长度为len,这样就得出一个字符串,然后与等号右边的字符串str2比较是否相等

 

比如str1="ABCDEFG"

str2="DEF"

mid$(str1,3,2)这个就是等号左边的,使用的时候,你将str1,位置3,长度2更改为你实际需要的就可以了,这个地方得出的是从第三位开始取出长度2的字符串即"CD"

mid$(str1,3,2)=str2

即等号左边取出的"CD"和等号右边的"DEF"进行比较判断,得出的值是布尔型,即False和True,如果两边相等则为True,否则为False

 

这样的表达式一般用在If判断

 

比如If mid$(str1,3,2)=str2 then

......'写你要操作的代码

else

......'否则要操作的代码

End If

 

替换的话用replace

格式replace(str1,str2,str3)意思是在str1中用str3去替换str2

例:

dim str1 as string

dim str2 as string

dim str3 as string

dim a as string

str1="abcdefghi":str2="efg":str3="xyz"

表达式一般写成这样的:a=replace(str1,str2,str3)这样得出的结果就是a="abcdxyzhi"

上一个:VB考级标准
下一个:VB高手帮忙!

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,