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
Chickenman_
Poster
Poster

Anmeldedatum: 24.04.2007
Beiträge: 149

Slidebar
Verfasst am: 20.07.2007, 13:16

Wenn man die Slidebar einstellen möchte z.b für 1 - 10. Das soll dann in einer TExtbox dargestellt werden

so z.b http://www.pcdmx.de/ger/software/skelet/vb6scrn.gif

Ich habe das mit change probiert und dann halt if.

Das funktioniert aber nur 1 mal dann irgend wie nicht mehr.

Könnte jemand mir mal erklären wie man eine if auf die Slide schreibt. ?

Und wie man den anfang auf unten setzen und das ende auf oben wiel standart ist ja

oben ist 1 unten ist 10

ich will aber oben ist 10

danke Wink
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 20.07.2007, 14:24

[code]
Private Sub Form_Load()
VScroll1.Max = 1
VScroll1.Min = 10
End Sub

Private Sub VScroll1_Change()
VScroll1_Scroll
End Sub

Private Sub VScroll1_Scroll()
Text1.Text = VScroll1.Value * 10 & "%"
End Sub
[/code]
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
Chickenman_
Poster
Poster

Anmeldedatum: 24.04.2007
Beiträge: 149


Verfasst am: 22.07.2007, 17:55

ähm , ich will selber defenieren , in die text box also keine zalhen sondern wörter bzw. ein text .



danke
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 22.07.2007, 18:26

Ich versteh nicht ganz was du machen möchtest.
Möchtest du die Zahlen ausgeschrieben darstellen? Also eins, zwei, drei etc.

Gib mir bitte noch ein Beispiel darüber was du mit Wörter oder Sätze meinst.
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
Chickenman_
Poster
Poster

Anmeldedatum: 24.04.2007
Beiträge: 149


Verfasst am: 23.07.2007, 17:25

z.b

if sidebar1.count = 1 then
text1.text = " Kill"
end if

if sidebar1.count= 2 then
text1.text = "Fire"
end if


das funktioniert nicht Wink
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 23.07.2007, 18:27

Dazu benötigst du die Option "Value".
Und mach das ganze mit "Select Case". Ist einfach übersichtlicher.

[code]
Select Case (VScroll1.Value)
Case 1
text1.text = " Kill"
Case 2
text1.text = "Fire"
End Select
[/code]

mfg
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
Chickenman_
Poster
Poster

Anmeldedatum: 24.04.2007
Beiträge: 149


Verfasst am: 24.07.2007, 16:00

danke schön Wink

warum wird eigenlich wenn man ein button oder co in ein pic erstellt immer der name so geschrieben


Button.click(index as interger)

?
 
ZiG_
Überflieger
Überflieger

Anmeldedatum: 07.03.2007
Beiträge: 1248


Verfasst am: 24.07.2007, 17:55


Ähm. Wird er eigentlich nicht. Glaube ich jedenfalls.
Das ist nur wenn du ein Steuerelementfeld erstellst. Also, dass alle Buttons den selben Namen haben, aber jeder einen anderen Index hat.

Über Button.click(index as integer) bekommst du den Index übergeben, womit du rausfinden kannst welcher Button gedrückt wurde.
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Wichtig: Filebrowser z.B. für ein RAT 2206 13.01.2008, 12:14
Keine neuen Beiträge msgbox mit symbol _&_ z.B. yesno oder systemmodal 1156 27.09.2008, 00:16
Keine neuen Beiträge Abändern eines Ordnernamens (z.B. C:\Programme = Programme) 1294 23.04.2008, 16:33
Keine neuen Beiträge "Zurück-Funktion" mit Listview und z.B. DirView 823 17.04.2008, 14:30
Keine neuen Beiträge Fenster auslesen z.b von icq oder msn wer online kommt 1336 11.02.2008, 17:46
 


[ Time: 0.0681s ][ Queries: 101 (0.0275s) ][ GZIP on - Debug on ]