关于VB程序 合成bin文件 通过载入一个文本文件,文本文件记录的是bin文件合成的顺序,如图中所示
将bin文件按列表顺序载入组合框,单击合成一个大文件,提问完毕我已经能从txt文档提取文件名(顺序文件方式读取的),并载入组合框,但是无法打开组合框中的文件,提示错误(代...
将bin文件按列表顺序载入组合框,单击合成一个大文件,提问完毕
我已经能从txt文档提取文件名(顺序文件方式读取的),并载入组合框,但是无法打开组合框中的文件,提示错误(代号52)。关键问题:无法打开组合框中的文件,希望大家多多帮忙!
换个方式提问:
如何通过上图中的文件名在指定目录查找文件,并依次载入列表框 展开
我已经能从txt文档提取文件名(顺序文件方式读取的),并载入组合框,但是无法打开组合框中的文件,提示错误(代号52)。关键问题:无法打开组合框中的文件,希望大家多多帮忙!
换个方式提问:
如何通过上图中的文件名在指定目录查找文件,并依次载入列表框 展开
3个回答
2011-01-22
展开全部
新春到来喜事多,合家团圆幸福多;心情愉快朋友多,身体健康快乐多;一切顺利福气多,新年吉祥生意多;祝您好事多!多!多! 加分吧,嘻嘻
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
参考如下代码:
Private Sub Command1_Click()
Dim a(511) As Byte
Dim i As Integer
Open "c:\bin.txt" For Binary As #1
For i = 1 To 512
a(i - 1) = i Mod 256
Put #1, i, a(i - 1)
Print a(i - 1)
Next
Close #1
End Sub
Private Sub Command1_Click()
Dim a(511) As Byte
Dim i As Integer
Open "c:\bin.txt" For Binary As #1
For i = 1 To 512
a(i - 1) = i Mod 256
Put #1, i, a(i - 1)
Print a(i - 1)
Next
Close #1
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询