怎么存的再读回来不就行了吗?
用input读

解决方案 »

  1.   

    也许我没说清楚,jgxm.cfzh 是程序文件中的一个变量,所读取的数据是通过‘34’,‘12’这两个位置从卡中取出数据,在将这个数据赋值给jgxm.cfzh 变量
      

  2.   

    Private Sub Command1_Click()
        Dim a As Byte
        Dim i As Long
        Open "filename" For Binary As #1
        
        For i = 1 To 10
            Get #1, 10, a
        Next i
        Close #1
        
    End Sub