一、二進制文件讀寫
創新互聯專注為客戶提供全方位的互聯網綜合服務,包含不限于成都網站建設、網站設計、勉縣網絡推廣、微信小程序開發、勉縣網絡營銷、勉縣企業策劃、勉縣品牌公關、搜索引擎seo、人物專訪、企業宣傳片、企業代運營等,從售前售中售后,我們都將竭誠為您服務,您的肯定,是我們最大的嘉獎;創新互聯為所有大學生創業者提供勉縣建站搭建服務,24小時服務熱線:18980820575,官方網址:vcdvsql.cn
1、寫二進制數據到指定目錄
==將barray字節數組中的數據創建在strFilename目錄文件下,存儲格式為二進制,False表示不添加,直接覆蓋創建。
2、從指定路徑下讀取二進制數據到數組
==將目錄中的文件讀取到barry字節數組中,即讀取二進制文件。
二、字符文件的讀寫
1、 將txtFile控件中的字符寫到srtFileName指定目錄,以創建方式。
2、從srtFileName目錄中的文件讀取到txtFile控件
numHex =Integer.Parse(strHex, Globalization.NumberStyles.AllowHexSpecifier)
或
numHex = Integer. Parse("H" strHex)
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點虐
進制 vbnet single
URL標題:http://vcdvsql.cn/article2/ddgooic.html
成都網站建設公司_創新互聯,為您提供網站排名、定制網站、定制開發、、App開發、品牌網站設計
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯