Archief - [PROG][VB.NET] Mijnenveger (opdracht toekennen aan knop)

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.

Krueger

Legacy Member
killgore zei:
:offtopic: Nee, maar xml is wel handiger (duidelijker) voor vrij grote hoeveelheden data bij te houden & zeker als je met een zekere vorm van parent/children zit.

Dan is het maar logisch dat je in een app een vorm van continuïteit gebruikt en voor zowat het meeste xml gebruikt?

Ik bouw meestal gewoon zowel .xml als .ini reader & writer in zodat ik kan switchen.
Maar in dit geval is XML toch overkill? Het lijkt me zo mee willen doen met de laatste trend, terwijl het simpeler ook mogelijk is.

Obliv`

Legacy Member
Krueger zei:
Waarom perse een XML bestand. Is dat formaat volgens jou zou uitmuntend veel beter dan andere formaten om de combinatie user-tijd bij te houden?

Omdat zowat elke programmeertaal makkelijke toegang biedt tot xml-bestanden. En met xpath kan je dan ook gaan filteren etc.

sabaoth

Legacy Member
Wel hoe ik het heb gedaan is met een streamreader/writer gewoon in een txt bestand

Code voor het schrijve van de score:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As New StreamWriter("score.txt", True)
s.WriteLine(lblPunten.Text & " - " & txtNaam.Text)
s.Close()
End Sub

en als ik ze in een textbox ofzo wil zetten:

Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim s As New StreamReader("score.txt")
Dim scores As New ArrayList
Dim o As String
Dim i As Integer

o = s.ReadLine
Do Until o Is Nothing
scores.Add(o)
o = s.ReadLine
Loop
scores.Sort()
For i = scores.Count - 1 To 0 Step -1
Label2.Text &= scores(i) & vbCrLf
Next
s.Close()
End Sub

Eerst in array zette, daarna sorteren en daarna op de label zette in de omgekeerde richting want hij soorteert ze van laag naar hoog :)
zo heb ik de mijne toch gemaakt :p

*edit*
Die twee zijn allebij in een aparte form btw. toch maar even melde :p
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan