vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Allgemeine Diskussionen
Re: verschachtelte schleife 
Autor: georg-30
Datum: 23.10.02 12:27

also entweder ich bekomme heute wieder garnichts mit oder ich weiß nicht!

so mein code:


Dim bResult As Boolean
bResult = True

If GetValue(HKEY_USERS, "DEFAULT\Software\Policies\Microsoft\Office\10.0\Common", "DWNeverUpload", prufen2) Then
If GetValue(HKEY_USERS, "DEFAULT\Software\Policies\Microsoft\Office\10.0\Common", "DWNoExternalURL", prufen3) Then
If GetValue(HKEY_USERS, "DEFAULT\Software\Policies\Microsoft\Office\10.0\Common", "DWNoFileCollection", prufen4) Then
If GetValue(HKEY_USERS, "DEFAULT\Software\Policies\Microsoft\Office\10.0\Common", "DWNoSecondLevelCollection", prufen5) Then
Picture8.Visible = bResult
' wird eine Bedingung nicht erfüllt, bResult = False setzen
.
Picture1.Visible = bResult

grüße georg
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
verschachtelte schleife524georg-3023.10.02 11:29
Re: verschachtelte schleife379ModeratorDieter23.10.02 11:33
Re: verschachtelte schleife463georg-3023.10.02 12:27
Re: verschachtelte schleife374ModeratorDieter23.10.02 12:35

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel