二进制文件的读写一批随机数的存取 ， 程序为：
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二进制编程的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbs 二进制文件读写、vb.net二进制编程的信息别忘了在本站进行查找喔 。

• redis编程语言 redis对应c语言
• redis存储图片二进制数据 redis存图片流
• redis一般和什么语言一起开发 和redis类似的编程
• redis编程 redis代码案例
• redis编译 redis怎么编程
• mysql数据库编程语言 数据库语言mysql技巧
• mysql 编程 mysql初级代码
• 直接故意一定有犯罪目的吗 mysql实现cgi编程
• mongodb编程 mongodb代码行数
• mysql数据库编程 mysql数据编辑教程