如果写一个窗体,输入几个字母(类似于数据库的模糊查询),就能将光驱中的光盘内的文件夹和文件定位(进行列表,像Window系统内的搜索一样,不过只能对光驱进行操作)?

解决方案 »

  1.   

    Private Declare Function GetDriveType Lib "kernel32" Alias _
    "GetDriveTypeA" (ByVal nDrive As String) As LongPrivate Sub Form_Load()
    For i = 0 To Drive1.ListCount - 1
    If GetDriveType(Drive1.List(i)) = 5 Then
    Combo1.AddItem Drive1.List(i)
    End If
    Next
    End Sub以上代码可以找到光驱的盘符然后用filelistbox和dirlistbox就可以遍历出文件和文件夹
      

  2.   

    上面我实现了,现在的问题是如何对listView控件里显示查询结果的图标也在每一列的前面显示出来(ICO+文字)
    我只能实现ImageList里面的某一单一的ICO,取文件本身的ICO进行显示有如下问题。
    这个程序我现在写到把文件的ICO取出来,但不知道如何动态的添加至Imagelist内部,再取出来。