關(guān)于vb.net空閑的信息

vb.net 中 axwinsock控制 如何處理斷網(wǎng)事件

原代碼的問題: 1.計時器每過 [Interval] 毫秒就會自動觸發(fā) Timer() 事件,而你在其中又加了一個循環(huán),讓人不知所云 2.下面這段代碼是始終無法執(zhí)行到 Close 1 的,因為一旦跳到這段代碼,首先執(zhí)行的便是 Exit Sub ,于是程序就不會關(guān)閉這個文件。 E: Exit Sub Close 1 同時,正確的語法應(yīng)是:Close #1 3.最好不要頻繁的打開、關(guān)閉文件,這樣會影響程序的性能 4.你的變量 i 與 NewFile 的聲明有問題。如果在某一事件中使用 Dim ,在其所在的事件結(jié)束后,變量就會被銷毀。于是 NewFile 便始終只有一個字符。應(yīng)該使用 Static 創(chuàng)建靜態(tài)變量,或?qū)⑦@兩個變量用 Dim 在(通用)(聲明)處將其聲明。 你可以在(通用)(聲明)處(所有代碼的最上面)聲明: Dim File As String '文件名 Dim Fid As Integer '文件號 把打開文件的代碼放在窗體打開的事件里面: Private Sub Form_Load() Fid = FreeFile File = "F:\test1.txt" Open File For Input As #Fid End Sub 注:此處你最好用 FreeFile 生成一個空閑的文件號。萬一 #1 這個文件號被占用,那程序還是會出錯的。 然后在定時器里面添加代碼: Private Sub Timer1_Timer() Static i '因為 i 是隨著定時器的事件一一累加的,所以要聲明為靜態(tài)變量。 Static NewFile As String '因為 NewFile 里的字符是隨著定時器的事件一一累加的,所以要聲明為靜態(tài)變量。 Dim Char As String '因為 Char 只是作為臨時變量,所以聲明為普通變量。 On Error GoTo E i = i + 1 Char = Input(i, #Fid) '你在這里寫的代碼是 Char = Input(1, #1) ,是不是寫錯了?我給你改成了 i NewFile = NewFile + Char Text1.Text = NewFile IF i = LOF(Fid) Then Timer1.Enable = Fals

創(chuàng)新互聯(lián)建站基于分布式IDC數(shù)據(jù)中心構(gòu)建的平臺為眾多戶提供托管服務(wù)器 四川大帶寬租用 成都機柜租用 成都服務(wù)器租用。

vb.net中如何設(shè)置進程的基本優(yōu)先級

下面的代碼示例說明了更改線程優(yōu)先級的結(jié)果。創(chuàng)建兩個線程,其中一個線程的優(yōu)先級設(shè)置為 BelowNormal。兩個線程在 while 循環(huán)中都增加一個變量,并運行一段設(shè)定的時間。

Option Explicit

Option Strict

Imports System

Imports System.Threading

Public Class Test

MTAThread _

Shared Sub Main()

Dim priorityTest As New PriorityTest()

Dim threadOne As Thread = _

New Thread(AddressOf priorityTest.ThreadMethod)

threadOne.Name = "ThreadOne"

Dim threadTwo As Thread = _

New Thread(AddressOf priorityTest.ThreadMethod)

threadTwo.Name = "ThreadTwo"

threadTwo.Priority = ThreadPriority.BelowNormal

threadOne.Start()

threadTwo.Start()

' Allow counting for 10 seconds.

Thread.Sleep(10000)

priorityTest.LoopSwitch = False

End Sub

End Class

Public Class PriorityTest

Dim loopSwitchValue As Boolean

Sub New()

loopSwitchValue = True

End Sub

WriteOnly Property LoopSwitch As Boolean

Set

loopSwitchValue = Value

End Set

End Property

Sub ThreadMethod()

Dim threadCount As Long = 0

While loopSwitchValue

threadCount += 1

End While

Console.WriteLine("{0} with {1,11} priority " _

"has a count = {2,13}", Thread.CurrentThread.Name, _

Thread.CurrentThread.Priority.ToString(), _

threadCount.ToString("N0"))

End Sub

End Class

我用VB.NET編了個程序,在加在一些數(shù)據(jù)是,會占用很多系統(tǒng)資源

可以將文件等分成兩部分,分別用兩個private讀取就是2線程。

內(nèi)存解決方案:不要等程序自動GC,自己手動釋放不需要內(nèi)存。

缺陷:可能會浪費時間。

學習VB.NET要多久

弟你好:

我是在微軟做教材的員工,據(jù)我了解學習.NET入門并不難。如果你了解JAVA這門語言,那么學習會很輕松。如果沒有接觸過面向?qū)ο缶幊炭赡芫鸵闊┮稽c點。大概也就是1個月左右便可以入門。因為基本上你要是學習VB.NET的話,除了部分語法可以借鑒老的VB,其他基本都要拋棄。但是不會很困難。最重要的就是理解.NET運行原理,掌握語法和部分常用類庫就可以了。

看你所述你似乎想要做網(wǎng)站。市場行情來看,人家免費論壇都已經(jīng)發(fā)布源碼很多了,無論是ASP還是.NET開發(fā),都變得非常容易。如果想從這方面就業(yè),前景也不是很樂觀。其實如果不是很麻煩的網(wǎng)站,微軟OFFICE組件中的SharePoint Server就可以完全滿足要求。根本不需要懂多少編程。

如果想從事工作,還是推薦學習VS.NET 2005和SQL Server 2005。

以上是哥哥的愚見,希望對你有所幫助

求采納為滿意回答。

VB.NET程序如何巧妙釋放內(nèi)存

set xxx=nothing就是把對象占用的空間釋放掉。 其他的局部變量都在棧內(nèi)存,用完會自動釋放的

文章題目:關(guān)于vb.net空閑的信息
文章位置:http://muchs.cn/article8/hcpcop.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供用戶體驗、商城網(wǎng)站、定制開發(fā)、企業(yè)網(wǎng)站制作、企業(yè)建站

廣告

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

小程序開發(fā)