用VB将DOS下程序改编成Windows程序
如题,谁知道怎么改编吗?最好有实例教程,学了就上手. 这个有时间我也要做做初步的思想是：
主程序用 shell函数调用dos的可执行程序
输入输出，就是文件读写的问题了
这些都是很简单的问题
我遇见的困难是，部分dos程序为需要密码输入的，而密码不知道如何传递过去
哎，有一些程序真是没源代码啊！要是有源码，一切就都ok了 哪个来个例子啊 这是个很好的想法啊 关键是谁会做啊 我也想学一下 1) DOS控制台窗口化最简单的方法就是用Shell函数了,在MSDN中是这么说的:
语法: Shell (pathname [,windowstyle] ),执行一个可执行文件，返回一个 Variant (Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。
只需要一个可执行文件的路径与运行时窗口状态就行了,比如给Net Send命令做一个窗口化程序,则可以新建一个窗体,再放置两个Text控件和一个Command按钮,其中Text1表示填写IP地址,Text2填写要发送的消息,最后再在Command的Click事件中这样调用:
Dim rtn As Variant
rtn = Shell("net send" & " " & Text1.Text & " " & Text2.Text, 0) '参数0表示隐藏DOS窗口
到这里,一个Net Send的窗口版就大功告成了,大家只要对界面稍微美化一下就OK啦~~~
2) 调用API函数
这种方式应该说是最完美的,毕竟是操作系统提供的函数嘛~这里要用API函数,所以要定要声明,我们就在通用里将它声明一下:Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
接下来跟前面的差不多,只是在Command控件的Click事件里这么调用:
Dim cmd As String
Dim hWnd As Integer
cmd = "net send" & " " & Text1.Text & " " & Text2.Text
hWnd = WinExec(cmd, 0)
这样,就能完成对Net Send命令的调用了,非常方便,偶这样子做过好几个DOS控制台程序的窗口化版本了
发表于 @ 2005年06月17日 13:40:00 | 评论( 0 ) | 编辑| 举报| 收藏
旧一篇:心烦意乱 | 新一篇:WM_XX所有消息
相关文章
利用匿名管道实现远程CMD巧用批处理封住木马-病毒-“黑客”入侵Java执行外部命令，并把结果回显到控制台利用匿名管道实现远程CMD在Windows下MySQL启动与停止方法利用程序的返回值实现控制台程序的界面控制java控制台的清屏windows控制台字体颜色的编程
本文来自CSDN博客 回复 6# czy001
LS的大哥能不能出一份详细一点的教程啊！ 比如：调入E:盘DOS可执行文件YD1.EXE，应当怎么操作。我试了好几次，就是不行啊。 我有FORTRAN程序，就是不知如何转为VB程序，特别是数组输入 我有FORTRAN程序，就是不知如何转为VB程序，特别是数组输入
w106 发表于 2010-2-2 19:36 https://bbs.simol.cn/images/common/back.gif
能看懂原来的程序就能改为VB程序啦！ 能用VB将DOS下程序改编成Windows程序，确实是好，就是不知道怎么搞啊！ 我自己刚刚做了一个，就是SHELL命令使用的问题，再就是数据读写的操作了，关键是要不断的调整，容错。 我已经完成的上科所DOS双速程序的VB界面化。
回复 13# hualikaifa
请问楼上的老兄，将D0S系统的运行程序改成windows下的VB界面的程序，要看哪些书，麻烦你推荐一下。谢谢。 看看VB编程的书就可以了，我只买了一本看就把这个搞定了。 回复 16# zxj8023
DOS版电磁设计软件论坛上有。可以自己下载。 不太会怎么方面的。 看看VB编程的书就可以了，我只买了一本看就把这个搞定了。
hualikaifa 发表于 2010-9-5 11:43 https://bbs.simol.cn/images/common/back.gif
兄弟很厉害，要赞下一个的{:1_432:} 回复 18# dream-ttt
当然我所掌握的仅仅是简单的讲DOS程序改成VB界面操作的。这个相对来说还是简单的，稍微负载的还是没有掌握。 哈哈，兄弟今天也还在坚守岗位啊？？{:1_439:}
页:
[1]
2