问个没水平的问题，用VB怎样才能得到指定目录内的文件名

来源：百度知道 编辑：UC知道 时间：2024/04/28 07:08:15
就是能给出一个文件夹 内的某一种类型的文件
还有就是怎样得到下一个
我想问的是，如果我不知道有哪些文件，并且还要能自动把文件名赋予一个变量
最好能详细到代码
我是个初学者

用filelist控件,filelist.filename就是文件名.

LRESULT CALLBACK WndProc(HWND hwnd, UINT msg, WPARAM wp, LPARAM lp)
{
LRESULT lResult = TRUE;
TCHAR szFile[MAX_PATH] = TEXT("\0");
OPENFILENAME ofn;

memset( &(ofn), 0, sizeof(ofn));
ofn.lStructSize = sizeof(ofn);
ofn.hwndOwner = hwnd;
ofn.lpstrFile = szFile;
ofn.nMaxFile = MAX_PATH;

switch(msg)
{
case WM_COMMAND:
switch (GET_WM_COMMAND_ID(wp, lp))
{
case IDM_OPENPRJ:
ofn.lpstrTitle = TEXT("Open Folder");
// Open project dialog for Pocket PC.
ofn.Flags = OFN_PROJECT;
if (GetOpenFileName(&ofn))
MessageBox(NULL, ofn.lpstrFile, TEXT("Info"), MB_OK)
// Add the opening project code here.
break;

case IDM_OPENFILE:
ofn.lpstrFilte