vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 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
Anweisung in einer Zeitspanne 
Autor: xmex
Datum: 30.01.03 16:04

Hallo Leute,
Also es ist eine Form mit 2 Textboxen, und einen Command Button.

Private Sub Timer1_Timer()

Dim Startzeit As Date
Dim Endzeit As Date

If Zeit1_Click Then
Startzeit = Start1.Text
Endzeit = Ende1.Text
End If

If Time >= Startzeit And Endzeit >= Time Then
MsgBox "Kinderschutz ist aktiviert!"

End If
Text2.Text = Time

Wenn mann auf Zeit1 Klickt dann soll Start1.Text zur Startzeit und Ende1.Text zur Endzeit werden.
Ich kann ja auch im Code definieren was die Startzeit und die Endzeit ist aber dann hat ja der User darauf keinen Einfluss mehr.

Ich kann ja auch im Timer definieren das wenn das und das eingegen wird das das und das passiert. der nachteil ist:

aber bei ersten änderung der Zeit aktiviert sich ja die MsgBox wenn die Zeit der Zeitspanne entspricht.
Z.b: startzeit ist 1 Uhr
und Endzeit ist 22 Uhr
Wenn man die Zeit jetzt auf auf 23 Uhr ändern will, und schon die 2 reinschreibt dann kommt ja schon die MessageBox.

Also soll die Zeitspanne erst festgelegt werden wenn man den Button klickt.

Cya
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Anweisung in einer Zeitspanne342xmex30.01.03 16:04
Re: Anweisung in einer Zeitspanne222Marcus W30.01.03 16:46
Re: Anweisung in einer Zeitspanne205xmex30.01.03 18:04
Re: Anweisung in einer Zeitspanne196Marcus W02.02.03 08:27

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