Discussion :

[programeur]

Bonjour,
j'ai developpé un petit programme pour m'afficher le carré de tous les nombres saisis.Mais l'affichage se fera dès qu'on saisi zéro et affiche les carrés.
Le problème est qu'après la saisie du zéro il n'affiche pas les carrés malgré l'utilisation de debug.print

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub Affichageplusieurs()
Dim nb As Integer
Dim carre As Integer
Do
nb = InputBox(" Entrer le nombre : ")
If nb > 0 Then
carre = nb * nb
Debug.Print " Le carré de  " & nb & " est : " & carre
End If
Loop Until nb = 0
MsgBox " ERREUR !!! VOUS AVEZ SAISI UN ZERO "
End Sub

[tomlev]

Debug.Print écrit dans la fenêtre de sortie du debugger, dans Visual Studio. Utilise Console.WriteLine pour afficher dans la console, ou MsgBox pour afficher une boite de dialogue

[programeur]

Bonjour
c'est réglé il fallait regarder dans fenêtre exécution dans l'onglet AFFICHAGE
Merci