VB resultaten op een rijtje

Thread View: be.comp.programming

1 messages

[T] Back to Threads [V] Tree View [G] Group Articles

1 total messages Started by Ward Wed, 18 Apr 2007 17:23

#506

Author: Ward
Date: Wed, 18 Apr 2007 17:23

34 lines
2200 bytes

Ik ben een beetje aan het leren programmeren in Visual Basic en ik heb 
een programmaatje gemaakt om de delers van een getal te zoeken. Dit is 
het programma:

         'declaratie variablen + invoer

         Dim SNGgetal As Single
         SNGgetal = InputBox("geef een getal om de delers van te zoeken")
         If SNGgetal = 0 Then End
         Dim SNGtest As Single
         SNGtest = 2
         Dim SNGdeler As Single
         SNGdeler = 0
         Dim SNGdeling As Single

         'verwerking

         'verwerking (lus) + uitvoer

         Do While SNGtest > 1
             SNGdeler = SNGdeler + 1
             SNGdeling = SNGgetal / SNGdeler
             SNGtest = SNGgetal / SNGdeler

             If SNGdeling = Int(SNGdeling) Then MsgBox(SNGdeler)

         Loop

Als ik dit nu ga uitvoeren wordt er iedere keer als een deler is 
gevonden een bericht gegeven met die deler. Nu zou ik graag hebben dat 
al die delers op het einde in een rijtje worden weer gegeven. Is dit 
mogelijk? en hoe?

W.

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads