Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
gs_1c3m4n_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 12.02.2007
Beiträge: 53
Wohnort: Langenhagen

StopUhr sekunden
Verfasst am: 22.04.2007, 09:27

Hallo

imma noch bei der stopuhr ^^
nich viel ahnung von vb Smile

also ich möchte jetzt das die sekunden und die minuten und stunden verlaufen.
also bei einer sekunde erscheint ein radiobutton. bei der zwei sekunden erscheint der
zweite radiobutton.

mia fällt jetzt nua ein das ich ich dann schreibe:

if sec = 1 then
r1.visible=true
end if

und das für jeden radiobutton. das ja viel arbeit.
wie kann ich das noch lösen?

*r1=radiobutton1

mit freundlichen grüßen
gs_1c3m4n
 
Amethyst_
Poster
Poster

Anmeldedatum: 24.02.2007
Beiträge: 172


Verfasst am: 22.04.2007, 09:46

Was willst du mit nem Radiobutton? Shocked
 
gs_1c3m4n_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 12.02.2007
Beiträge: 53
Wohnort: Langenhagen


Verfasst am: 22.04.2007, 11:04

es sind 60 radiobuttons. ^^
die solln halt die sekunden anzeigen um die minuten und stunden rum.
kennt doch diese digitaluhren wo das im krei rum so punkte für jede sekunde
erscheinen.
gut ich hätt was anderes nehm könn hab mich jet aba ersma
für radiobuttons entschieden
 
Bahamut_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 12.12.2006
Beiträge: 250


Verfasst am: 22.04.2007, 13:57

Hmh ich denke ich weiß was du willst:

Du hast 60 Radiobuttons aber willst nicht 60 mal den Source für jeden haben.

Nenn die Radiobuttons alle gleich, aber gib ihnen Inizes von 0-59, dann nen Timer mit Intervall 1000, also der jede Sekunde aktiv wird.

Code:

Dim sek As Single

Private Sub Timer1_Timer()
If sek = 60 Then
sek = 0
For i = 0 To 59
Option1(i).Visible = False
Next i
End If
Option1(sek).Visible = True
sek = sek + 1
End Sub


Dadurch tauchen die Options mit den Sekunden eine nach der anderen auf und wenns bei Maxium ist, verschwinden alle und es fängt wieder von vorne an.
VB.Net-Compiler: http://www.microsoft.com/germany/express/download/default.aspx
VB.Net-eBook: http://www.galileocomputing.de/openbook/visual_basic/
 
gs_1c3m4n_
Tutorial Leser
Tutorial Leser

Anmeldedatum: 12.02.2007
Beiträge: 53
Wohnort: Langenhagen


Verfasst am: 22.04.2007, 16:41

das mia ja voll kompliziert ^^
er sagt das der name option nich deklariet wurde
 
Bahamut_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 12.12.2006
Beiträge: 250


Verfasst am: 22.04.2007, 18:16

Option1 = Name deiner 60 Radiobuttons... natürlich macht Radio statt Option mehr Sinn ^^ Ich habs halt in dem Code mit den Optionsbuttons gemacht
VB.Net-Compiler: http://www.microsoft.com/germany/express/download/default.aspx
VB.Net-eBook: http://www.galileocomputing.de/openbook/visual_basic/
 
413X_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 16.12.2006
Beiträge: 266


Verfasst am: 22.04.2007, 20:13

Und wichtig: In der Property-Liste musst du jedem Radiobutton einen eigenen Index-Wert geben! Das heisst:

Die Eigenschaft: Name bleibt gleich bei allen 60
Die Eingeschaft: Index faengt bei 0 an und geht bis 59, und jeder kriegt einen eigenen Index. und dann den Code eins hoeher einfach hernehmen, richtig hinbasteln und fertig xD

http://www.413x.dl.am

Tod den 1337-Scriptkiddies xD
 
r4z3r_
« Webmaster »<b><font color=red>« Webmaster »</fo



Anmeldedatum: 06.02.2007
Beiträge: 252


Verfasst am: 22.04.2007, 20:33

du kannst auch einfach einen optionbutton plazieren und den immer kopieren, so werden die indexe automatisch von 0 bis 59 erstellt,
das erspart dir eine menge zeit und du kannst dich nicht verzählen^^
 
413X_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 16.12.2006
Beiträge: 266


Verfasst am: 22.04.2007, 20:52


Am einfachsten waere es ja den Optionsbutton waehrend der RUntime zu laden Very Happy
Aber das waere etwas mehr komplizierter dann mit dem Coden, aber wenn man sich da genug Zeit mitnimmt, findet man dafuer auch nen guten Algo um das schoen zu platzieren und alles ^^

http://www.413x.dl.am

Tod den 1337-Scriptkiddies xD
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: sekunden, sekunde

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Wichtig: [Video] Lesson 2 - If then Else, For Schleife 3081 14.02.2008, 07:21
Keine neuen Beiträge Problem mit If, Then, dringend Hilfe gesucht 423 02.11.2009, 22:12
Keine neuen Beiträge [Frage] Ich bekomme einen Fehler das "End if" fehlt obwohl e 698 14.09.2008, 16:33
Keine neuen Beiträge If...then nix machen 407 05.03.2008, 15:45
Keine neuen Beiträge if check1 + check2 then image1.visible = True !? 806 18.12.2007, 18:30
 


[ Time: 0.0912s ][ Queries: 106 (0.0461s) ][ GZIP on - Debug on ]