VB程式怎樣顯示顯示卡型號?

2025-04-04 07:25:30 字數 2554 閱讀 5708

1樓:匿名使用者

用wmi,工程-引納蘆用 microsoft wmi scripting library

添御鬧加乙個command,乙個label

private sub command1_click()

wmivideocontrollerinfo

end sub

private sub wmivideocontrollerinfo()

dim wmiobjset as swbemobjectset

dim obj as swbemobject

set wmiobjset = getobject("winmgmts:")

instancesof("win32_videocontroller"洞拆帶)

on local error resume next

for each obj in wmiobjset

next end sub

如何在vb中實現「顯示程式**」?

2樓:帳號已登出

= "private sub command1_click()" & chr(10) &

dim n as integer" & chr(10) &n = val(" & chr(10) &= fact(n)" & chr(10) &end sub"

如果**中有引號什麼的,就用chr()轉換一下。

3樓:網友

那你首先一定要程式**儲存到資料庫或者檔案。 這樣的話可能顯示長鬚**顯示上窗體。

vb中如何讓執行結果這樣顯示??要程式……

4樓:網友

private sub command1_click()

for i = 65 to 90

print "ascii:" & i & ",字元:" & chr(i)

print "ascii:" & i + 32 & ",字元:" & chr(i + 32)

next i

end sub

按照你的補充,應該用下面**:

private sub form_keypress(keyascii as integer)

print "ascii:" & keyascii & ",字元:" & chr(keyascii)

end sub

5樓:網友

private sub command1_click()

print "ascii:" & asc("a") &",字元:" & chr(65)

print "ascii:" & asc("a") &",字元:" & chr(97)

print "ascii:" & asc("b") &",字元:" & chr(66)

print "ascii:" & asc("b") &",字元:" & chr(98)

end sub

vb 怎麼把按條件輸入的內容在資料庫中查詢後,顯示在下面的表中,求**

6樓:網友

ctrl+t找microsoft datagrid control...

選單"工程"->引用" 找 microsoft activex data object...

dim cn as new

dim rst as new

dim sqlstr as string

provider=;data source=" & mode=readwrite"

sqlstr = select * from 社員 where 姓名 = &

aduseclient

sqlstr, cn, adopendynamic, adlockoptimistic, adcmdtext '老並卜打侍穗開記錄蔽嫌集。

set = rst '給datagrid修改資料來源。

vb編寫程式怎樣使窗體每次啟動時總顯示在螢幕的右上角?

7樓:網友

使用版本是否相同?需要執行自定義命令。

檢視vb生成的exe的屬性時,在「版本」選項卡里看到的資訊怎麼改?

8樓:網友

工程->工程 屬性-> 工程屬性視窗->"生成"選項卡->輸入版本號、產品名、公司名。等資訊->確定。

9樓:網友

在編譯工程前在工程的選單中選工程 屬性-> 工程屬性視窗->"生成"選項卡->輸入版本號、產品名、公司名等資訊->確定。

應用程式所顯示的名在編譯時會有提示"請輸入要生成的應用程式名"的視窗來提示輸入。

10樓:網友

編譯前,專案屬性中有版本/版權等資訊設定的地方。

怎樣設計乙個程式,輸入乙個字母或數字,就能顯示出它的ascii碼,vb**怎麼寫啊?謝啦

11樓:網友

先問乙個問題,你是不是要16位顯示**?

vb程式編寫

dim i as integer private sub form click form1.scale 0,20 20,0 i i 1 if i mod 3 1 then me.fillstyle 0 me.fillcolor vbred circle 10,10 2,vbred if i mod ...

VB程式求解

1 因為x,y是sub from click的區域性變數,因此在sub proc1中x,y的值為空值,因此,a,b為空值,print a,b列印出2個0來。2 因為vb預設是按地址傳遞,因此a,b為空值導致其實參x,y也被更改為空值,因此,print x,y為兩個0.所以最終的答案為 0 0 我覺得...

vb的程式題

dim h,m,s as integerprivate sub form load h 1 m 0 s 0 label1.caption 01 00 00 timer1.interval 1000end sub private sub timer1 timer s s 1 if s 0 then s...