[VB] Statusbar - scrivere n° file presenti in filelistbox

[Colino]

Ciao,
ho una filelistbox e una status bar , vorrei inserire nella status bar il numero dei file presenti...
ho provato ad usare questo codice:

StatusBar1.Panels.Item(1).Text = "File presenti nella cartella: " + File1.ListCount + ""

ma mi da errore...xkè??

poi vorrei aprire un form che sia sempre presente visibile sullo skermo (inzomma , sopra le arte cartelle)...
Come devo fare??
Help mE!!!

[Johnny_Depp]

per il VB6 & VB.NET abbiamo un subforum apposito, sposto il thread là.

n.b. nel titolo bisogna specificare anche la versione di VB.

[Jupy64]

Ciao per la statusbar

StatusBar1.Panels(1).Text = "File presenti nella cartella: " & File1.ListCount

per il primo piano:

Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Const SWP_SHOWWINDOW = &H40 'visualizza la finestra
Const SWP_NOMOVE = &H2 'Non Muove la finestra (ignora x y)
Const SWP_NOSIZE = &H1 'non ridimensiona la finestra (ignora cx cy)
Const HWND_TOP = 0 ' mette la finestra al livello più alto
Const HWND_TOPMOST = -1 'Pone la finestra in primo piano al di sopra di tutte le altre.

Private Sub PrimoPiano()
  SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_SHOWWINDOW
End Sub

[Colino]

Grazie 1000!

[MMarzia]

Originariamente inviato da Colino
Grazie 1000!

la versione?!