[VB .net]Globale Variabelen

[Benhero]

Hallo Com,
Folgendes Problem..
Ich versuche in VB .Net Globale Variablen zu Deklarieren.
Jedoch ohne Erfolg..

Hier der Code:

Public Class Global_Values
    Public Shared language_select(1, 1) As String
    '## Deutsch'
        language_select(0, 0) = "Deutsch"
        language_select(0, 1) = "Englisch"
    '## Englisch'
        language_select(1, 0) = "German"
        language_select(1, 1) = "English"
End Class

nun zeigt er mir aber folgenden Fehler:

Deklaration erwartet

Wo genau liegt der Fehler? Ich habe bereits gegoogelt und kein für mich passendes Thema gefunden.

Vielen dank für Eure Hilfe.

Mfg. Benhero

[Kraizy​]

was genau willst du damit bezwecken? ich bin mir sicher da gibt es bessere möglichkeiten

[-PinkiWinki-]

Hol dir ein Buch und lern erstmal die Grundlagen.

[Benhero]

vlt versteht ihr es wenn ich ein wenig mehr Code poste..

Public Class Global_Values
    Public Shared language_select(1, 1) As String
    '## Deutsch'
        language_select(0, 0) = "Deutsch"
        language_select(0, 1) = "Englisch"
    '## Englisch'
        language_select(1, 0) = "German"
        language_select(1, 1) = "English"
End Class


Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles select_language.SelectedIndexChanged
        language_DE.text = language_select(select_language.SelectedIndex, 0)
        language_EN.text = language_select(select_language.SelectedIndex, 1)
End Sub

Ich möchte von einer Private Sub auf die Variablen von der Class "Global_Values" zugreifen. Nun eben die Frage. Wie ist dies Möglich?
(Nein ich kann die Variablen NICHT in die 2te Sub mit reinpacken weil ich auch noch von anderen Subs auf diese Variablen zugreifen möchte. Außerdem möchte ich die Variablen nicht in jede Sub einfügen.. Deswegen möchte ich sie global deklarieren damit ich von überall darauf zugreifen kann.

Mfg. Benhero

[Kraizy​]

Originally Posted by Benhero

Ich möchte von einer Private Sub auf die Variablen von der Class "Global_Values" zugreifen. Nun eben die Frage. Wie ist dies Möglich?

Nunja, das hast du ja bereits durch deine Public Shared Variable erledigt:

PHP Code:

Public Class Form1
   Private Sub..
      Globals.strVariable = "abc"
   End Sub

   Private Sub..
      Globals.intVariable = 5
   End Sub
End Class

Public Class Globals
   Public Shared strVariable As String
   Public Shared intVariable As Integer
End Class 


Was du jedoch damit anstellen willst versteh ich nicht..

Originally Posted by Benhero

Public Class Global_Values
    Public Shared language_select(1, 1) As String
    '## Deutsch'
        language_select(0, 0) = "Deutsch"
        language_select(0, 1) = "Englisch"
    '## Englisch'
        language_select(1, 0) = "German"
        language_select(1, 1) = "English"
End Class


Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles select_language.SelectedIndexChanged
        language_DE.text = language_select(select_language.SelectedIndex, 0)
        language_EN.text = language_select(select_language.SelectedIndex, 1)
End Sub

[Benhero]

Geht leider nicht so wie ich möchte.. Folgender Fehler...

[Kraizy​]

Also wenn du es schon so machst, dann klatsch es eher in eine Methode, die du dann am Anfang aufrufst..

PHP Code:

Public Class Global_Values
   Public Shared language_select(1, 1) As String

   Public Shared Sub setzen()
      '## Deutsch'
      language_select(0, 0) = "Deutsch"
      language_select(0, 1) = "Englisch"
      '## Englisch'
      language_select(1, 0) = "German"
      language_select(1, 1) = "English"
   End Sub
End Class

Private Sub Form1_Load(...)
   Global_Values.setzen()
End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles select_language.SelectedIndexChanged
   language_DE.text = Global_Values.language_select(select_language.SelectedIndex, 0)
   language_EN.text = Global_Values.language_select(select_language.SelectedIndex, 1)
End Sub 


Aber ob du so wirklich arbeiten willst..?

[Benhero]

.. Gut hier nochma die komplette Funktion..
gelöscht

[-PinkiWinki-]

Wie ich bereits sagte, hol dir ein Buch und lern die Grundlagen. .NET hat keine globalen Variablen, alles muss in einer Klasse sein.

Außerdem kannst du außerhalb von Deklerationen und Funktionen keine Werte setzen.

 Spoiler

PHP Code:

Module Module1
    Class GlobalVar
        Public Shared language_select(,) As String = {{"Deutsch", "Englisch"}, {"German", "English"}}

    End Class

    Class WasAnderes
        Public Shared Sub test()
            Console.WriteLine(GlobalVar.language_select(0, 0))
            Console.WriteLine(GlobalVar.language_select(0, 1))
            Console.WriteLine(GlobalVar.language_select(1, 0))
            Console.WriteLine(GlobalVar.language_select(1, 1))
        End Sub
    End Class

    Sub Main()
        WasAnderes.test()
        Console.ReadLine()
    End Sub

End Module 


[MrSm!th]

#moved

[tolio]

ich geb zu ich hab jetzt nicht alle codeblöcke durchgeschaut aber warum packste nicht irgendwo unter die klassendeklaration die variable:

Public Class trololol
Public abc As String
End Class

und dann von irgendwo anders einfach nutzen

trololol.abc = "test"

fertig ist das ^^

[Benhero]

#edit
Habe es nun gelöst.. war einfach zu Blöd um durchzublicken.. Nun hab ichs! danke an alle

Benhero