NAO CONSIGO FAZER O SALTO DE LINHA NO TXTBOX

COQUITO 08/10/2016 12:58:05
#467952
ola pessoal

boa tarde tudo bem?

estou tentando fazer um salto de linha num textbox no modo multiline
quero que dentro do textbox carrega os seguinte

codigo
nome
placa
data de entrada
hora de entrada

ficaria assim exemplo

textbox = [Ô]codigo: [Ô]& codigo
textbox = [Ô]nome: [Ô]& nome
textbox = [Ô]placa: [Ô]& placa
textbox = [Ô]data : [Ô]& data de entrada
textbox = [Ô]hora : [Ô]& hora de entrada

quero que me mostre desse jeito no , tipo um visualizador.

assim cada vez que eu for confirmar o cadastro me carrega as inforaçoes no textbox vizualiando os dado que preciso.
tal como este do lado direito coforme o exemplo
NILSONTRES 08/10/2016 16:02:54
#467953
Já ouviu falar em System.Text ?
Dim meutexto As New System.Text.StringBuilder
meutexto.Append([Ô]Valor1[Ô] & vbCrLf )
meutexto.Append([Ô]Valor2[Ô] & vbCrLf )
MsgBox(meutexto.ToString)

isso salta a linha & vbCrLf
DS2T 09/10/2016 22:31:41
#467960
Se for usar StringBuilder, nem precisa do vbCrLf... ele já tem um método chamado AppendLine.
NILSONTRES 09/10/2016 23:34:21
#467967 Resposta escolhida
Citação:

Se for usar StringBuilder, nem precisa do vbCrLf... ele já tem um método chamado AppendLine.


Tem razão, é que queria ensinar também o salto.
DS2T 10/10/2016 10:08:28
#467974
Entendi.
Quando vou usar alguma quebra de linha, costumo fazer assim:

System.Environment.NewLine

Motivo?
O fato de ser parte do framework, e não apenas da linguagem. Acho que fica mais universal, sabe?
Boiolice da minha parte? Talvez...
COQUITO 10/10/2016 10:38:13
#467975
gente na tela sai desse jeito

Citação:

[ô]exibir o textbox resultado
MeuTexto.Append(vbCrLf)
MeuTexto.Append([Ô]---------------------------------------------------------------------------------[Ô] & vbCrLf)
MeuTexto.Append([Ô] Saida - EAR [Ô] & vbCrLf)
MeuTexto.Append([Ô] Detalhe do Serviço [Ô] & vbCrLf)
MeuTexto.Append([Ô]---------------------------------------------------------------------------------[Ô] & vbCrLf)
MeuTexto.Append([Ô] Cupom: [Ô] & lblCodigoEntrada.Text & vbCrLf)
MeuTexto.Append([Ô] Placa: [Ô] & My.Forms.frmSaidaVeiculo.txtIdentificacaoVeiculo.Text & vbCrLf)
MeuTexto.Append([Ô] Data: [Ô] & My.Forms.frmSaidaVeiculo.txtDataEntrada.Text & [Ô] [Ô] & [Ô] Hora: [Ô] & My.Forms.frmSaidaVeiculo.txtHoraEntrada.Text & vbCrLf)
MeuTexto.Append([Ô] Cod. Preço: [Ô] & My.Forms.frmSaidaVeiculo.cod_preco & [Ô] [Ô] & [Ô] cód. Setor: [Ô] & My.Forms.frmSaidaVeiculo.cod_setor & vbCrLf)
MeuTexto.Append([Ô] Operador: [Ô] & Str_Usuario & vbCrLf)
MeuTexto.Append(vbCrLf)
MeuTexto.Append([Ô]---------------------------------------------------------------------------------[Ô] & vbCrLf)
MeuTexto.Append([Ô] Documento Auxiliar de Nota Fiscal de Consumidor Eletrônica [Ô] & vbCrLf)
MeuTexto.Append([Ô]---------------------------------------------------------------------------------[Ô] & vbCrLf)

Tópico encerrado , respostas não são mais permitidas
Voltar