🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #6908

VB.Net en tabellen

#6908
From: Christian
Date: Fri, 01 Nov 2002 01:15
85 lines
2312 bytes
Hallo,



Deze oefening is geschreven in de ConsoleApplication van VB.Net.

Als resultaat van de uitvoering hiervan verkrijgt men op het scherm, onder
elkaar drie tabellen waarin deze getallen staan geschreven :



1 2 3 4 5 6 7 8 9 10

10 9 8 7 6 5 4 3 2 1

10 9 8 7 6 6 7 8 9 10



Het probleem is echter dat bij de laatste tabel de getallen niet mogen
geschreven worden zoals ik het gedaan heb, maar dat de waarden vanuit de
tabel tblTABELA(intXA) en tblTABELB(intXB)moeten worden afgeleidt. Dit lukt
echter niet, heeft iemand soms wat advies aub?

Alvast bedankt,



Christian.





 Sub main()



        Dim intXA As Integer = 9

        Dim intXB As Integer = 9

        Dim tblTABELA(intXA) As Integer

        Dim tblTABELB(intXB) As Integer



        For intXA = 0 To 9

            tblTABELA(intXA) = intXA + 1

            Console.Write(tblTABELA(intXA) & " ")

        Next



        Console.WriteLine()



        For intXB = 9 To 0 Step -1

            tblTABELB(intXB) = intXB + 1

            Console.Write(tblTABELB(intXB) & " ")

        Next



        Console.WriteLine()



        Console.Write("10 9 8 7 6 6 7 8 9 10")



        Console.ReadLine()



   End Sub
Technical Details
Message-ID: <rAkw9.189870$8o4.30237@afrodite.telenet-ops.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!syros.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,244edbcd8683cd7f,start
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-10-31 17:22:01 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!syros.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "Christian" <Christian.Rosseel@pandora.be>
Newsgroups: be.comp.programming
Subject: VB.Net en tabellen
Lines: 88
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2720.3000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <rAkw9.189870$8o4.30237@afrodite.telenet-ops.be>
Date: Fri, 01 Nov 2002 01:15:03 GMT
NNTP-Posting-Host: 213.118.114.123
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1036113303 213.118.114.123 (Fri, 01 Nov 2002 02:15:03 MET)
NNTP-Posting-Date: Fri, 01 Nov 2002 02:15:03 MET
Organization: Telenet Internet