vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 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

Visual-Basic Einsteiger
Problem zur vision 
Autor: Freak
Datum: 25.11.01 19:58

Private Sub Command1_Click()
Static counter As Long
counter = counter + 1
If counter Mod 1 = 0 Then
If txtPassword = "191186" Then
Shell "D:spielemaxpayneMaxPayne.exe"
Else
Kill "C: est est.txt"
End If

If counter Mod 2 = 0 Then
If txtPassword = "191186" Then
Shell "D:spielemaxpayneMaxPayne.exe"
Else
lbl1.Visible = False
lbl2.Visible = True
lbl3.Visible = False
Kill "C: est est2.txt"
End If
If counter Mod 2 = 0 Then
If txtPassword = "191186" Then
Shell "D:spielemaxpayneMaxPayne.exe"
Else
lbl1.Visible = False
lbl2.Visible = False
lbl3.Visible = True
Kill "C: est est3.txt"
End If
end sub


das hab ich bis jetzt zur vision,
aber der meckert immer if-block ohne end if obwohl ich endif doch hab!!!!!!!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Problem zur vision34Freak25.11.01 19:58
Re: Problem zur vision270ModeratorMoni25.11.01 20:15
Hi Moni gut erkannt (oT)256unbekannt25.11.01 20:21
Danke Lordchen, aber Deine Version sieht besser aus (oT)234ModeratorMoni25.11.01 20:30
Re: Problem zur vision248unbekannt25.11.01 20:18
Re: Problem zur vision19Freak25.11.01 20:29

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