有关MID的疑问，谢谢

Question

str1="1234567需要从新登陆"
Mid(str1, 1, 7) = "您"想把str1变为"您需要从新登陆"，用上面的办法怎么不行？？？谢谢

Answer 1

str1 = "1234567需要从新登陆"
    MsgBox Replace(str1, "1234567", "您")

Answer 2

mid是截取数，不是改变数，也可这样：    str1 = "1234567需要从新登陆"
    MsgBox Replace(str1, Mid(str1, 1, 7), "您")

Answer 3

huangjianyou(小健) ：前面有可能不是1234567，反正就是前7位

Answer 4

我查的帮助是这么说的，但是不行，奇怪了用另一个字符串中的字符替换 String 变量中指定数量的字符。Mid( _
   ByRef Target As String, _
   ByVal Start As Integer, _
   Optional ByVal Length As Integer _
) = StringExpression
各部分说明
Target 
必选。要修改的 String 变量的名称。 
Start 
必选。Integer 表达式。Target 中文本替换开始的字符位置。Start 使用从一开始的索引。 
Length 
可选。Integer 表达式。要替换的字符数。如果省略该参数，则使用所有 String。 
StringExpression 
必选。String 表达式，替换 Target 部分。 
备注
所替换的字符数始终少于或等于 Target 中的字符数。示例
本例使用 Mid 语句用一个字符串中的字符替换字符串变量中指定数量的字符。Dim MyString As String
MyString = "The dog jumps"   ' Initializes string.
Mid(MyString, 5, 3) = "fox"   ' MyString = "The fox jumps".
Mid(MyString, 5) = "cow"   ' MyString = "The cow jumps".
Mid(MyString, 5) = "cow jumped over"   ' MyString = "The cow jumpe".
Mid(MyString, 5, 3) = "duck"   ' MyString = "The duc jumpe".

Answer 5

第二种就行了：str1 = "1234567需要从新登陆"
MsgBox Replace(str1, Mid(str1, 1, 7), "您")

Answer 6

huangjianyou(小健)：我知道了，谢谢，但是还是没弄懂MSDN的帮助怎么不行，怪

Answer 7

你那个是MID语句，不是MID函数。^_^

Answer 8

huangjianyou(小健)：mid语句跟函数有什么区别？

Answer 9

Private Sub Command1_Click()
    Dim str1 As String
    str1 = "1234567需要从新登陆"
    Mid(str1, 1, 7) = Space(6) & "您"
    MsgBox Trim(str1)
End Sub'要用同一个数量的字符串替换的。

Answer 10

Mid 语句：在一 Variant (String) 变量中以另一个字符串中的字符替换其中指定数量的字符。Mid 函数：返回 Variant (String)，其中包含字符串中指定数量的字符。