VB 6.0 轉(zhuǎn)為vb 點虐

把代碼輸入到vb點虐 里面，可以轉(zhuǎn)。就像word2003文檔用word2007文擋打開，再保存為2007格式一樣。

創(chuàng)新互聯(lián)公司主要從事網(wǎng)站設(shè)計、成都網(wǎng)站設(shè)計、網(wǎng)頁設(shè)計、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)鼓樓,十余年網(wǎng)站建設(shè)經(jīng)驗,價格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):18982081108

下面的VB6.0編寫的代碼怎么轉(zhuǎn)為VB點虐

Dim?file1?As?FileStream

filename?=?"c:\temp\MyTest.txt"

Dim?GetData(4)?As?Byte,?s(4)?As?Char

file1?=?System.IO.File.OpenRead(filename)

Dim?CMGs?As?Long

Dim?DPBo?As?Long

Dim?i?As?Integer?=?0,?j?As?Integer

While?file1.Read(GetData,?0,?5)??0

i?=?i?+?1

For?j?=?0?To?4

s(j)?=?ChrW(GetData(j))

Next

If?s?=?"CMG="""?Then?CMGs?=?i

If?s?=?"[Host"?Then?DPBo?=?i?-?2?:?Exit?While

End?While

主要是vb點虐 取消了定長字符串, 所以用字節(jié)數(shù)組讀入, 還得轉(zhuǎn)成字符數(shù)組來比較.

vb6.0轉(zhuǎn)VB.NET中簡單的問題?新手

Visual Basic 還是一如以往那樣提供著強(qiáng)大的語法智能感知功能，但為了實現(xiàn)平臺下跨語言集成，使得和其他.NET語言整合，諸如C#統(tǒng)一，它的事件參數(shù)都采用了一致的標(biāo)簽，所以你已經(jīng)不再看見原來那樣的KeyCode之類的事件參數(shù)了，取而代之的是sender和e兩個對象。

方法如下：

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown

If e.KeyCode = Keys.Enter Then

MsgBox("You press enter key!")

End If

End Sub