| Forum: VB.NET |
Thema:
DirectCast Problem |
Von:
Kurt Schneeheinz (
02.06.2004 14:45) |
also. ich fang mal an....
ich hab hier ein reihe von checkboxen. einmal eine als hauptkategorie und weitere als unterkategorie.
wenn ich nun eine hauptkategorie also eine "obere" checkbox checke, dann sollen automatisch die unteren checkboxen mit aktiviert werden....
das klappt aber nicht. kann mir jmd helfen
hier der "Quältext" :)
----------------------------
Dim gruppenname As String
Dim anzahl, i As Integer
Dim box As String
If index = 0 Then
'Hauptgruppe
gruppenname = daten.getGruppe(gruppe, index)
If check = True Then
'abfragen wie viele einträge sind in gruppe[0]
anzahl = daten.getAnzahl(gruppe) - 1
'alle Untergruppen der übergebenen Hauptgruppe checken
For i = 0 To anzahl Step 1
'Namen der Checkbox auslesen
box = daten.getNamen(gruppe, i)
'CheckboxFunktion mit dem erhaltenem Namen starten
'und per CType die Checkbox enablen
DirectCast(GetControlByName(box, Me.Zugriffsrechte), CheckBox).Enabled = True
Next i
Else
'alle Untergruppen der übergebenen Hauptgruppe abchecken
End If
Else
'Untergruppe
If check = True Then
'in die Hauptgruppe alle UG auslesen und alle UG prüfen ob gechecket ja/nein
'wenn alle an dann HG checken ansonsten nix
Else
'wenn alle nicht gecheckt sind dann HG abchecken
End If
End If
----------------------------
danke im voraus...Madison
| Betreff |
Von |
Datum |
|
|
  |
Re: DirectCast Problem
| Hi,<br>auf den ersten Blick sieht der Code ganz gut aus, da es aber nur ein Teilstück ist, kann man den Fehler nur schlecht erkennen. Hast Du den Code schon Debugt? Werden in der Schleife auch alle... |
 |
 |
 |
|
|
Klaas
Wedemeyer
|
03.06.2004 10:03 |
|
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!