VB問題!高手進入!高手進!VB問題

2025-01-24 12:45:06 字數 1300 閱讀 9164

1樓:網友

方法1.用api函式獲得系統目錄路徑,**如下:

private declare function getsystemdirectory lib "kernel32" alias "getsystemdirectorya" (byval lpbuffer as string, byval nsize as long) as long

private sub command1_click()

dim 路徑 as string, 字串長度 as long

路徑 = space(255)

字串長度 = getsystemdirectory(路徑, 255)

路徑 = left$(路徑, 字串長度)

msgbox "系統目錄路徑是: "路徑。

end sub

方法2:如果你嫌api麻煩,也可以如下:

private sub command2_click()

dim 路徑 as string

if dir("c:\windows\system32\") then

路徑 = c:\windows\system32\"

elseif dir("c:\winnt\system32\") then

路徑 = c:\winnt\system32\"

elseif dir("d:\windows\system32\") then

路徑 = d:\windows\system32\"

elseif dir("d:\winnt\system32\ ")then

路徑 = d:\winnt\system32\"

end if

msgbox "我想要的路徑是: "路徑。

end sub

2樓:網友

有個系統環境變數叫 %systemroot% 這個變數指像 c:\windows 或 winnt 目錄,可以用這個變數代替絕對路徑,或者你用api得到系統碟符並用api得到系統版本,反正目前只有 windows 和 winnt 兩種情況,根據版本判斷下就是了!

得到系統路徑的api是 getsystemdirectory

版本判斷你可以用登錄檔的方式!

高手進!vb問題

3樓:家庭小食堂

你直接放程式裡執行下不就知道了。這樣是成立的啊。b = a - a = 0) 這個的結果是b=1為什麼呢,因為b=0-(0=0)這裡0=0是true轉換過來就是-1所以呢b=0--1就等於1了。

剩下的乙個應該不用我解釋為什麼了吧。

vb高手進,VB高手進啊

for就是重複執行。先看簡單的 fori 1to5 print ok i next ii 1 輸出。i 2也輸出.i 5輸出。i 6就沒有了。所以會輸出5個ok vb執行顯示是ok1 ok2ok3 ok4ok5 next i的左右就是 for.next 之間做重複的範圍 在生活有很多例子 如你再算1...

vb問題請高手賜教

如果偶的理解沒錯,以下 可以滿足樓主的要求 private bj as boolean 新行標記 private sub mand1 click 重新整理按鈕 把新行加到text2前面 if len text1 0 then text2 text1 vbcrlf text2 text1 bj tru...

VB高手進啊

支援.一旦你學會了vb那麼學其他的絕對容易 但是如果你先學c,就會發現,c簡直是天書,等你學會了,黃瓜菜都涼了總體來說,先學vb再學c比先學c再學vb花的時間少得多 你先學qb吧 沒必要學vb 我現在把vb學精了,也就編寫一些遊戲 qb和許多語言是共通的,信我沒錯!學習vb首先要熟悉你所依賴的開發平...