Probleme mit eigener Klasse

[Rene42]

Hi

Public Class BroichTab
    Public TaOrt, TaName As String
    Public Basis As String = " C:\ "
    Public TaVz As String = "" & Basis & "" & TaOrt & "" & TaName & ""
    Public Löschen As String
    Public Function CreatTab(ByVal TaOrt, ByVal TaName, ByVal Löschen)
        If My.Computer.FileSystem.DirectoryExists("" & Basis & "" & TaOrt & "") = False Then
            My.Computer.FileSystem.CreateDirectory("" & Basis & "" & TaOrt & "")
        End If
        If My.Computer.FileSystem.DirectoryExists("" & TaVz & "") = False Then
            My.Computer.FileSystem.CreateDirectory("" & TaVz & "")
            My.Computer.FileSystem.WriteAllText("" & TaVz & "\" & TaName & ".ini", "Kopf", True)
            My.Computer.FileSystem.WriteAllText("" & TaVz & "\Kopf.ini", "ID", True)
            CreatTab = 1
        Else
            CreatTab = 0
        End If
    End Function
    Public Function DeleteTab(ByVal TaOrt, ByVal TaName, ByVal Löschen)
        If My.Computer.FileSystem.DirectoryExists("" & Basis & "" & TaOrt & "") = False Then
            'My.Computer.FileSystem.CreateDirectory("" & Basis & "" & TaOrt & "")
        End If
        If My.Computer.FileSystem.DirectoryExists("" & TaVz & "") = True Then
            My.Computer.FileSystem.DeleteDirectory("" & TaVz & "", FileIO.DeleteDirectoryOption.DeleteAllContents)
            'My.Computer.FileSystem.WriteAllText("" & TaVz & "\" & TaName & "", "", True)
            DeleteTab = 1
        Else
            DeleteTab = 1
        End If
    End Function
End Class

Also ich hab eine neue Klasse hinzugefügt, dann diesen Quelltext und nun dachte ich könnte ich im nächsten Modul broichtab.creattab(x,y,z) wählen aber denkste.

Die Intellisense erkennt die eigene Klasse bietet aber nicht die Auswahl der selbst erstellten Funktionen für meine Klasse.

Was mach ich den da nur falsch?

 

[Norbert Eder]

Also zu deinem Code folgendes:

1) Verwende Properties anstatt öffentlicher Member
2) Verwende keine Umlaute im Sourcecode
3) Leerzeilen zwischen den Funktionen/Methoden

Und zu deinem Fehler:
Hast du deine Klasse instanziert?

So in etwa

Dim myObject as New BroichTab()
myObject.DeleteTab(.....)

 

[Rene42]

Hi

Besten danke hatte vergessen die Klasse zu instanzieren.

Rene

 

[Norbert Eder]

Bitte erfolgreich beantwortete Threads als abgeschlossen markieren. Danke.