none
linhas na textbox RRS feed

  • Pergunta

  • Boa tarde:

    Tenho um textbox com o nome de "txtresultado" que recebe o valor de outras 10 textbox.

    Gostaria que a textbox"txtresultado" aceitasse somente 10 letras em cada linha, ou seja quando preencher 10 letras pular pra linha de baixo,

    e assim por diante.

    Desde ja agradeço a todos...


    W&L

    domingo, 16 de dezembro de 2012 20:24

Respostas

  • Tenta fazer assim

    If len(txtresultado.text) > 10 then

    'teu código que preenche o txtresultado.text

    else


    Environment.NewLine

    'teu código que preenche o txtresultado.text

    end if

    Aqui é só vc ir adaptando confor vc deseja

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            If Len(TextBox1.Text) > 10 Then

                TextBox1.Text = TextBox1.Text + Environment.NewLine + TextBox2.Text + TextBox3.Text + TextBox4.Text
            Else
                TextBox1.Text = TextBox1.Text + TextBox2.Text + TextBox3.Text + TextBox4.Text

            End If
        End Sub

    Espero ter ajudado

    sexta-feira, 18 de janeiro de 2013 02:38

Todas as Respostas

  • É um projeto Web ou Winforms?

    Att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    Sogi informatique ltée

    domingo, 16 de dezembro de 2012 20:33
    Moderador
  • Winforms

    W&L

    domingo, 16 de dezembro de 2012 20:35
  • nao sei se entendi sua questao nao e so fazer assim:

    if textbox.text.lengh =7 then

    textbox1.setfocus


    A flower cannot blossom without sunshine, and man cannot live without love.

    domingo, 16 de dezembro de 2012 22:45
    Moderador
  • Eu quero que ao preencher o textbox quando totalizar 10 letras passa para linha de baixo.

    Exemplo:

    "nome:wagner" contem 11 caracteres, o que eu quero e no caso o caracter r passaria para linha de baixo tipo assim

    "nome:wagne

    r" ai ele contaria nesta linha ate 10 e passaria pra linha de baixo de novo


    W&L

    segunda-feira, 17 de dezembro de 2012 01:19
  • Tenta fazer assim

    If len(txtresultado.text) > 10 then

    'teu código que preenche o txtresultado.text

    else


    Environment.NewLine

    'teu código que preenche o txtresultado.text

    end if

    Aqui é só vc ir adaptando confor vc deseja

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            If Len(TextBox1.Text) > 10 Then

                TextBox1.Text = TextBox1.Text + Environment.NewLine + TextBox2.Text + TextBox3.Text + TextBox4.Text
            Else
                TextBox1.Text = TextBox1.Text + TextBox2.Text + TextBox3.Text + TextBox4.Text

            End If
        End Sub

    Espero ter ajudado

    sexta-feira, 18 de janeiro de 2013 02:38