少妇脱了内裤让我添,久久久久亚洲精品无码网址蜜桃,性色av免费观看,久久人妻av无码中文专区

分享

實(shí)現(xiàn)命令行軟件的WINDOWS化

 昵稱5356750 2011-01-03
有很多深受歡迎的軟件,如ARJ,UNDISK等都是在DOS環(huán)境下以命令行的形式出現(xiàn)的。其特點(diǎn)就是依靠大量的參數(shù)和開關(guān)變量來實(shí)現(xiàn)其豐富的功能。利用Visual Basic可以簡(jiǎn)單地把此類軟件改寫成WINDOWS版本,其中大量的開關(guān)參數(shù)可用菜單、列表框、組合框和復(fù)選框等一一映射成圖形界面。而命令的調(diào)用。可以用VB提供的SHELL函數(shù),其語法為:

shell(命令字符串[,窗口風(fēng)格])

如以下VB小程序:

Sub Command3D1_Click ()

Dim x

x = Shell("c: oolsarj.exe a a:demo c:demo*.*")

End Sub

  但使用SHELL函數(shù) 會(huì)出現(xiàn)WINDOWS界面和DOS黑色界面的突然切換,顯得不美觀。如何解決這個(gè)問題呢?使用WINDOWS的API函數(shù)WinExec,可以在隱含的窗體中啟動(dòng)應(yīng)用程序,使命令行程序完全在后臺(tái)執(zhí)行。下面給出一例,將ARJ完全WINDOWS化,其效果完全可以亂真。

Sub Command1_Click ( )

Dim cmd As String

Dim hWnd As Integer

cmd = "c:dosARJ.pif " & list1.Text & " -" & LIST2.Text &
" " & text2.Text & " " & text1.Text ’list1、list2輸入?yún)?shù),text1,text2輸入文件路徑

hWnd = WinExec(cmdline, 0) ’參數(shù)為0則隱藏窗體

If HWND $#@60; 32 Then ’hWin$#@60;32則啟動(dòng)應(yīng)用程序失敗

MsgBox "error!"

Exit Sub

End If

While GetModuleUsage(HWND%)

mousepointer = 11 ‘鼠標(biāo)呈沙漏狀

WAIT% = DoEvents()

Wend

mousepointer = 1 ’鼠標(biāo)復(fù)原為箭頭

End Sub

  在此例中,筆者使用了WINDOWS的PIF編輯器將ARJ.EXE編輯成ARJ.PIF,是因?yàn)轭愃艫RJ這樣的軟件是以全屏方式執(zhí)行的,而WINEXEC函數(shù)只能隱藏以窗體方式運(yùn)行的程序。在編輯PIF文件時(shí)顯示方式選擇“窗口”,執(zhí)行方式選擇“后臺(tái)”,這樣就解決了上面提到的界面突換的問題。而調(diào)用API函數(shù)GetModuleUsage以獲得應(yīng)用程序結(jié)束的標(biāo)志,若運(yùn)行完畢則返回TRUE,若未運(yùn)行完畢則讓出CPU控制權(quán),為運(yùn)行ARJ提供時(shí)機(jī)。這樣的小程序完全可以實(shí)現(xiàn)命令行軟件的WINDOWS化,而且運(yùn)行起來真假難辨,有興趣的讀者不妨試一試。


    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類似文章 更多

    主站蜘蛛池模板: 亚洲乱码中文字幕手机在线| 久久超碰极品视觉盛宴| 99www久久综合久久爱com| 日韩精品无码专区免费视频| 亚洲欧洲日本综合aⅴ在线| 亚洲国产成人精品无码区宅男| 女人高潮抽搐喷液30分钟视频| 亚洲国产剧情中文视频在线| 国产精品久久久久无码av色戒| 精品无码无人网站免费视频| 国产精品久久久久不卡无毒| 屁屁影院ccyy备用地址| 久久九九久精品国产免费直播| 中文字幕精品亚洲无线码一区| 国产国语熟妇视频在线观看| 99久久精品国产综合一区| 亚洲国产一区二区三区亚瑟| 久久久亚洲欧洲日产国码二区| 激情五月婷婷| 26uuu在线亚洲欧美| 天堂sv在线最新版在线| 亚洲性线免费观看视频成熟| 中国熟妇牲交视频| 亚洲国产一区二区三区亚瑟| 国产亚洲精品一区二区三区| 日韩av中文无码影院| 婷婷色婷婷开心五月四房播播| 在线播放偷拍一区精品| 性欧美大胆免费播放| 亚洲精品国产第一综合99久久| 亚洲成a v人片在线观看| 国产欧美日韩精品丝袜高跟鞋| 免费无码h肉动漫在线观看| 俄罗斯美女真人性做爰| 成年黄页网站大全免费无码| 国产suv精品一区二区6| 久久久久久久久久久综合日本| 久久久久人妻一区精品色| 性色a∨精品高清在线观看| av国産精品毛片一区二区网站| 国产精品白丝久久av网站|