Bonjour,

Novice en Visual Basic, je rencontre un problème dans le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Imports System.Net
Imports System.Net.Sockets
Imports System.Threading
Public Class _Default
  Inherits Page
  Public MonSocketClient As Socket
   Public MonThread As Thread
   Sub TraitementConnexion()
       'Envoi du pseudo au serveur
       Dim Mess As Byte() = System.Text.Encoding.UTF8.GetBytes(TXT_PSEUDO.Text)
       Dim Envoi As Integer = MonSocketClient.Send(Mess) 'Envoi du pseudo au serveur
 
       MonThread = New Thread(AddressOf ThreadLecture)
       MonThread.Start()
   End Sub
 
   Public Sub BT_Envoi_Click(sender As Object, e As EventArgs) Handles BT_Envoi.Click
       'EnvoiMessage(TXT_MESSAGE.Text)
       Dim Mess As Byte() = Encoding.UTF8.GetBytes(TXT_MESSAGE.Text)
       Dim Envoi As Integer = MonSocketClient.Send(Mess) 'Envoi du message au serveur
       TXT_MESSAGE.Text = "" 'Efface la ligne
   End Sub
Message d'erreur :

System.NullReferenceException : 'La référence d'objet n'est pas définie à une instance d'un objet.'
MonSocketClient a été Nothing.

... et je ne comprends pas pourquoi la variable MonSocketClient existe et ne pose pas de problème à la ligne 11 et plante à la ligne 20 ...

Merci pour votre aide