Question

VB如何获取文件夹下的所有文件的名字并显示在label上

Answer 1

Private Sub Command1_Click()
Dim F As String, I As Long, nPath As String, nName As String
nName = Dir("D:\*.*", 7)
Label1.Caption = ""
Do
If nName = "" Then Exit Do
Label1.Caption = Label1.Caption & nName & vbCrLf
nName = Dir()
Loop
End Sub

label控件显示的内容有限，建议你还是用别的控件。