nombre premier visual basic

nombre premier visual basic - VB/VBA/VBS - Programmation

Marsh Posté le 22-04-2009 à 18:33:26    

Bonjours,
 
Je voudrais faire un programme qui affiche les nombres premiers.
 
Pour l'instant j'ai ca comme code
 
Dim intdevide, intguess, intA, intB, intC, intD As Integer
        Dim stroutput As String
        stroutput = ""
 
 
        For intguess = 3 To 100
 
            For intdevide = 2 To intguess - 1
 
                intA = intguess \ intdevide
                intB = intdevide * intA
                intC = intguess - intB
                If intC = 0 Then
                    stroutput = stroutput & intguess & " "
 
                End If
 
            Next
             
        Next
 
 
 
 
        Lblresult.Text = stroutput
 
 
Donc le programme isole tous les nombres pas premiers et les met dans ma strouput et l'affiche mais je voudrais les isole pour pas les afficher au contraire. ou alors isole les nombres premiers pour les afficher dirrectement.
 
J'avais essaye quelques trucks avec un while loop mais j'avais pas reussis et la je suis un peu bloque.
 
Merci.

Reply

Marsh Posté le 22-04-2009 à 18:33:26   

Reply

Marsh Posté le 23-04-2009 à 20:43:21    

Reply

Marsh Posté le 25-04-2009 à 19:04:27    

D'apres ce que j'ai vue c'est pas possible de le faire avec while ou for loops donc je peux pas faire ca pour mon projet.
 
Merci.

Reply

Marsh Posté le 25-04-2009 à 23:27:49    

Salut, une adaptation rapide des 2 liens donnés plus haut
http://cjoint.com/?eBnfP5fmAu , à toi de poursuivre

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed