programma opslaan of saven

[old Hippy]

hallo allmaal
ik ben zins een week met visual basic bezig.
En heb een Programmatje gemaakt.
Nu wil ik graag dat er twee textboxen het ingegeven getal onthouden
dus als ik het programma opnieuw opstart er de laatste gegevens in staan

wie O wie kan mij hier bij behulpzaam zijn.
alvast bedankt.

 

[The Mighty Atom]

Er zijn tig manieren om dit te doen, de een wat simpeler te programeren dan de ander.

Welke omgeving gebruik? Ik kan je alleen helpen als je .NET 2005 gebruikt...

 

[old Hippy]

Hi Bedankt voor je reactie
ik gebruik Visual Basic 2008 Express Edition.
ik hoop je mij daar mee kan helpen ?
maar welk net ik gebruik ?????.NET waar kan ik dit eventueel vinden

 

[goldjulos]

lol .net is een vorm van programmeren maar ik denk dat je het het best opslaat in een .ini file?

 

[old Hippy]

Kan je mij hier een voorbeeld van geven hoe ik dit voor elkaar krijg?

 

[The Mighty Atom]

Ikzelf gebruik 2005, dus dat gaat wel werken.

Ik maak gebruik van het Windows Register om control settings in op te slaan. Het is vrij simpel, ik kan wel een voorbeeldje in elkaar prutsen voor je, maar dat gaat wel even tijd kosten.

 

[old Hippy]

hi The Mighty Atom
Ik zou je heel dankbaar zijn en kan dan weer verder.
ik wacht met belangstelling af
alvast bedankt :thumb:

 

[The Mighty Atom]

Ok, geef me een dag of twee om een voorbeeldje in elkaar te flansen...

 

[old Hippy]

ben er blij mee alvast bedankt

 

[ReneDirks]

In 2005 (en neem dus aan ook in 2008) kun je applicatiesettings definieren. Deze kun je dan benaderen door

'bij het afsluiten van het programma:
My.Settings("Tekst1") = me.textbox1.text
My.Settings("Tekst2") = me.textbox2.text
My.Settings.Save

'bij het laden van het programma
me.textbox1.text=My.Settings("Tekst1")
me.textbox2.text=My.Settings("Tekst2")

Je kunt deze settings op gebruikersniveau of applicatie niveau opslaan

 

[old Hippy]

misschien niet slim maar waar plaats ik deze code?

 

[ReneDirks]

Ervan uitgaande dat je een hoofdformulier hebt met de naam Form1:

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        My.Settings("Tekst1") = Me.textbox1.text
        My.Settings("Tekst2") = Me.textbox2.text
        My.Settings.Save()
    End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.textbox1.text = My.Settings("Tekst1")
        Me.textbox2.text = My.Settings("Tekst2")
    End Sub

 

[old Hippy]

Hi bedankt maar bij Form1_Load geeft hij dat hij de tex1 eigenschap niet kan vinden?

 

[ReneDirks]

Ik weet natuurlijk niet hoe jouw controls (in dit geval dus de Textboxen) heten...

 

[old Hippy]

'Berekend de prijs in dollars
If RadioButton1.Checked = True Then
Dim Koers, Aantal, verzendkosten, prijs
Dim PrijsinEuro
Koers = Val(TextBox1.Text)
Aantal = Val(TextBox2.Text)
verzendkosten = Val(TextBox3.Text)
prijs = Val(TextBox4.Text)
PrijsinEuro = Val(TextBox5.Text)

Hier bij de namen van de textboxen die in een button staan.
prettig zou het dus zijn dat het programma de koes bewaard.

en de fout melding is
Kan de eigenschap voor instellingen Koers niet vinden.

 

[ReneDirks]

Koers is geen Textbox maar een variabele van het type Variant, omdat je 'm niet gedeclareerd hebt (als bv double). Je zou dus wel de waarde van Textbox1 en Textbox2 kunnen bewaren. Je moet waarschijnlijk in de projecteigenschappen wel twee 'placeholders' maken voor deze variabelen:
rechtsklikken op je projectnaam in de Solution Explorer en dan naar Settings gaan.

 

[old Hippy]

Geweldig Maar dan????
wat in de setting aan te passen???
sorrie maar ik begin pas met programeren.

 

[ReneDirks]

Je past niets aan, je maakt twee variabelen aan (voor TB1 en TB2) waar je de waardes in opslaat. Deze data wordt dan in de applicatie config file (xml) opgeslagen en niet in het register, hierdoor is je applicatie makkelijker over te zetten naar andere PC's.

Hier heb je een stap voor stap handleiding:
http://www.devcity.net/Articles/232/1/article.aspx

 

[old Hippy]

Bloed zweet en tranen de wanhoop nabij
Maar toch uiteindelijk gelukt HET WERKT
Bedankt allemaal voor jullie geduld.

 

[The Mighty Atom]

Ben je nog steeds geintereseert in mijn Register voorbeeld nu je het op een andere manier doet?