请问如何用vb按文件块读流媒体文件? 我想用VB读一个aaa.asf(大小有3M)文件,要从第2.1M开始读这个文件,请问如何解决? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Option ExplicitDim L As LongDim gByt() As BytePrivate Sub Command1_Click() Dim DLong As Long DLong = 1024 DLong = 2.1 * DLong * DLong Open "c:\aaa.asf" For Binary As #1 L = LOF(1) ReDim gByt(0 To L - DLong) Get #1, DLong, gByt() Close #1End Sub 循环用 PRINT 1#,a & chr(9) & b 生成的表格文件如何转换为网页HTML表格 总是提示验证码错误,网页类问题,请问如何解决呢? 【冒着被灭的风险发个聊天记录】标题,就叫"我和剪子老婆的对话"得了..... 如何调用属性页? 请问谁有检测Win2000 sever下CPU占用率的VB代码 Excel问题! 按钮控件是动态生成的,如何写多个按钮控件的事件?且个数不确定!! 请问各位高手,有谁知道FTP的断点续传,百分全送,急急 怎么读取文件中的内容? 请教一个问题! 怎样在已有的应用程序的工具栏上添加控件? 用update更改记录时问题依然存在!
Dim gByt() As BytePrivate Sub Command1_Click()
Dim DLong As Long
DLong = 1024
DLong = 2.1 * DLong * DLong
Open "c:\aaa.asf" For Binary As #1
L = LOF(1)
ReDim gByt(0 To L - DLong)
Get #1, DLong, gByt()
Close #1
End Sub