有很多深受欢迎的软件,如ARJ,UNDISK等都是在DOS环境下以命令行的形式出现的。其特点就是依靠大量的参数和开关变量来实现其丰富的功能。利用VisualBasic可以简单地把此类软件改写成WINDOWS版本,其中大量的开关参数可用菜单、列表框、组合框和复选框等一一映射成图形界面。而命令的调用。可以用VB提供的SHELL函数,其语法为:
shell(命令字符串[,窗口风格])
如以下VB小程序:
SubCommand3D1_Click()
Dimx
x=Shell("c:oolsarj.exeaa:democ:demo*.*")
EndSub
但使用SHELL函数会出现WINDOWS界面和DOS黑色界面的突然切换,显得不美观。如何解决这个问题呢?使用WINDOWS的API函数WinExec,可以在隐含的窗体中启动应用程序,使命令行程序完全在后台执行。下面给出一例,将ARJ完全WINDOWS化,其效果完全可以乱真。
SubCommand1_Click()
DimcmdAsString