安徽省二vb,安徽省计算机二级vb考试怎样才算过

安徽省计算机二级vb考试怎样才算过
笔试 和上机都要60分以上 总成绩安最低的那个算
请问今年安徽省计算机二级VB考试分数什么时候能查询在哪里查询？
队长告诉你——在家等着
谁有安徽省计算机二级VB考试模拟系统软件？
http://bbs.ncre.cn/forumdisplay.php?fid=17

去这个网站，注册一个用户名就能看到了！
vb以二进制读取和写入文件
　　二进制文件的打开也用fileopen完成，只是打开二进制文件的形式为：openmode.binary
读取二进制文件用的是fileget方法，写入二进制文件用的是fileput方法。
应用实例：将一批随机数保存在一个dat文件中，然后再将其提取到文本框中。[实验报告 39]
见，二进制文件的读写一批随机数的存取，程序为：
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