VB.NET 獲取系統(tǒng)文件操作信息

2005或者2008版中使用My命名空間（.net 框架快捷）輕松實(shí)現(xiàn)。如在2008中，可使用智能感知來插入，如在代碼編輯框內(nèi) 單擊右鍵---插入代碼段----基本元素，集合數(shù)據(jù)類型、文件操作、數(shù)學(xué)等-----文件 這樣就可以快速操作相關(guān)文件了

創(chuàng)新互聯(lián)2013年開創(chuàng)至今，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目網(wǎng)站設(shè)計(jì)制作、網(wǎng)站建設(shè)網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢想脫穎而出為使命，1280元田家庵做網(wǎng)站,已為上家服務(wù),為田家庵各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:18982081108

vb.net 如何獲取系統(tǒng)當(dāng)前運(yùn)行程序列表

sub

getpro()

dim

myinfo

as

string

dim

myprocesses()

as

process

=

process.getprocesses()

for

each

myprocess

as

process

in

myprocesses

myprocess.

if

(myprocess.mainwindowtitle.length

0)

then

myinfo

+=

myprocess.mainwindowtitle

+

vbcrlf

end

if

next

end

sub

上面程序可以去取得目前正在運(yùn)行的程序的標(biāo)題，根據(jù)標(biāo)題可判斷除他的運(yùn)行狀態(tài)。

VB或VB.NET 能不能取到BIOS中的信息

通過Microsoft WMI Scripting Library就可以了，你試一試在工程－引用下面引用 Microsoft WMI Scripting 1.2 Library Dim s, System, item

Dim i As Integer

Set System = GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")

For Each item In System

'List1.AddItem item.cputype

s = "Computer Info" vbCrLf

s = s "***********************" vbCrLf

s = s "計(jì)算機(jī)名稱: " item.Name vbCrLf

s = s "狀態(tài): " item.Status vbCrLf

s = s "類型: " item.SystemType vbCrLf

s = s "生產(chǎn)廠家: " item.Manufacturer vbCrLf

s = s "型號(hào): " item.Model vbCrLf

s = s "內(nèi)存: ~" item.totalPhysicalMemory / 1024000 "mb" vbCrLf

s = s "域: " item.domain vbCrLf

s = s "工作組" item.Workgroup vbCrLf '獲得工作組和域的選項(xiàng)不能同時(shí)用

s = s "當(dāng)前用戶: " item.username vbCrLf

s = s "啟動(dòng)狀態(tài)" item.BootupState vbCrLf

s = s "該計(jì)算機(jī)屬于" item.PrimaryOwnerName vbCrLf

s = s "系統(tǒng)類型" item.CreationClassName vbCrLf

s = s "計(jì)算機(jī)類類型" item.Description vbCrLf

' For i = 0 To 1 '這里假設(shè)安裝了兩個(gè)系統(tǒng)

' s = s Chr(5) "啟動(dòng)選項(xiàng)" i " :" item.SystemStartupOptions(i) vbCrLf

' Next i

Next

Text1.Text = s 把上面這些代碼放在一個(gè)按鈕的Click事件里，并在窗體 上放一個(gè)TEXT叫TEXT1，并把text1.MultiLine 設(shè)成True，把text1.ScrollBars設(shè)成 2 試一試就知道了

vb.net 如何獲取當(dāng)前系統(tǒng)的CPU使用率

使用wmi

類“Win32_Processor”中LoadPercentage屬性為當(dāng)前的cpu使用率

示例代碼： Private Sub Timer1_Timer()

Dim WMI服務(wù) As Object

Dim 對(duì)象 As Object

Dim 子對(duì)象 As Object

Dim 電腦名 As String

Dim 刷新 As Long

刷新 = 0

電腦名 = "." '表示本地計(jì)算機(jī)

Set WMI服務(wù) = GetObject("winmgmts://" 電腦名 "/root/cimv2")

Set 對(duì)象 = WMI服務(wù).InstancesOf("Win32_Processor")

Me.CurrentX = 0

Me.CurrentY = 0

For Each 子對(duì)象 In 對(duì)象

If 刷新 = 0 Then

刷新 = 1

Me.Cls

End If

Me.Print 子對(duì)象.Name "[" 子對(duì)象.CurrentClockSpeed "Hz] 使用率:" _

子對(duì)象.LoadPercentage "%"

Next

End Sub

分享題目：vb.net讀取系統(tǒng)信息 vb文件讀取
文章地址：http://www.chinadenli.net/article22/dooihjc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供面包屑導(dǎo)航、App設(shè)計(jì)、網(wǎng)站設(shè)計(jì)公司、品牌網(wǎng)站建設(shè)、網(wǎng)站收錄、外貿(mào)網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)