打开文件

Question

如何用get 以二进制打开 ，还有QQ的密码在本地的那个地方要打开用VB 如何编程呢！急呀！！

Answer 1

'读写二进制文件
Private Sub Command1_Click()
    Dim n As Long
    Dim arrBytes() As Byte
    
    '读出数据
    Open "d:\draw.ico" For Binary As 1
        n = LOF(1)
        ReDim arrBytes(1 To n) As Byte
        Get 1, , arrBytes
    Close 1
        '写入数据
    Open "d:\aaa.ico" For Binary As 2
        Put 2, , arrBytes
    Close 2
    
End Sub

Answer 2

楼主大人,你真厉害,想知道QQ的密码存在哪啊?!首先有这个想法就佩服你~记得找到以后,别忘了把解密的方法发到我的mail里:[email protected]谢了先

Answer 3

我也要
[email protected]
好东西大家一起分享程序赞同SoHo_Andy(冰)的