salut j'ai essayer de crer une interface qui permet de convertir un entier binaire en hexadecimale mais j'ai pas reussi à faire la condition dans la premiere zone du texte (ou je met le nombre binaire) la condition que chaque entier doit etre composées des 1 et 0 l'affichage de msgbox d'erreurs .
bon maintenant il me reste de crer des courbe variant entre 0 et 1 dans un intervalle de 8 selon 000000000 et 11111111 càd 256 courbes juste donner moi une idée pour une et je vais terminer le reste merci pour votre attention j'attends de l'aide et merci d'avance.
voici mon essai:

Public Class Form1
Private Sub Convertion(ByVal strNbAconvertir As String, ByRef strResultat As String)
'Convertir le nombre envoyé et retourné un resultat
Dim intNbBase10 As Integer
NbAconvertTextBox.Text = strNbAconvertir
intNbBase10 = Convert.ToInt64(strNbAconvertir, 2)
strResultat = Hex(intNbBase10)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim strResultat As String
Dim strNbAconvertir As String

strNbAconvertir = NbAconvertTextBox.Text

Call Convertion(strNbAconvertir, strResultat)

Resultattextbox.Text = strResultat

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
End
End Sub



Private Sub NbAconvertTextBox_KeyPress1(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles NbAconvertTextBox.KeyPress
Select Case Asc(e.KeyChar)
Case Is < 8 : e.KeyChar = vbNullChar
Case 8
Case 9 To 12 : e.KeyChar = vbNullChar
Case 13 : call ... ' go étape suivante
Case 14 To 47 : e.KeyChar = vbNullChar
Case Is > 49 : e.KeyChar = vbNullChar
End Select
End Sub



Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
NbAconvertTextBox.Text = ""
Resultattextbox.Text = ""
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim NbAconvertTextBox As String

If NbAconvertTextBox = "2" Or NbAconvertTextBox = "3" Or NbAconvertTextBox = "4" Or NbAconvertTextBox = "5" Or NbAconvertTextBox = "6" Then
Or NbAconvertTextBox ="7" Or NbAconvertTextBox ="7" Or NbAconvertTextBox ="8" OrNbAconvertTextBox = "9" Then
MsgBox("erreur de valeur introduite", MsgBoxStyle.OkOnly)
End If
End Sub


End Class

Bonjour,

Les forums du Site du Zér0 disposent d'une fonctionnalité permettant de colorer et mettre en forme les codes source.
Vous avez posté un code source sans utiliser cette fonctionnalité. Pourriez-vous éditer votre message afin d'ajouter ces balises ? Pour cela, sélectionnez votre code à colorer et utilisez le bouton afin de choisir la coloration adaptée. Veillez à bien choisir le langage de programmation afin que la coloration soit pertinente.

De plus, veillez à ce que votre code soit correctement indenté.


Cela aura pour effet de "colorer" votre code et donc d'en faciliter grandement la lecture. Vous aurez ainsi beaucoup plus de chances d'avoir des réponses.

Voici un exemple de code non coloré (mauvais exemple) :

int main(int argc, char *argv[])
{
long choixOperation;

printf("Choisissez l'operation a effectuer");
/* etc. */
}

Voici maintenant le même code coloré, utilisant la balise "code" (bon exemple) :

int main(int argc, char *argv[])
{
    long choixOperation;

    printf("Choisissez l'operation a effectuer");
    /* etc. */
}

C'est plus clair n'est-ce pas ?

Plus d'informations à ce sujet.

Merci de votre compréhension.