Alguem me ajuda por favor

Question

Assim:

quero por só um textbox e dois button....

quando eu clicar no botão "x" quero que apareça um texto no Textbox e quando clicar no botão "y" quero que muda o texto no texbox.

os textos que eu querer 

entendeu?

para melhor entender tenh dois prints:

Bom é isso 

Quero fazer exatamente como as imagens acima...(não sei se é textbox msm que se usa mais quero que o usuario possa selecionar uma frase)

ah e também quero que o usuario não poder escrever no textbox

obg

Answer 1

Para não poder escrever no Textbox:

Mude a propriedade dele ReadOnly para True

ou

Me.TextBox1.ReadOnly = True

Answer 2

Segue código de exemplo:

Public Class Form1

    Private Sub btnX_Click(sender As Object, e As EventArgs) Handles btnX.Click
        txtMensagem.Text = "Texto do botão X"
    End Sub

    Private Sub btnY_Click(sender As Object, e As EventArgs) Handles btnY.Click
        txtMensagem.Text = "Texto do botão Y"
    End Sub
End Class

Altere a propriedade ReadOnly do textBox para true, assim o usuário não poderá alterar o texto, somente selecioná-lo e copiar.

Quando for postar uma dúvida abra somente uma thread e aguarde as respostas, assim o fórum fica mais organizado.

---

Leonardo Garcia
[e-mail]

Answer 3

Segue código de exemplo:

Public Class Form1

    Private Sub btnX_Click(sender As Object, e As EventArgs) Handles btnX.Click
        txtMensagem.Text = "Texto do botão X"
    End Sub

    Private Sub btnY_Click(sender As Object, e As EventArgs) Handles btnY.Click
        txtMensagem.Text = "Texto do botão Y"
    End Sub
End Class

Altere a propriedade ReadOnly do textBox para true, assim o usuário não poderá alterar o texto, somente selecioná-lo e copiar.

Quando for postar uma dúvida abra somente uma thread e aguarde as respostas, assim o fórum fica mais organizado.

---

Leonardo Garcia
[e-mail]

Bom muito obrigado resolveu meu problema...

Mais eu quero adicionar umas 10 frases num mesmo textbox como faço?

como você explicou so da para adicionar uma frase e quero que tenha scroll

obg

Answer 4

Segue código de exemplo:

Public Class Form1

    Private Sub btnX_Click(sender As Object, e As EventArgs) Handles btnX.Click
        txtMensagem.Text = "Texto do botão X"
    End Sub

    Private Sub btnY_Click(sender As Object, e As EventArgs) Handles btnY.Click
        txtMensagem.Text = "Texto do botão Y"
    End Sub
End Class

Altere a propriedade ReadOnly do textBox para true, assim o usuário não poderá alterar o texto, somente selecioná-lo e copiar.

Quando for postar uma dúvida abra somente uma thread e aguarde as respostas, assim o fórum fica mais organizado.

---

Leonardo Garcia
[e-mail]

Bom muito obrigado resolvei meu problema...

Mais eu quero adicionar umas 10 frases num mesmo textbox como faço?

como você explicou so da para adicionar uma frase e quero que tenha scroll

obg

Mude a propriedade Multiline do textBox para true;

---

Leonardo Garcia
[e-mail]

Answer 5

Obrigado mais uma vez