vb 求高手帮忙,谢谢了,多问高分

来源:百度知道 编辑:UC知道 时间:2024/05/13 05:18:34
窗体上有三个控件,FileListBox,Txt1Box,CommandBox三个控件.
FileListBox中显示着某一指定文件夹中的文件列表

1.怎么消除File1文件列表中的文件后缀名?
2.比如当在Text1中输入一个"g",那么File1列表中的文件会重新排列,"g"开头的文件名靠前显示,好象是快速查询引索一样.
3.点击Command1时,被选中的文件会被移动到:"D:\MyFile"的文件夹中

以上三点,每个问题30分,我先押50分,如果有注释的话,我再多加~.~
强烈感谢!
不用API,我看不懂,那把第二个问题用LIST做FILE的"傀儡",怎么弄出来?

'' ------------ 第一个问题的答案 Start -------------------------
'' 第一个问题(去掉后缀),本人没答案。FileListBox控件本身的属性或事件是无法做到这个效果的,
'' 有2种方法可以做到,1是用API函数SendMessage之类的,
'' 2是干脆用ListBox控件代替FileListBox控件,假如你只用到这三个功能的话,其实用ListBox也可以。
'' ------------ 第一个问题的答案 End -------------------------
'
'' ------------ 第二个问题的答案 Start -------------------------
'Private Sub Text1_Change()
' File1.Pattern = Text1.Text & "*.*" ' 得到以Text1.Text文本为开头的文件
' 但不是此文本开头的文件将不显示在FileListBox控件上
'End Sub
'' ------------ 第二个问题的答案 End -------------------------
'
'' ------------ 第三个问题的答案 Start -------------------------
'Private Sub Command1_Click()
' With File1 ' FileListBox控件名
' Dim idx As Integer
' idx = .ListIndex
' If (.ListIndex < 0) Then Exit Sub ' 如果未选中任何文件,则退出
'
&#