Isabella011
Messages postés2Date d'inscriptionmercredi 29 janvier 2014StatutMembreDernière intervention 4 février 2014
-
29 janv. 2014 à 15:37
cs_ShayW
Messages postés3253Date d'inscriptionjeudi 26 novembre 2009StatutMembreDernière intervention 3 décembre 2019
-
4 févr. 2014 à 17:32
Bonjour,
Je suis débutante et je me suis lancée dans la programmation d'un petit logiciel de conversion de décimal à binaire.
Voici mon code:
Public Sub ConvertirDecToBin(ByVal nombre As String, ByRef b32 As Integer, ByRef b16 As Integer, _ ByRef b8 As Integer, ByRef b4 As Integer, ByRef b2 As Integer, ByRef b1 As Integer)
Dim iReste As Integer Dim tabBits(5) As Integer Dim Q As Integer Dim i As Integer
For i = 0 To 5 tabBits(i) = 0 Next
Q = 0 iReste = 0 i = 0 nbCur = nombre
Do tabBits(i) = Q Mod 2 Q = (Q - Q Mod 2) / 2 i = i + 1
Loop Until Q = 0
If Q = 0 Then
End If
Dans ma textbox où je dois obtenir mon nombre en binaire j'ai "000000"
Si quelqu'un pouvais m'éclairée ce serait super!
Merci d'avance
Bonjour
Estce bien du vb.net ?
Cela ressemble plus à du vb6 qu'à du vb.net
En plus ton algo à l'air compliqué 2 boucles ,10 parametres
Je te conseille de réecrire ton algo fais simple
aussi si tu codes en vb.net tu obtiens tout simplement
la conversion en binaire
Dim binary As String Dim number As Int64 number = 999999999999 binary = Convert.ToString(number, 2)