首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB窗口外DOS解决方法

2012-01-13 
VB窗口外DOS请问,我想在VB的窗体上实现DOS窗口,该如何编写?请各位大侠帮帮忙,谢谢![解决办法]先打开一个do

VB窗口外DOS
请问,我想在VB的窗体上实现DOS窗口,该如何编写?请各位大侠帮帮忙,谢谢!

[解决办法]
先打开一个dos窗口,然后用SetParent函数把dos窗口设置为vb窗口的子窗口看看行不行。
Declare Function SetParent Lib "user32 " (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

SetParent dos窗口句柄,vb窗口句柄
[解决办法]
Shell "cmd.exe "
Sleep 100
Dim conhwd As Long
conhwd = FindWindow( "ConsoleWindowClass ", vbNullString)
SetParent conhwd, Me.hWnd

热点排行