1樓：
假如bai只是想列驅動器名，如下du
很簡單的，網路驅動
zhi器映dao射後也一樣能列出。
『列出所有版驅動器，不含權a，b
dim drv() as string
dim sd as string
drv() = split("c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z", ",")
for i = 0 to 23
sd = drv(i) & ":\"
if dir(sd, vbdirectory) <> "" thencomb.additem sd 』新增到列表中end if
next
在vb6.0中，有label 、command 標籤，怎麼設定使其上面的文字大小隨著控制元件大小的調整而改變。
2樓：匿名使用者
在執行狀態下,設定控制元件的 font中的name 及size 屬性就可以設定其字型名稱及大小.
如:command1.font.name="宋體"
command1.font.size="30"
label.font.name = "楷體_gb2312"
label1.font.size = "30"
3樓：
獲取當前控制元件大小，獲取修改後控制元件大小
算出比值，字型大小乘以比值
object.font.szie = object.font.szie * 比值
如何獲得vb 6.0系統的幫助功能 5
4樓：魯凱迪
狠點，bai不叫我對你做了嗎du？直接做vfp。
這三個zhi
表就可以完成。dao表1的員工信內息，部門結構
5樓：匿名使用者
要安裝 msdn,留下郵箱,我發給你
VB6 0點選按鈕自動開啟 EXE檔案
你先要判斷檔案是否存在，用一個api即可，在模組裡宣告 private declare function pathfileexists lib shlwapi.dll alias pathfileexistsa byval pszpath as string as long 然後在按鈕裡寫上 if ...
vb6 0 退出整個for迴圈用 exit for退出本
private sub command1 click dim i as integer,j as integerfor i 1 to 3 if i 2 then goto a 當i 2時，退出本次循專環屬 for j 1 to 3 print i j next j a next i end sub ...
vb60要求編寫function過程在文字框中輸入
寫了一段,窗 bai體上放du一個text,一個按鈕zhi,如下 daofunction sushu a as integer as integer for i 2 to a 1 step 1if a mod i 0 then msgbox a 不為素數 vbinformation vbokonly...