SALVAR VALORES/TEXTOS EM UM TEXTBOX

ALTAIR148 18/03/2012 17:18:59
#397436

Boa tarde,

Você fala concatenar os campos.

Ex.:
Campo01 = [Ô]Teste[Ô]
Campo02 = [Ô]Teste01

Resultado = [Ô]Teste Teste01[Ô]

é isso?

MMARTINS 18/03/2012 22:17:00
#397447

Não, Altair!
é, por exemplo, no campo01=textbox1= [Ô]AAAA[Ô], aí quando vou no buttonclick queria que salvasse [Ô]AAAA[Ô] no textbox1. Assim, todas as vezes que entrar no programa, o mesmo me retornasse ao último valor salvo. Entendeu?

Abraço,
MMartins

PHOENIX209E 19/03/2012 02:36:01
#397464 Resposta escolhida

Só usar o SaveSettings e o GetSettings:

Basta voce usar este codigo:

Public Class Form1

Dim VALOR As String
Sub New()
[ô] This call is required by the Windows Form Designer.
InitializeComponent()
[ô] Add any initialization after the InitializeComponent() call.
VALOR = GetSetting(My.Application.Info.AssemblyName, [Ô]CONFIG[Ô], [Ô]ULTIMO_VALOR[Ô])
If (VALOR <> Nothing) Then
TextBox1.Text = VALOR
End If
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If (TextBox1.Text <> Nothing) Then
SaveSetting(My.Application.Info.AssemblyName, [Ô]CONFIG[Ô], [Ô]ULTIMO_VALOR[Ô], TextBox1.Text)
Else
MsgBox([Ô]TXT VAZIO[Ô])
End If
End Sub
End Class

Voce vai salvar um valor e resgatar um valor,tudo fica gravado na chave abaixo:

HKEY_CURRENT_USER\Software\VB and VBA Program Settings\

MMARTINS 20/03/2012 09:34:42
#397599

Muito Obrigado! Deu certo!