instruction non effectuée dans une boucle
Bonjour,
j'ai un soucis avec le "Label2.Text = ip" qui doit s'afficher à chaque boucle
hors le seul moyen que j'ai trouvé pour le faire c'est de rajouter cette "msgbox"
quand la msgbox est commentaire ca ne marche pas
quand la msgbox est active ca marche dans la msgbox et dans le label2 !
j'y comprends rien
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
|
Dim ip As String
Dim numero As String
Dim host As String
host = Nothing
For compteur As Integer = 1 To 30
numero = compteur
ip = "192.168.0." + numero
Label2.Text = ip
'MsgBox(ip)
If My.Computer.Network.Ping(ip) Then
host = host & vbNewLine & ip
End If
Next |
merci de votre aide