急！！！！如何做一个像windows中“开始”菜单里“运行”这样的东东？

Question

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Answer 1

str1="statr.exe "+text1.text'text1中是输入你要打开的东东
Shell str1,1 

Answer 2

MRU功能？一般都是通过读写注册表/ini实现

Answer 3

不用自己做一个，你可以直接调用windows的运行对话框，把她的标题、提示性文字改一下就成了你自己的啦，不过这个api函数是未公开的，如果你确实想要的话，给我加点分吧

Answer 4

显示运行对话框  
 
 程序图例 --------------------------------------------------------------------------------
 
'说明：表单一个；命令按钮一个为CmdRun 
 
Option ExplicitPrivate Declare Function RunDialog Lib "shell32" Alias "#61" _
(ByVal hOwner As Long, _
ByVal Unknown1 As Long, _
ByVal Unknown2 As Long, _
ByVal szTitle As String, _
ByVal szPrompt As String, _
ByVal uFlags As Long) As Long
Private Declare Function ChangeIconDialog Lib "shell32" Alias "#62" _
(ByVal hOwner As Long, _
ByVal szFilename As String, _
ByVal Reserved As Long, _
lpIconIndex As Long) As LongPrivate Sub cmdRun_Click()'RunDialog hWnd, 0, 0, vbNullString, vbNullString, 1 '隐藏浏览按钮
RunDialog hWnd, 0, 0, vbNullString, vbNullString, 0 '显示浏览按钮End Sub

Answer 5

只不过好像只能在Win98下用！因为它是通过索引来查找的
而Win2k的shell32.dll与Win98的不一样

Answer 6

用active bar 2.0
可能很轻松的实现，而且非常漂亮