VB內部采用Unicode編碼,在這種編碼格式下,任何字符(包括半角的字母、數字、符號以及全角的漢字、符號)都是占用兩個字節的。因此,Len("1111徐")的返回值是5,表示5個字符,而LenB("1111徐")的返回值是10,表示占用10個字節。
創新互聯建站主要從事成都網站設計、成都網站制作、網頁設計、企業做網站、公司建網站等業務。立足成都服務紅山,十余年網站建設經驗,價格優惠、服務專業,歡迎來電咨詢建站服務:18982081108
要想按ANSI編碼格式來獲取字符串的字節數,必須這樣:
LenB(StrConv("1111徐", vbFromUnicode))
要注意哦,雖然返回值是6,但這個數與這個字符串在內存中的實際占用字節數是不相符的哦!
Dim?fs?As?New?System.IO.FileStream("D:\1.txt",?IO.FileMode.Open,?IO.FileAccess.Read)
Dim?buffer(3)?As?Char
Dim?re?As?New?System.IO.BinaryReader(fs)
re.Read(buffer,?0,?4)'表示從0位開始讀4位
MsgBox(buffer)
1、實現上傳按鈕方法代碼。
2、判斷圖片對象是否為空代碼。
3、取得數據庫字段 dt.Rows(0)("Pic")方法代碼。
4、字節數組轉換為Image類型方法代碼。
5、處理SQL中操作Image類型方法代碼。
6、實現的上傳結果。
1、字節數組轉換為字符串
byte[] byBuffer = new byte[20];
String strRead = new String(byBuffer);
strRead = String.copyValueOf(strRead.toCharArray(), 0, byBuffer.length]);
2、字符串轉換成字節數組
byte[] byBuffer = new byte[200];
String strInput=abcdefg;
byBuffer= strInput.getBytes();
注意:如果字符串里面含有中文,要特別注意,在android系統下,默認是UTF8編碼,一個中文字符相當于3個字節,只有gb2312下一個中文相當于2字節。這種情況下可采取以下辦法:
VB.NET打開二進制文件用fileopen完成,打開二進制文件的形式為:openmode.binary
讀取二進制文件用的是fileget方法,寫入二進制文件用的是fileput方法。
應用示例:將一批隨機數保存在一個dat文件中,然后再將其提取到文本框中。
二進制文件的讀寫一批隨機數的存取,程序為:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x, i, fn As Integer
Dim s As String = ""
fn = FreeFile()
FileOpen(fn, "d:\data.dat", OpenMode.Binary)
For i = 1 To 8
x = Int(Rnd() * 100)
s = s + Str(x)
FilePut(fn, x)
Next
FileClose(fn)
TextBox1.Text = s
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim x, fn As Integer
Dim s As String = ""
fn = FreeFile()
FileOpen(fn, "d:\data.dat", OpenMode.Binary)
Do While Not EOF(fn)
FileGet(fn, x)
s = s + Str(x) + " "
Loop
FileClose(fn)
TextBox1.Text = s
End Sub
網頁標題:vb.net取字節,vb取字符串
文章鏈接:http://m.kartarina.com/article32/heggpc.html
成都網站建設公司_創新互聯,為您提供靜態網站、網站建設、移動網站建設、企業建站、建站公司、網站設計公司
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯