Private Sub Form_Load() Open "1.zip" For Binary As #1 OLE1.SaveToFile (1) Close End Sub
[此贴子已经被作者于2018-8-14 22:53编辑过]