Eigene Variable (Klasse) in eigenem Benutzersteuerelement Verfasst am: 12.04.2009, 17:16
Die Überschrift klingt zwar etwas kryptisch, so schwer ist es aber eigentlich gar nicht.
Also, ich habe mir ein eigenes Benutzersteuerelement gemacht. Nun wäre es für einige Variablen sehr sinnvoll, eine eigene Variablenart mit mehreren Unterpunkten sozusagen zu haben, wie z.B. die Font Variable, die ja auch aus mehreren Subvariablen besteht.
Normalerweise funktioniert dass ja so, dass man eine Klasse hat, in der die benötigten Variablen deklariert werden und es dann noch eine New() Sub gibt. Das funktioniert auch, doch wenn ich mit Hilfe von Property die Variable im Windows-Forms-Designer verfügbar machen will, wird kann ich keinen Wert ändern wie bei Font.
Hier mal die Klasse:
Code:
Public Class Menü
Public MenüName As String
Public Unterpunkt1 As String, Unterpunkt2 as String
Public Sub New(ByVal MenuName As String, ByVal Subpoint1 As String, ByVal Subpoint2 as String)
MenüName = MenuName
Unterpunkt1 = Subpoint1
Unterpunkt2 = Subpoint2
End Sub
End Class
Und hier noch die "eigentliche" Benutzersteuerelement-Klasse, bzw. ein Ausschnitt davon:
Code:
Dim TestMenü As Menu = New Menu("Blub", "Blub", "Blub")
...
Property Menu1() As Menu
Get
Return TestMenü
End Get
Set(ByVal value As Menu)
TestMenü = value
End Set
End Property
Hier noch ein Screen wie es im WindowsFormsDesignerangezeigt wird:
Registrieren
Login
