在调用commonDialog控件以后,在程序中写如下代码:
Open CommonDialog1.FileName For Binary As #tempFile 二进制打开文件
Get #tempFile, , loadbytes() 文件内容写入数组
Close #tempFile放入mscomm控件,写代码
mscomm.output=loadbytes()内容写入mscomm的发送缓冲区
功能完成。打开以后显示的代码:
Open CommonDialog1.FileName For Binary As #tempFile
ReDim loadbytes(0 To LOF(tempFile) - 1) As Byte
Get #tempFile, , loadbytes() 文件内容写入数组
Close #tempFileText1.Text = StrConv(loadbytes(), vbUnicode) 显示在text1中
Open CommonDialog1.FileName For Binary As #tempFile 二进制打开文件
Get #tempFile, , loadbytes() 文件内容写入数组
Close #tempFile放入mscomm控件,写代码
mscomm.output=loadbytes()内容写入mscomm的发送缓冲区
功能完成。打开以后显示的代码:
Open CommonDialog1.FileName For Binary As #tempFile
ReDim loadbytes(0 To LOF(tempFile) - 1) As Byte
Get #tempFile, , loadbytes() 文件内容写入数组
Close #tempFileText1.Text = StrConv(loadbytes(), vbUnicode) 显示在text1中
解决方案 »
- Adodc1.Recordset.Find 问题 在线等 谢谢!!!!!!!!!!!!!!!!!!!!
- 请问微软停止对vb 6.0的支持,对vb 6.0的项目有什么不利?
- 急求VB编程代码!关于FFT傅立叶变换以及滤波的!!高手快帮帮忙
- 电脑中毒了.
- 要编写一个软件,要求开机后立即调用,且不能在任务管理器中显示,进程不能被中断,请问如何实现
- 我使用的是ADSL路由上网,但我想得到ADSL中外网的IP值,有办法吗
- 高分求助!为什么我生成一个十几秒的avi文件会有几十兆大?哪位大侠有好的生成avi文件的软件?
- 再线等待,如何实现类似文件拷贝的进度条?
- 急!求救
- 关于字符异或的问题,在线等!
- 关于VB下CLIPBOARD的小问题。
- 关于SQL语句的问题?
Open CommonDialog1.FileName For Binary As #tempFile 出错,提示错误的文件名或号码