常量數據表
|
1
2
|
.版本 2.常量 GetDiskList, "<文本長度: 613>" |
取磁盤信息代碼
|
1
2
3
4
5
6
7
8
9
10
11
12
|
.版本 2.程序集 窗口程序集1.子程序 _取硬盤信息按鈕_被單擊硬盤信息編輯框.內容 ＝ 取硬盤列表 ().子程序 取硬盤列表, 文本型, 公開.局部變量 Script, 對象.局部變量 ret, 文本型Script.創建 (“MSScriptControl.ScriptControl”, )Script.寫屬性 (“Language”, “VBScript”)Script.數值方法 (“AddCode”, #GetDiskList)ret ＝ Script.通用方法 (“Eval”, “GetDiskList()”).取文本 ()返回 (ret) |
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接
