把它寫在VB .NET

-3

這是德爾福6代碼：把它寫在VB .NET

Buf: array[1..5000000] of Char; 
BufC: array[1..5000000] of Char;

如何寫在VB.NET ？

這就是爲什麼我需要 '變種' BUFC（Delphi6的）：

var 
i,ii: LongInt; 
BitPenanda,inbuf,buflong,SameBit,ulang4,uu :integer; 
SigmaMin:LongInt; 
Save_Cursor:TCursor; 
SigmaAscii: Array[0..255] of LongInt; 

Begin 
BufC[1]:='R';BufC[2]:='U';BufC[3]:='N'; 
for uu:=0 to 255 do

.......................... ..............................

來源

2013-09-27 liohardy

你爲什麼不自己動手？堆棧溢出不是要求其他人爲您編寫代碼的地方。如果你不知道任何VB.net，那麼你需要學習一些。 –

@DavidHeffernan我已經嘗試過了..我不是一個編程語言的專業人士，我是人。這就是爲什麼我要求和尋找解決方案，我非常感謝所有幫助過我的人，並希望我能夠幫助他們以及幾種方式.. – liohardy

如果你已經嘗試過，那麼你應該顯示你已經嘗試過。 –

Dim Buf(4999999) as Char 
Dim BufC(4999999) as Char

根據您的編輯：

Dim i,ii,SigmaMin as Long 
Dim BitPenanda,inbuf,buflong,SameBit,ulang4,uu as Integer; 
Dim BufC(4999999) as Char 
//TCursor? 
Dim SigmaAscii (255) as Long; 



For uu = 0 To 255 
    BufC(0) = "R" 
    BufC(1) = "U" 
    BufC(2) = "N" 
Next

的上面的代碼似乎毫無意義，除非你有錯字？

來源

2013-09-27 07:47:24 user1831003

'char'是VB.net中的16位，Delphi 6中的8位。'Long'是VB.net中的8位64位，Delphi中的32位。 –

@ user1831003這是工作..：D謝謝先生..稍作修改，「[]」改爲「（）」.. – liohardy

@liohardy ..這是一項家庭作業嗎？如果是，那麼我的代碼是不正確的。告訴我這段代碼的目的，以便我可以正確地引導你。 – user1831003

把它寫在VB .NET

回答

相關問題