MS-Zugang "Ungültige Verwendung von Null"

Ich arbeite einen MS-Zugang mit ASV. Ich möchte eine neue Jobnummer erstellen und eine neue Bewertung starten. Ich habe die Jobnummer erfolgreich erstellt, aber wenn ich auf die Schaltfläche "Job auswählen" klicke, um alle Abschnitte zu analysieren, in denen "Ungültige Verwendung von Null" angezeigt wird.MS-Zugang "Ungültige Verwendung von Null"

Ich bin nicht sicher, ob Sie die Baseline-Version kennen. Ich poste den Code wie folgt:

Private Sub cmdSelectJob_Click() 
On Error GoTo Err_cmdSelectJob_Click 
If (Not IsNull(Me.cmbJobNumber)) And (Not Me.cmbJobNumber = "") Then 
    Dim stDocName As String 
    stDocName = "ReportAnalysis" 
    DoCmd.OpenForm stDocName 
    Forms!ReportAnalysis.strJobNumber = Me.cmbJobNumber 
    Forms!ReportAnalysis.UpdateBaseline 
    Forms!ReportAnalysis.trvBaseline.Nodes(1).Selected = True 
    Forms!ReportAnalysis.UpdateComponentPanel (Forms!ReportAnalysis.trvBaseline.Nodes(1)) 

    Forms!SelectJob.Visible = False 

End If 

Exit_cmdSelectJob_Click: 
Exit Sub 

Err_cmdSelectJob_Click: 
MsgBox Err.Description 
Resume Exit_cmdSelectJob_Click 
End Sub

Vielen Dank für Kommentare.

Quelle

2016-09-19 kcc

Das ist nicht VB.NET-Code. Access-VBA vielleicht? VB6? – Plutonix

@Plutonix ja, danke, ich habe es schon geändert. – kcc

Ich schlage vor, Diagnosen näher an jede Zeile in Ihrem Code zu legen. Ich bemerke, dass Sie am oberen Rand Ihrer Subroutine ein einzelnes "auf Fehler" haben, so dass Sie wirklich keine Ahnung haben, wo der Fehler passiert. Kommentieren Sie Ihre "on error goto" und sehen Sie, wo es fehlschlägt. – n8wrl

Ich habe gerade dieses Problem gelöst. Wegen des Codes "If (RS! ForReview)" der in der Funktion UpdateBaseline ist und die "ForReview" Spalte ist Null. Ich habe den Code in "If (RS.ForReview = NULL)" geändert. Das funktioniert gut. Danke für jede Hilfe.

Quelle

2016-09-22 19:59:53 kcc

MS-Zugang "Ungültige Verwendung von Null"

Antwort

Verwandte Themen