none
eine im Module2 erstellte Sub in Form1 aufrufen

    Frage

  • habe wieder einmal ein kleines Problem.

    Möchte aus meiner Form vorhersage.vb eine Privat Sub auszählen aufrufen welche ich in Module2.vb steht . In dem Modul2 wollte ich eigentlich alle Subroutinen für hintergrundaufgaben sammeln um sie dann an entsrechender Stelle in den einzelnen Win Form`s aufrufen zu können. das dies mit Privat nicht geht ist mir klar aber Public wird an dieser Stelle nicht akzeptiert und möchte ich eigentlich auch nicht

    Module Module2
    
      Public ergebnisse As New DynamicList(Of auswerten)
      Private gezogen(48) As Integer
      Private nichtgezogen(48) As Integer
      Private Sub auszählen()
        Dim größe As Integer
        größe = ergebnisse.Count ' count eigenschaftsrutine der Klasse Dynamiclist welche Anzahl der Felder von ergebnisse zurück liefert
    
        For i As Integer = 0 To größe
    
          For a As Integer = 0 To 48
    
            If ergebnisse(i).treffer(a) = a + 1 Then
              gezogen(a) = +1
    
            ElseIf ergebnisse(i).treffer(a) = 0 Then
              nichtgezogen(a) = +1
    
            End If
          Next a
        Next i
      End Sub
    End Module

    wie muß ich es umgestalten das ich es aus den anderen Form's aufrufen kann und dann wie aufrufen

    mit freundlichem Gruß

    Bernd

    Samstag, 1. Mai 2010 15:55

Antworten

  • Hallo Bernd,

    warum sollte Public hier nicht funktionieren? Alternativ böte sich noch Friend an. Mit Private kann es jedenfalls nicht funktionieren.

     


    Thorsten Dörfler
    Microsoft MVP Visual Basic
    • Als Antwort markiert loewe_62 Samstag, 1. Mai 2010 16:52
    Samstag, 1. Mai 2010 16:13

Alle Antworten

  • Hallo Bernd,

    warum sollte Public hier nicht funktionieren? Alternativ böte sich noch Friend an. Mit Private kann es jedenfalls nicht funktionieren.

     


    Thorsten Dörfler
    Microsoft MVP Visual Basic
    • Als Antwort markiert loewe_62 Samstag, 1. Mai 2010 16:52
    Samstag, 1. Mai 2010 16:13
  • na klar funktioniert public solange man nicht, auf der suche nach einer Lösung versucht die neue public sub test nach der Zeile "End Module" zu deklarieren und aus der daraus resultierenden Fehlermeldung den Rückschluß zieht "public" geht nicht. Da braucht man einen Schubs um von dem Holzweg wieder weg zu kommen :-).

    besten Dank Bernd

    Samstag, 1. Mai 2010 17:06