操作方法:使用退格键从一个文本框中删除一个字符,它将从其他文本框中删除多个字符

时间:2012-05-20 18:22:03

标签: vb.net

Private Sub txtInput_KeyPress(ByVal sender As Object, ByVal e As    System.Windows.Forms.KeyPressEventArgs) Handles txtInput.KeyPress

Dim len As Integer

 len = txtCode.Text.Length

If (Asc(e.KeyChar) = 65 Or Asc(e.KeyChar) = 97) Then

        txtCode.Text += "Acer" & " "

    ElseIf (Asc(e.KeyChar) = 66 Or Asc(e.KeyChar) = 98) Then
        txtCode.Text += "King" & " "

    ElseIf (Asc(e.KeyChar) = 8) Then
        Try
            txtCode.Text = txtCode.Text.Remove(len - 4, len)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
     End If

     End Sub

我没有发布图片的权限,所以请考虑一下

我想从第一个文本框中删除“b”,我应该从第二个文本框中删除“King” 每个单词的长度是相同的“Acer”“King”它总是4个长度

但我收到了以下错误

“索引和计数必须引用字符串中的位置。 参数名称:count“

我也尝试将另一个变量dim c替换为“len-4”为整数= len-4

1 个答案:

答案 0 :(得分:0)

textbox2.text = left(textbox2.text,len(textbox2.text)-4)

这基本上剥离了textbox2的最后4个字符。