Visual Basic - VISUALIZAR LOS ARCHIVOS

QUISIERA SABER SI SE PUEDEN VISUALIZAR LOS ARCHIVOS EN UN LISTBOX PERO SIN QUE APARESCA LA EXTENCION DEL ARCHIVO COMO POR EJEMPLO (IMAGEN1.JPG) O SI SE PUEDE HACER ESTO CON OTRO CONTROL QUE NO SEA EL FILELISTBOX

COMO CREAR UN VIRUS EN VISUAL BASIC

Si se puede solamente pones el control File en invisible y creas una rutina que pasa los archivos del File al ListBox para esto en tiempo de diseño el File1 y el Listbox lo pones juntos y envia al Frente el listbox el File queda atras, rutina:
Private Sub Dir1_Change()
File1.Path = Dir1.Path 'OCULTO EL FILE1
List1.Clear
For i = 0 To File1.ListCount - 1
List1.AddItem Mid(File1.List(i), 1, IIf(InStr(1, File1.List(i), ".") = 0, 50, InStr(1, File1.List(i), ".") - 1))
Next i
End Sub