如何使用commandbutton在文本框中添加空格

Question

我正在尝试创建一个可以在文本框中插入空格的程序 使用命令按钮，但它根本不起作用。有没有可以做到的代码？

我的代码只为文本框设置一个值，它只能在我真正想要的是每次单击按钮时插入空格。

这是我的简单代码：

enter code here
Dim space As String = Space(1)
Text1.Text = space

Answer 1

Text1.Text = Text1.Text & " "

Answer 2

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ' Button was clicked, add a space to the textbox...
    Textbox1.Text = Textbox1.Text & " "

    ' OR...
    '  Textbox1.AppendText(" ")
    ' OR...
    '  Textbox1.AppendText(Space(1))
End Sub

等。

Answer 3

private sub cmd_sps_click()
Text1.Text = Text1.Text & " "
text1.startposition = text1.length+1
end sub