vb查询字符串并替换

用vb打开指定的的txt文本,,用程序搜寻文本-- Links: --
------------

LINK 1 NAME "" LABEL 0.00 0.00
TYPE 1 LENGTH 135.200 LANES 1 LANE_WIDTH 10.00 GRADIENT 0.00000 COST 0.00000 SURCHARGE 0.00000 SURCHARGE 0.00000 SEGMENT LENGTH 10.000
FROM -144.730 33.681
TO -9.537 35.018

中TYPE 1 LENGTH字符串,并可将后边的135.200更换成任意数。。。。。

查找字符串的函数是 instr,替换字符串的函数是replace,用法:
instr(n , S1 , S2) 在字符串S1中,从左边第n个字符向后搜索S2第一次出现的位置,例如
i = instr ( 3, "abcbcbc", "b" ),此时 i = 4

replace(s,s1,s2) 在字符串s中搜索s1,如果搜索到就将s1替换成s2,例如
replace("asdfasdfasfas","asd","m") 结果是 mfmfasfas

希望对你有用
温馨提示:内容为网友见解,仅供参考
无其他回答

vb的查找并替换功能怎么用?
子字符串进行替换的次数。如果忽略,缺省值是 _1,它表明进行所有可能的替换。compare可选的。数字值,表示判别子字符串时所用的比较方式。关于其值,请参阅“设置值”部分。\\x0d\\x0a\\x0d\\x0a设置值\\x0d\\x0acompare参数的设置值如下:\\x0d\\x0a常数值描述vbUseCompareOption_1使用Option Co...

vb查询字符串并替换
查找字符串的函数是 instr,替换字符串的函数是replace,用法:instr(n , S1 , S2) 在字符串S1中,从左边第n个字符向后搜索S2第一次出现的位置,例如 i = instr ( 3, "abcbcbc", "b" ),此时 i = 4 replace(s,s1,s2) 在字符串s中搜索s1,如果搜索到就将s1替换成s2,例如 replace("...

VBA学习笔记35-2:字符串查找替换与转换
首先,介绍了两个查找函数:instr和InStrRev。instr从左到右查找字符,返回大于0的值表示找到,而InStrRev则是从右到左查找,查找方向相反。接着,Replace函数用于替换字符串中的特定字符,而mid则用于根据起始位置和长度截取字符串。字符转换方面,Trim, Ltrim, 和 Rtrim用于移除字符串两端或单端的空格。ASC...

vb的字符替换并且查找功能,谁知道吗
if instr("加快减肥卡拉的进口量放大镜", "进口") then Replace("加快减肥卡拉的进口量放大镜", "进口", "出口")end if

vb 的查找并替换功能
VB使用Replace在字符串中查找指定字符串并替换为另一字符串的功能。Replace函数 描述 返回一个字符串,该字符串中指定的子字符串已被替换成另一子字符串,并且替换发生的次数也是指定的。说明 Replace函数的返回值是一个字符串,但是,其中从start所指定的位置开始,到expression字符串的结尾处的一段子字符...

excel vb 如何查找替换字符串
法一:=CHOOSE(A1,"张三","李四","王麻子")法二:=if(A1=1,"张三",if(A1=2,"李四","王麻子"))法三:=lookup(A1,{1,2,3},{"张三","李四","王麻子"})应该还有其他的一些方法,先这样了

VB怎样实现简单字符搜索功能
1 VB实现文本查找和替换 实现查找功能的关键在于使用InStr函数,这个函数可以找到指定的字符串在另一字符串中最先出现的位置。我们先来看一看使用这个函数的语法:InStr([start, ]string1, string2[, compare])这个函数需要的的参数是起始位置、主体字符串、要查找的字符串;Compare是可选参数。指定...

VB 怎么对Text内容 进行 替换 查找 操作
在VB中,查找一个字符串是否出现在另一个字符串中,可以使用InStr函数,如果它返回一个大于0的值,则表示找到了相应的字符串.Instr函数有两种用法,一种是指定开始查找位置的,一种则不带.不带查找位置:InStr("Pack a String.", "a") '返回值:2意为"Pack a String."中第2个字符就是找查找的字符...

VB 怎么对Text内容 进行 替换 查找 操作
1、可以使用文本框的SelLength、SelStart、SelText 属性及字符串查找函数InStr()来实现。2、工具:vb6。3、具体实现代码如下:Option ExplicitPrivate Sub Command1_Click() Dim Search, Where ' 声明变量。 ' 获取需要查找的字符串。 Search = Text1.Text Where = InStr(Text3.Text,...

VB6.0 遍历指定文件夹所有文件,查找某字符串替换成新的
整个过程可以分为两步:一、递归遍历目录;二、逐个处理文件。至于是否用到进制替换要看你的目的,要看“123123123sd”这个字符串的性质。个人认为需要过滤下文件类型。例如TXT,HTML,INI,ASP,PHP ,JS等等这些类型的文件内容都是字符串性质。但是,读很多格式的复杂文件,要通过二进制流方式,那么读到...

相似回答