文字列の後に文字ビジュアルベーシックが続く場合は置き換えます。

Question

Visual Basicを初めて使用しています。 textboxのlike演算子を使用して、文字の後に他の文字が続く場合は、その文字を変更したいと考えています。しかし、それはkey-upイベントにあるはずです。

誰でも助けてください：どのように私は次のコードを動作させることができますか？

Public Class Form1 
Dim myString As String 
Dim sMatch As Boolean = myString Like "x?" 

Private Sub TextBox1_KeyUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp 
    If sMatch = True Then 
     TextBox1.Text = TextBox1.Text.Replace(myString, "z") 
    End If 
End Sub 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    myString = "x" 
End Sub 
End Class 

Answer 1

これを試してみてください。あなたの変数myStringは、TextBoxからその価値を得ることは決してありませんでした。 loadイベントでそれをxに設定するだけです。

Public Class Form1 
Private Sub TextBox1_KeyUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp 
    If TextBox1.Text Like "x?" Then 
     TextBox1.Text = TextBox1.Text.Replace(TextBox1.Text, "z") 
    End If 
End Sub 
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    TextBox1.Text = "x" 
End Sub 
End Class