VB的小問題

時間 2022-07-25 16:40:14

1樓:

使用sysinfo控制元件,例如

在部件裡新增microsoft sysinfo control 6.0

然後在窗體(暫定叫做form1)上放置一個sysinfo控制元件name屬性設定為「mysysinfo」

準備好另一個窗體「form2」

然後在form1**中新增:

private sub form_load()if mysysinfo.osversion = 5 thenmsgbox "是win2k/xp/2003"

else

msgbox "不是win2k/xp/2003"

load form2

form2.show

unload me

end if

end sub

解釋:windows2000(win2k)的版本號是5.0,xp是5.

1,2003是5.2,版本號為5的系統只有這三個,windowsvista是6.0,win7是6.

1,win9x是4.0,等等。

2樓:匿名使用者

這個比較麻煩,很難弄的,要呼叫api函式的

3樓:匿名使用者

這個我也還不會的,看有沒有知道的人說說。

vb入門問題,關於vb的小問題

也不知道你是不是喜歡學習程式設計。如果不喜歡就應付考試就可以了。喜歡的話,一開始不知道看什麼就上圖書館找書看去吧,看得多了,你就慢慢知道學什麼了。慢慢來吧,做一些實用的小程式,為以後工作打基礎吧。關於vb的小問題 setmynum是一個變數。val表示把括號後面的數轉化為10進位制的數值形式。h是1...

關於VB的小問題,關於VB的一個小問題

程式很經典,text1.text 不是純數字經過 str val text1.text 轉換的結果就不會等於 text1.text。主要還是要了解 val str 函式的作用,val 是將字元 日期 強行轉換為數字,非數字部分則會被 pass 掉,str 則是將數字 日期 轉換成字元。你可以用isn...

VB裡關於Checkbox的小問題

已看到了補充部分,其實下面 就可以實現上述目標,或者你也可以把它放在timer控制元件內實時監視。建議用控制元件陣列check1 index 0 7 然後用下面 判斷即可。當然,不管控制元件陣列元素有多少,下面 均適用 private sub check1 click index as intege...