VB中LIST控件的问题
来源:百度知道 编辑:UC知道 时间:2024/05/13 19:36:09
如果才能实现新搜索的结果在第一条显示?
另外,我在用FileCopy命令的时候,如果拷贝的数据多或者大的话,在拷贝过程未完成时,应用程序会导致假死,而且拷贝过程没有WINDOWS的那个文件复制进程条,应用程序不能操作,直到拷贝完成后才正常,不知道为什么会这样,有没有什么办法可以让拷贝时不会假死,或者拷贝时在后台进行,软件还能操作。
请大家帮帮我~~~谢谢!!
LIST控件的第一排列问题已经解决了~~~只要在ADDITEM时加上列数就可以了
现在剩下2个问题。1、就是上面说的FILECOPY的问题。
2、就是在用FILELISTBOX控件显示文件的时候如何实现双击时删除选定的文件?
谢谢~~~
栽培者你那个API进度函数不能调用啊。。我按你说的加了模块,但是在调用uCopyFile时提示BYREF参数类型不符合,去掉prgState后运行提示uCopyFile 参数不可选。。。不知道什么问题。。帮帮我~~谢谢
这个问题可以这样的解决:在vb6中调试通过。
1:首先在公共模块中:
Option Explicit
Public Const FO_MOVE = &H1
Public Const FO_COPY = &H2
Public Const FO_DELETE = &H3
Public Const FO_RENAME = &H4
Public Const FOF_NOCONFIRMATION = &H10
Public Const FOF_NOCONFIRMMKDIR = &H200
Public Const FOF_ALLOWUNDO = &H40
Type SHFILEOPSTRUCT
hWnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAborted As Boolean
hNameMaps As Long
sProgress As String
End Type
Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
其次:在frm模块之中:
Private Sub Command1_Click()
Dim SHFileOp As SHFILEOPSTRUCT
SHFileOp.wFunc = FO_COPY
SHFileOp.fAborted = True
SHFileOp.pFrom = "F:\MEM\*.*"
SHFileOp.pTo = "f: