Hallo Sebastian,
es gibt weniges aus dem alten VB6 Namensraum, dass MS sogar selbst noch verwendet. Dazu sollte man sich immer mal die automatisch erzeugten "deineForm.Designer.vb" anschauen.
Alle Beispiele hier sind von Dir und Original, ich habe da nichts verändert:
Sieh Dir z.B. mal aus den Excel-Beispielen die Example06.Designer.vb an:
"IsNothing" ist VB6 Code, den es so auch nicht mehr gibt, deswegen wird ja auch aus
(alt): If (Not IsNothing(workbookFile) ...
(neu): If workbookFile IsNot Nothing ...
Was die von Dir beschriebene Funktion IsNothing soll weiß ich nicht, wozu benötigt man das?
If NetOffice.Utils.IsNothing(excelApplication) Then ...
Da schreibe ich doch lieber:
If excelApplication Is Nothing Then ...
Vielleicht habe ich die Funktion aber auch nur völlig falsch verstanden!?
Gruß,
Robert (Haro)
es gibt weniges aus dem alten VB6 Namensraum, dass MS sogar selbst noch verwendet. Dazu sollte man sich immer mal die automatisch erzeugten "deineForm.Designer.vb" anschauen.
Alle Beispiele hier sind von Dir und Original, ich habe da nichts verändert:
Sieh Dir z.B. mal aus den Excel-Beispielen die Example06.Designer.vb an:
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
Microsoft schreibt schon selbst die korrekte Verwendung von "ist nicht nichts" rein."IsNothing" ist VB6 Code, den es so auch nicht mehr gibt, deswegen wird ja auch aus
(alt): If (Not IsNothing(workbookFile) ...
(neu): If workbookFile IsNot Nothing ...
Was die von Dir beschriebene Funktion IsNothing soll weiß ich nicht, wozu benötigt man das?
If NetOffice.Utils.IsNothing(excelApplication) Then ...
Da schreibe ich doch lieber:
If excelApplication Is Nothing Then ...
Vielleicht habe ich die Funktion aber auch nur völlig falsch verstanden!?
Gruß,
Robert (Haro)