Discussion :

[xingjing910]

Bonjour tout le monde,

Quand je fais marcher mon programme, au bout d'un moment, un message d'erreur affiche :

La référence d'objet n'est pas définie à une instance d'un objet

Vous savez ça veut dire quoi ? Je n'ai pas d'idée sur ces notions.. oh là là

Merci d'avance de votre temps ..Merci !!!

[zebrette]

Tu as appelé une sub, ou une function ou essayé de lire une propriété sur un objet non créé (IsNothing).

Visual studio doit te souligner une ligne avec l'objet en question. Montre un bout de code si tu veux plus d'information

[xingjing910]

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
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
  Private Sub Timer7_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer7.Tick
            Dim tempo As Integer = 0
            Dim Var As String
            Dim Value As Integer
            Dim Para As String
            Dim Decimale As Byte
 
            ' Select Case Numero
            ' Case 0
            If ExcelLigne = NumLigne + 1 Then
                BookExcel.Close()
                AppExcel.Quit()
 
                BookExcel = Nothing
                SheetExcel = Nothing
                AppExcel = Nothing
                Timer7.Stop()
                'MsgBox("Fin de base")
 
            End If
 
            If InStr(SheetExcel.Cells(ExcelLigne, 5).Value.ToString, "écriture") > 0 And ExcelLigne < NumLigne + 1 Then
                Var = SheetExcel.Cells(ExcelLigne, 6).value.ToString
                Para = Microsoft.VisualBasic.Left(Var, 2) + Microsoft.VisualBasic.Right(Var, 2)
 
                Value = SheetExcel.Cells(ExcelLigne, 4).value
                Decimale = SheetExcel.Cells(ExcelLigne, 7).value
 
                WriteToCan("0F", Para, Value, Decimale)
                NbRW = NbRW + 1
                NumericUpDown65.Value = NbRW
            End If
 
            ExcelLigne = ExcelLigne + 1
            NumericUpDown64.Value = ExcelLigne
 
            ' End Select
        End Sub

Merci bien de me répondre !!
Je viens de regarder une discussion qui a le même sujet que moi et j'ai regardé un peu. je pense que c'est mon Timer qui a mal configuré. Mais je ne sais pas trop comment on fait.

Dans le timer, il y a 6 propriétés, et que la propriété "Tag" qui est vide.

Vous avez une idée ?

Merci d'avance et merci bcp

[zebrette]

L'erreur se produit sur quelle ligne?

[xingjing910]

alors c'est un peu délicat, car mon programme utilise un convertisseur CAN analyser. Le programme j'écris sera intégré dans le logiciel de ce convertisseur.

Un problème est que pour l'instant, je ne peux pas utiliser la fonction débugger, la dernière fois que j'essaie de modifier le propriété, du coup le clé d'activation du logiciel a été éffacé et du coup .. ça était compliqué. je dois contacter l'entreprise qui nous vend le logiciel pour débugger,.

Je vais refaire ça, mais il faut que je sois très claire, c'est pour ça.

[hunteshiva]

Bonjour,

fait un dégogeur manuel ^^

tu a deux options,

• Le try- catch
  dés que ton programme plante, il gére l'erreur et termine le programme sans planter toute ton appli
  (pour moi c'est la meilleur solution)
  

  Code :

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

  1
  2
  3
  4
  5
  6
  7
  8
  Try
   
      ' Ton code
   
  Catch ex As Exception
      MsgBox(ex.Message)
   
  End Try

• Les messages
  Tu met des messagesBox partout dans ton programme pour voir a qu'elle ligne ça plante.
  

  Code :

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

  MsgBox("Test1")