积极答复者
vb.net replace

问题
-
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickDim a As StringDim c As String = "Name="Label1.Text = "Name = ckjason"a = Label1.TextIf InStr(1, a, c) Then Label2.Text = Replace(a, c, "")
End Sub为什么label2没有变化,应该会显示ckjason?
答案
-
你好
這是因為你在 以下的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.TextIf InStr(1, a, c) Then Label2.Text = Replace(a, c, "")
或
Dim a As StringDim c As String = "Name="Label1.Text = "Name=ckjason " ' 去除了空格
a = Label1.TextIf 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
全部回复
-
你好
這是因為你在 以下的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.TextIf InStr(1, a, c) Then Label2.Text = Replace(a, c, "")
或
Dim a As StringDim c As String = "Name="Label1.Text = "Name=ckjason " ' 去除了空格
a = Label1.TextIf 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