algo convertion decimal binaire

algo convertion decimal binaire - Algo - Programmation

Marsh Posté le 10-12-2006 à 14:45:47    

Bonjour,
 
Je sais que ce sujet n'est peu etre mal venu dans ce forum mais j'aimerais avoir un peu d'aide
 
J'aimerais faire un programme sous VB afin de convertir un nombre decimal en binaire ceci par soustraction successive
 
Je suis debutant dans le domaine de la programmation
 
aurait il une personne qui pourrait m'aider
 
merci par avance

Reply

Marsh Posté le 10-12-2006 à 14:45:47   

Reply

Marsh Posté le 10-12-2006 à 19:20:49    

Toutes les questions sont les bienvenues.
 
Mais, je ne comprends pas bien la question parce qu'un nombre est un nombre. Qu'il soit décimal ou binaire, c'est la même chose. Le seul changement apparait quand on veut l'afficher. Voici donc un programme qui converti une chaine de caractères contenant un nombre représenté en base 10, en une chaine de caractères contenant un nombre représenté en base 2. Je l'ai testé en VBA et ça marche.

Private Sub B_conversion_Click()
   decim = CLng(E_decimal.Value)
   bin = ""
   For i = 31 To 0 Step -1
      If (decim < 2 ^ i Or decim <= 0) Then
         bin = bin & "0"
      Else
         bin = bin & "1"
         decim = decim - 2 ^ i
      End If
   Next i
   E_binaire.Value = bin
End Sub

Reply

Sujets relatifs:

Leave a Replay

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