Ga naar inhoud

jesskeuh01

Lid
  • Items

    12
  • Registratiedatum

  • Laatst bezocht

Alles dat geplaatst werd door jesskeuh01

  1. Ik heb het probleem opgelost.. Maar op een andere manier dan jij had voorgesteld. Toch bedankt voor de hulp!
  2. Goh, mijn volgende oefening is dus ook niet simpel.. Kan iemand mij zeggen waar mijn fout zit? Het programma berekent geen 'totaal' en zegt steeds dat het "0" is. De bedoeling is dat er een soort van kassa wordt geschreven waarbij de prijs en het aantal stuks worden ingegeven. Het te betalen bedrag voor dat artikel wordt in een groot tekstvak ernaast geplaatst. Zo worden er verschillende artikelen toegevoegd. Onderaan, bij totaal dient dan het bedrag te komen dat de klant moet betalen. Dit is mijn code: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnToevoegen.Click ' Declaratie van variabelen. Dim aantalStuks As Integer Dim prijs As Decimal Dim teBetalen As Decimal Dim totaal As Decimal Dim Subtotaal As Decimal ' Gegevens van tekstvakken omzetten in variabelen. prijs = CDec(txtPrijs.Text) aantalStuks = CInt(txtAantalStuks.Text) 'Berekenen van het te betalen bedrag per artikel. teBetalen = prijs * aantalStuks txtTeBetalen.Text = txtTeBetalen.Text & teBetalen.ToString & vbCrLf Do While teBetalen = prijs * aantalStuks teBetalen = Subtotaal Subtotaal = totaal Loop ' Weergeven van het totaal te betalen bedrag. txtTotaal.Text = totaal.ToString
  3. ok, ik snap dus volledig wat ik fout heb gedaan. Eigenlijk klopte hetgeen moest gebeuren als er aan de voorwaarde voldaan was, maar waren mijn condities niet juist opgesteld. Nu werkt het. Merci!!
  4. Dit heb ik nu.. maar er gebeurt nog steeds niets.. ' Declaratie van de variabelen. Dim eerstegetal As Integer Dim tweedegetal As Integer Dim som As Integer = 0 ' Gegevens van tekstvakken omzetten naar variabelen. eerstegetal = CType(txtEersteGetal.Text, Integer) tweedegetal = CType(txtTweedeGetal.Text, Integer) ' Berekenen van de som. Do While eerstegetal <= tweedegetal som = eerstegetal + 1 Loop ' Weergave van uitkomst. txtSom.Text = som.ToString Ik weet echt niet wat ik fout doe.. Grtz
  5. Oeps, ja ik was dus vergeten te zeggen wat er fout gaat. Het programma berekent de som niet en ik krijg ook geen foutmelding.
  6. Hallo iedereen Ik weet niet of het hier thuishoort, maar ik heb een probleem met mijn oefening voor de avondschool. Wij moeten een oefening maken waarbij de gebruiker 2 gehele getallen ingeeft, waarvan het eerste getal kleiner dan of gelijk is aan het tweede. De computer berekent de som van de getallen vanaf het eerste getal tot en met het tweede getal. Dus er wordt bijvoorbeeld 5 en 10 ingegeven, dan berekent de computer: 5 + 6 + 7 + 8 + 9 + 10 = 45. Die 45 dient in een apart tekstvak weergegeven te worden. Dit is mijn voorlopige code. Private Sub btnBerekenen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBerekenen.Click ' Declaratie van de variabelen. Dim eerstegetal, tweedegetal, som As Integer ' Gegevens van tekstvakken omzetten naar variabelen. eerstegetal = CType(txtEersteGetal.Text, Integer) tweedegetal = CType(txtTweedeGetal.Text, Integer) ' Berekenen van de som. Do While tweedegetal = eerstegetal som = som + eerstegetal eerstegetal = eerstegetal + 1 Loop ' Weergave van uitkomst. txtSom.Text = som.ToString Ik hoop dat er iemand mij kan zeggen waar mijn fout zit.. Groetjes, Jessica
  7. Het is onmogelijk om de Linksys in te stellen voor alle PC's. Deze staat immers in de slaapkamer om het signaal van wifi (telenet) door te sturen naar daar. De pc in de woonkamer moet wel rechtstreeks verbonden blijven met de modem van Telenet. Het heeft altijd zo gewerkt.. Ik vraag me af waarom nu plots niet meer? x
  8. Dus volgens jou moet de kabel wel in de WAN-poort? De kabel van modem naar router is een UTP-kabel. Weet wel dat alles hiervoor correct werkte!
  9. Hallo iedereen Ik zit eigenlijk met een probleem waar blijkbaar velen last van hebben, maar welke oplossingen ik probeer het lukt me niet om het op te lossen. Het probleem zit zo: Wij hebben: - een modem van Telenet met abonnement ExpressnetXL daarvan vertrekt 1 kabel rechtstreeks naar een pc, hiermee is ook geen probleem! een linksys router, die we willen instellen als switch omdat we anders op onze achterste kamers geen verbinding hebben. Op de kamers hebben we een desktop met windows vista (internet moet via kabel) en een laptop met windows xp (internet draadloos). Dit heeft altijd gewerkt, mits de juiste instellingen. Dus DHCP-server uit, IP-adres veranderen. Nu heeft mijn vriend laatst de linksys even zonder stroom gezet en zegt hij constant "beperkte of geen verbindingsmogelijkheden". Normaal gezien kunnen de instellingen niet weg zijn door enkel de stroom die wegvalt, maar om er zeker van te zijn dat er niets mis mee was, heb ik hem een reset gegeven en terug ingesteld. Nu gaf hij nog steeds hetzelfde probleem aan... tot gisteren. We hebben op de achterste kamers verbinding met linksys, maar geen internet. En de desktop zegt dat hij is verbonden met 2 netwerken. Terwijl er enkel een kabel insteekt die alleen van de linksys komt. En nee de kabel die van de modem komt van Telenet steekt niet in de WAN van linksys, maar in een PC-poort. Ik hoop dat iemand mij kan helpen, want ik word er zot van! Met vriendelijke groeten en alvast bedankt voor diegene die zo vriendelijk is om mij raad te geven!
  10. Hey Het probleem is opgelost. Blijkbaar moet je eerst het IP-adres van de Linksys veranderen. Daarna de DHCP-server op disable zetten. Door deze server uit te zetten werkt de linksys eigenlijk alleen als router. Groetjes
  11. Hallo Wij zitten hier sinds kort met een probleem. Wij hebben een modem van belgacom met een wit deksel waarbij men zowel draadloos als met draad kan surfen. Wij hebben 1 PC waarmee we met draad werken, hierop gaat internet perfect. Omdat het bereik van Wifi niet zo goed is, willen we aan de modem een Linksys WAG200G koppelen om zo draadloos internet te hebben op plaatsen waar het nu niet mogelijk is. Nu is mijn vraag: hoe begin je hieraan? Hopelijk kan iemand mij dat uitleggen. Groetjes en alvast bedankt!! Jessica
×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.