none
vb.net replace RRS feed

  • 问题

  •  Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            
            Dim a As String
            Dim c As String = "Name="
            Label1.Text = "Name = ckjason"
            a = Label1.Text
            If InStr(1, a, c) Then Label2.Text = Replace(a, c, "")

    End Sub
    为什么label2没有变化,应该会显示ckjason?
    2010年8月6日 15:28

答案

  • 你好

     

    這是因為你在 以下的CODE 在 NAME 和 "=" 中間的 空格 " "

    E.G. Dim c As String = "Name="

    如果你將這句改成 Dim c As String = "Name ="

    便可以了

    E.G.

     

    Dim a As String

            Dim c As String = "Name = " ' 加一個空格
            Label1.Text = "Name = ckjason"
            a = Label1.Text
            If InStr(1, a, c) Then Label2.Text = Replace(a, c, "")



    Dim a As String
            Dim c As String = "Name="
            Label1.Text = "Name=ckjason " ' 去除了空格
            a = Label1.Text
            If InStr(1, a, c) Then Label2.Text = Replace(a, c, "")

    因為個字串要 一樣才可以REPLACE 的

    Please correct me if my concept is wrong


    Chi
    • 已标记为答案 ckjason 2010年8月6日 19:25
    2010年8月6日 16:50
    版主

全部回复

  • 你好

     

    這是因為你在 以下的CODE 在 NAME 和 "=" 中間的 空格 " "

    E.G. Dim c As String = "Name="

    如果你將這句改成 Dim c As String = "Name ="

    便可以了

    E.G.

     

    Dim a As String

            Dim c As String = "Name = " ' 加一個空格
            Label1.Text = "Name = ckjason"
            a = Label1.Text
            If InStr(1, a, c) Then Label2.Text = Replace(a, c, "")



    Dim a As String
            Dim c As String = "Name="
            Label1.Text = "Name=ckjason " ' 去除了空格
            a = Label1.Text
            If InStr(1, a, c) Then Label2.Text = Replace(a, c, "")

    因為個字串要 一樣才可以REPLACE 的

    Please correct me if my concept is wrong


    Chi
    • 已标记为答案 ckjason 2010年8月6日 19:25
    2010年8月6日 16:50
    版主
  • 嗯,顶LS了,别以为那是模糊搜索,你看好了"Name="和"Name ="是不一样滴。必须去掉后面的那个的空格或者在前面的加上一个空格,保持一致。
    2010年8月7日 9:19