VB用一个字符串中某一位置的字符替换另一字符串中某一位置的字符该怎么做

网上说Mid(String, Start, 1) = "……"可以给字符串String指定位置赋字符值进行替换,于是尝试用Mid(String1, Start1, 1) = Mid(String2, Start2, 1)却提示错误,怎么解决?

VB上输入 Mid()会出现提示:Mid(string, start as long, [length])
我们上课时讲的是:Mid是一个字符串函数,即它的返回值是一个字符串
Mid(x, n1, n2)意为从字符串x左起第n1个字符起取n2个字符
x即为string,start as long的意思是从左起第n1个字符取起,n1的类型为long

举个例子
Private Sub Form_Click()
a$ = 1234567890
b$ = Mid(a, 2, 4)
Print b
End Sub
显示的是2345

楼主你那个Mid(String1, Start1, 1) = Mid(String2, Start2, 1)………………理解错误了,网上的东西质量比较差
温馨提示:内容为网友见解,仅供参考
第1个回答  推荐于2017-12-16
Mid(String1, Start1, 1) = Mid(String2, Start2, 1)中start1是string1中要替换位置起始字符的位置,1为要替换的 个数,start2是string2中将要替换到string1中的的字符的起始位置,个数与前面相同,也为1,例:
Dim a As String
a = "abcdefghijk"
Dim b As String
b = "123456789"
Mid(a, 3, 1) = Mid(b, 5, 1)
Text1 = a
运行结果为ab5defghijk本回答被提问者采纳
第2个回答  2011-05-06
首先你要弄清是赋值还是比较。
你写的代码用于比较,如果是赋值的话用var = mid(a, i, n)的格式。
修改其中某段内容可用left(a,n) & "..." & right(a, m)
第3个回答  2011-05-06
#include<stdio.h>
char a;
char b;
main()
{
printf("enter code a:/n");
scanf("%s%d");
a="%s%d";
printf("enter code to be include:/n");
scanf("%s%d");
b="%s%d";
a+b;
printf("the code is:%s%d/n")
}追问

晕死,我是问VB,不是C……

第4个回答  2011-05-06
replace


dim s as string
s="abcde"
replace(s,"abc","aaa")
那么s就变成了aaade

VB用一个字符串中某一位置的字符替换另一字符串中某一位置的字符该怎么...
VB上输入 Mid()会出现提示:Mid(string, start as long, [length])我们上课时讲的是:Mid是一个字符串函数,即它的返回值是一个字符串 Mid(x, n1, n2)意为从字符串x左起第n1个字符起取n2个字符 x即为string,start as long的意思是从左起第n1个字符取起,n1的类型为long 举个例子 Privat...

VB 如何输入一句话后将其中的字替换成另一个字
find 必需的。要搜索到的子字符串。replacewith 必需的。用来替换的子字符串。start 可选的。在表达式中子字符串搜索的开始位置。如果忽略,假定从1开始。count 可选的。子字符串进行替换的次数。如果忽略,缺省值是 –1,它表明进行所有可能的替换。compare 可选的。数字值,表示判别子字符串时所用的...

VB 文本指定行字符串的替代
file.close createobject("wscript.shell").run "notepad.exe 1.txt"

vb 的查找并替换功能
Replace函数的返回值是一个字符串,但是,其中从start所指定的位置开始,到expression字符串的结尾处的一段子字符串已经发生过替换动作。并不是原字符串从头到尾的一个复制。实例代码:将'vb 的查找并替换功能'中'并'替换为'和':Private Sub Command1_Click() Dim s As String Dim s1 As St...

VB程序设置问题:如何提取指定字符串之前的字符串
1、使用Left$(string, length)函数(Left$也可以用Left替换,string字符串、length截取的长度)和InStr([start,] string1, string2 [, compare])(start起始位置、string1字符串、string2要搜索字符串、compare:0使用二分搜索、1区分大小写)函数Left$("123456", Instr("123456", "56")) 2、VB...

vb语言中字符串指定位置替换函数?
代码如下:Dim a As Stringa = "0101010"Mid(a, 3, 1) = "1"Print a显示结果就是:0111010

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("...

VB代码(将字符串中的字符s替换为字符t)
Str0 = "12s345s678s9s"For i = 1 To Len(Str0)If Mid(Str0, i, 1) = "s" Then str1 = str1 & "t"Else str1 = str1 & Mid(Str0, i, 1)End If Next MsgBox str1

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

vb字符串全字匹配替换
dim str1,str2 as string str1=left(str,len(str)-10)---除后面10个字符外前面的所有字符 str2=right(str,9)---后面9个字符 str=str1 & "-" & str2

相似回答