Geneste weergave | Lineaire weergave

SvenB112 · 25-12-2009 23:29:22

Ik ben redelijk nieuw met VB 2008... het eerste gedeelte van het programma dat ik aan het programmeren ben is af. Het is een programma voor men pa zijn bedrijf, een fietsenstalling zodat hij makkelijk bij kan houden hoeveel plekken hij nog heeft...

ik dacht eerst gewoon het rekenmachine principe te gebruiken maar dan slaat hij niet op hoeveel plekken er aan het einde van de dag nog over zijn... Sommige fietsen blijven namelijk meer dan 1 week staan...

Dus ik heb dit gedaan:

Een text bestand waar het aantal stalling plaatsen in staat. Als je dan op de knop "Fiets Stallen" klikt dan haalt hij er 1 af en als je op "Fiets Opgehaald" klikt komt er 1 bij.

Maar nu wil ik dus zorgen dat het word weergegeven hoeveel plekken er nog zijn. Dit lukt mij niet ook al heb ik al veel geG**gled (weet niet of ik de naam mag zeggen...) en gezocht.

Tot nu toe heb ik iets gevonden maar dat werkt niet... Als ik de code invoer krijg ik geen error's/warnings maar als ik ga Debuggen dan zie je alleen het pad waar het bestand staat dus:
C:\Program Files\Teller\Stalling.txt
Maar ik wil dus dat hij weergeeft hoeveel plekken hij nog heeft dus bijvoorbeeld 200.

Wat ik tot nu toe heb voor het knopje "Fiets Stallen":

Code:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        Dim ProgramLocation As String

        ProgramLocation = "C:\Program Files\Teller\"

        Dim Nieuw As String

        Dim FileName As String

        FileName = "Stalling.txt"

        Dim StallingInhoud As String

        StallingInhoud = My.Computer.FileSystem.ReadAllText(ProgramLocation + FileName)

        If StallingInhoud = "" Then

            StallingInhoud = "200"

        End If

        Nieuw = StallingInhoud - 1

        My.Computer.FileSystem.WriteAllText(ProgramLocation + FileName, Nieuw, False)

        Dim files() As String = IO.Directory.GetFiles("C:\Program Files\Teller\", "Stalling.txt", IO.SearchOption.AllDirectories)

        ListBox1.DataSource = files

    End Sub

En voor het knopje "Fiets Opgehaald"

Code:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim ProgramLocation As String

        ProgramLocation = "C:\Program Files\Teller\"

        Dim Nieuw As String

        Dim FileName As String

        FileName = "Stalling.txt"

        Dim StallingInhoud As String

        StallingInhoud = My.Computer.FileSystem.ReadAllText(ProgramLocation + FileName)

        If StallingInhoud = "" Then

            StallingInhoud = "200"

        End If

        Nieuw = StallingInhoud + 1

        My.Computer.FileSystem.WriteAllText(ProgramLocation + FileName, Nieuw, False)

        Dim files() As String = IO.Directory.GetFiles("C:\Program Files\Teller\", "Stalling.txt", IO.SearchOption.AllDirectories)

        ListBox1.DataSource = files

    End Sub

Zoals je ziet is de 2e gedeelte na de wit regel het gedeelte wat het bestand zou moeten lezen dit doet het echter dus niet... Op de site waar ik het het gedeelte vandaan heb zeiden ze dat je een knop en een ListBox moest hebben dus van daar dat er ListBox staat.

Wie kan mij helpen?

EDIT:

ik heb het al gevonden... Dit bewijst nog maar dat ik nog niet zo bekend ben met VB 2008...

Bij beide knoppen heb ik dit vervangen:

Code:

Dim files() As String = IO.Directory.GetFiles("C:\Program Files\Teller\", "Stalling.txt", IO.SearchOption.AllDirectories)

        ListBox1.DataSource = files

door dit:

Code:

TextBox1.Text = My.Computer.FileSystem.ReadAllText(ProgramLocation + FileName)

Dus als je nu 1 van de 2 knoppen drukt laad hij de tekst opnieuw en laat hij het zien in TextBox1.
En deze code heb ik gebaseerd op de codes die ik ook heb gebruikt voor het bewerken van het tekst bestand.

feonx · 04-03-2010 16:42:18

Volgende keer zou ik een access database gebruiken als ik jou was, lijkt mij persoonlijk makkelijker dan losse tekst file's.

Cuve · 04-03-2010 16:45:53

Je numerieke waarden moet je opslaan in integers, niet in strings.

SvenB112 · 04-03-2010 16:52:19

Is dat ook handig als ik een lijst wil hebben met alle producten die ze hebben en dat je dan aan vinkt welke je gebruikt hebt zodat de prijs automatisch word opgeteld, als je dan op een knopje drukt dat hij die producten dan van het totaal aantal dat nog in het magazijn ligt en in een exel bestandje opslaat welke producten hij heeft verkocht?

beetje lange vraag...

simpel gezegd is het makkelijker dan met allemaal losse check-boxen, labels en text-boxen ?

als dat zo is dan doe ik meteen het tekst bestandje er bij.

alvast bedankt

Sven Buijsrogge

atimmer · 04-03-2010 17:23:37

(25-12-2009 23:29:22)SvenB112 schreef: geG**gled (weet niet of ik de naam mag zeggen...)

Dat mag je zeggen

(04-03-2010 16:42:18)feonx schreef: Volgende keer zou ik een access database gebruiken als ik jou was, lijkt mij persoonlijk makkelijker dan losse tekst file's.

Of beter:
Gebruik een database! Werkt tien keer beter dan textfiles!

Jou programma is niet betrouwbaar, wat nou als je vader op die knopt drukt en je programma op één of andere reden faalt. Zou van alles kunnen zijn. Dan registreert hij het niet en klopt de telling niet meer. Dan komt er een klant en die wil z'n fiets stallen en ziet dat er nog een plaats vrij is maar het systeem zegt dat er niks vrij is. Dat klopt niet.

Wat je volgens mij beter kan doen is een database maken met daarin een lijst van alle fietsenplaatsen. 1t/m200 in dit geval. Het mooiste zou zijn om een soort van kaart te hebben in je programma, waar je vader dan op kan klikken om daar een fiets neer te zetten. En ook weer om er een weg te halen.
Het is maar een idee. Misschien is dit iets te uitgebreid, maar denk er eens over na.

feonx · 04-03-2010 17:33:51

(04-03-2010 17:23:37)atimmer schreef: Of beter:
Gebruik een database! Werkt tien keer beter dan textfiles!

Access is een database!
(Toch?) Waarom zou het anders: " Access database " heten?

Voor de rest ben ik het met atimmer eens

atimmer · 04-03-2010 18:23:34

(04-03-2010 17:33:51)feonx schreef:
(04-03-2010 17:23:37)atimmer schreef: Of beter:
Gebruik een database! Werkt tien keer beter dan textfiles!

Access is een database!
(Toch?) Waarom zou het anders: " Access database " heten?

Voor de rest ben ik het met atimmer eens

Ik herschreef gewoon jouw tekst, met een ander soort stemming. Maar Access database is inderdaad een database.

SvenB112 · 04-03-2010 19:24:12

oke dat is inderdaad denk ik makkelijker ja. Dan is het handigst denk ik gewoon helemaal over nieuw te beginnen...

ik ga eens kijken of het lukt

bedankt

Sven

Joris · 05-03-2010 08:44:55

Wat dacht je van een goede cursus (msdn.microsoft.com) of een goed boek?
Want ik heb het gevoel dat je net begint en nu al dingen wilt overslaan. En mijn ervaring bewijst het keer op keer. Mensen die zichzelf leren programmeren zonder een goede basis, maken de grootste rommel omdat ze weten wat iets doet maar niet waarom het zo moet.
Snap je bijvoorbeeld ook waarom er gezegd wordt dat je getallen niet in een string mag opslaan?

Begin eens lekker met iets als een for-loop te maken die alle priemgetallen vindt van 0 tot en met 100.000.

Overigens zijn VB2008 en VB2010 meer en meer C# aan het worden. VB wordt langzaam afgestoten door MS (en terecht) als ik jou was zou me richten op C#.

Ikke · 05-03-2010 09:09:09

(05-03-2010 08:44:55)Joris schreef: VB wordt langzaam afgestoten door MS (en terecht) als ik jou was zou me richten op C#.

Heb je daar bronnen voor? Want voor zover ik weet wil Microsoft nog gewoon met vb.net verder. En Vb.Net heeft zijn eigen doelgroep. Als je simpele apps wil maken is Vb.Net echt veel makkelijker, en pas sinds 2010 begint de C# ondersteuning in de IDE gelijk te worden aan Vb.Net.

feonx · 05-03-2010 11:26:43

Als je echt begint met programmeren is VB.NET wel makkelijker te begrijpen. Aan de andere kant is het ook weer beter om C# te leren, dit omdat:
- het op veel andere talen lijkt
- linux gebruikt kan worden (mono-project)
- programmeer taal nieuwer is dan VB.NET

Toen ik vb.net beetje onder de knie had kon ik makkelijker C# leren.
En sins ik C# beheers ben ik veel makkelijker met PHP begonnen en Java gegrijp ik ook deels als ik de code bekijk.

Als ik jou was zou ik gewoon met vb beginnen en later naar C# of andere taal kijken indien je nog nooit echt geprogrameerd heb.

Ikke · 05-03-2010 12:26:52

Ik ben zelf ooit met vb.net begonnen, en had geen enkele moeite om over te stappen op iets als C# of PHP. Als je het programmeren beheerst, dan maakt de syntax weinig uit.

Vb.Net vermijden omdat het niet op de andere talen lijkt vind ik niet echt een sterk argument.

SvenB112 · 05-03-2010 18:33:15

ik heb al 2 boeken gelezen van de bibliotheek en nog 1 boek maar dat was mee rom programmeren meer te begrijpen namelijk: Programmeren voor Dummy's.

ik verander PHP scripts, ik snap wel waar alles staat maar nog niet echt de logica om het te schrijven. En ik maak scripts voor een game zodat je meer functies hebt. (die script taal zit tussen VB en C# in dacht ik, het lijkt in ieder geval veel op die.)

T was ook al weer een tijde terug dat ik het eerste bericht had geplaatst en ben vooruit gegaan vind ik. Gewoon door het steeds te proberen, wat als ik dit doe wat gebeurt er dan en wat als ik dit doe? zo ben ik aan de slag gegaan

Maar alsnog bedankt voor de tip om misschien nog wat boeken te lezen en eventueel een cursus volgen

groetjes

Sven

Ikke · 05-03-2010 18:37:15

Gewoon blijven oefenen, dan leer je het vanzelf. Als je nog vragen hebt, gewoon stellen.

SvenB112 · 05-03-2010 20:01:56

ik heb een vraagje als je met databases gaat werken slaat hij dan wel op hoeveel plaatsen er nog over zijn?

feonx · 05-03-2010 20:49:18

Het is maar net wat je wilt opslaan.
Zie: http://nl.wikipedia.org/wiki/Database
Zie: http://nl.wikipedia.org/wiki/Microsoft_Office_Access

P.S: Denk dat je wel nieuwe topic moet aanmaken indien het niets met dit onderwerp te maken heeft.

Geneste weergave \| Lineaire weergave [VB 2008] Inhoud van een text bestand in een text box?
Auteur	Bericht