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...