平行四边形对角相等:请教vb多媒体编程问题:我想编一个音乐和图象的播放器,需要那些知识?是不是很难?

来源:百度文库 编辑:高校问答 时间:2024/04/30 15:24:40
我看了一些多媒体技术方面的书,其中都提到了很多声音和图象信号的压缩问题,我需要学习那些压缩算法吗?

如果隔时间不长,txt文件不大,txt文件内容不变:

Private index As Long, strLines(1000) As String, n As Long

Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True

Open App.Path & "\try.txt" For Input As #1
Do Until EOF(1)
Line Input #1, strLines(n)
n = n + 1
Loop
Close #1

End Sub

Private Sub Timer1_Timer()

Text1 = strLines(index)
index = index + 1
If index = n Then Timer1.Enabled = False

End Sub