Listbox HELP – Visual Basic – Fórum – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Listbox HELP – Visual Basic – Fórum – Programujte.comListbox HELP – Visual Basic – Fórum – Programujte.com

 

Ghafan
~ Anonymní uživatel
1 příspěvek
6. 2. 2007   #1
-
0
-

Pokousim se udelat stupidni MP3 prehravac a nedari se mi zprovoznit toto: Mam listbox a dve tlacitka (dalsi a predchozi) a potrebuji aby se pomoci techto tlacitek dalo v listboxu pohybovat. Neco uz mam, ale kdyz klepnu na dalsi tak sice listbox preskoci na dalsi policko, ale soubor se neprehraje... Zde je zdrojak:

Public Class Form1

Dim Selected As String
Dim soubor As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Playlist.SelectionMode = SelectionMode.One
Playlist.ScrollAlwaysVisible = True
End Sub
Private Sub OtevřítToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OtevřítToolStripMenuItem.Click
otevrit.Filter = "mp3 soubory(*.mp3)|*.mp3"
otevrit.ShowDialog()
soubor = otevrit.FileNames(0)
mmcMp3.DeviceType = "MPEGVideo" '\\Change MCI device type to MPEG
mmcMp3.FileName = soubor '\\designate file to be played
mmcMp3.Command = "Open" '\\Open file for playing
mmcMp3.Command = "Play" '\\Play file
Playlist.DataSource = otevrit.FileNames
End Sub
Private Sub mmcMp3_NextClick(ByVal sender As System.Object, ByVal e As AxMCI.DmciEvents_NextClickEvent) Handles mmcMp3.NextClick
Playlist.SelectedIndex += 1
End Sub
Private Sub Playlist_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Playlist.SelectedIndexChanged
mmcMp3.Command = "Stop"
mmcMp3.Command = "close"
mmcMp3.FileName = Playlist.SelectedItem '\\designate file to be played
mmcMp3.Command = "Open" '\\Open file for playing
mmcMp3.Command = "Play" '\\Play file
Nowplay.Text = Playlist.SelectedItem
End Sub
Private Sub mmcMp3_PrevClick(ByVal sender As System.Object, ByVal e As AxMCI.DmciEvents_PrevClickEvent) Handles mmcMp3.PrevClick

End Sub


End Class


Předem díky

Nahlásit jako SPAM
IP: ...–
Vyreseno
~ Anonymní uživatel
1 příspěvek
7. 2. 2007   #2
-
0
-

Cyba byla v tom ze jsem jako tlacitko pouzil tlacitko next primo v tom OCX a to delalo binec kdyz jsem pouzil normalni button tak to jde v pohode :))

Nahlásit jako SPAM
IP: ...–
Petr Hartl0
Grafoman
7. 2. 2007   #3
-
0
-

To Vyreseno:až ho budeš mít hotovej, pošli mi ho,rád vyzkoušim něco novýho

Nahlásit jako SPAM
IP: ...–
Rozčilovat se znamená ničit si zdraví pro blbost jiných!
Zjistit počet nových příspěvků

Přidej příspěvek

Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!

Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku

×Vložení zdrojáku

×Vložení obrázku

Vložit URL obrázku Vybrat obrázek na disku
Vlož URL adresu obrázku:
Klikni a vyber obrázek z počítače:

×Vložení videa

Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
 
Podporujeme Gravatara.
Zadej URL adresu Avatara (40 x 40 px) nebo emailovou adresu pro použití Gravatara.
Email nikam neukládáme, po získání Gravatara je zahozen.
-
Pravidla pro psaní příspěvků, používej diakritiku. ENTER pro nový odstavec, SHIFT + ENTER pro nový řádek.
Sledovat nové příspěvky (pouze pro přihlášené)
Sleduj vlákno a v případě přidání nového příspěvku o tom budeš vědět mezi prvními.
Reaguješ na příspěvek:

Uživatelé prohlížející si toto vlákno

Uživatelé on-line: 0 registrovaných, 8 hostů

Podobná vlákna

ListBox C# — založil ListBox C#

Listbox — založil Synek

Načtení do listbox — založil Marek Sz

Multicolumn listbox — založil mlike

Lazarus - ListBox — založil Borisek

Moderátoři diskuze

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032024 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý