我是一个初学者，今天在按照网上下载的一个实例做FLASH动画播放器的时候，出现了问题，特来请教。
这个播放器有几个按钮，其中有“打开”、“播放”，但每次打开一个SWF文件之后，在点“播放”之后就出现错误，具体情况是弹出：“编译错误，子程序或函数未定意”。在“播放”按钮里面写下的是：
rivate Sub bf_Click()
If TotalFile < 1 Then Exit Sub
Form2.Caption = FileNames(PlayFileNum) + "_flash动画播放器"
Form2.Show
Form2!ShockwaveFlash1.Playing = True
If TotalFile = 1 Then PlayFileNum = 0
StatusBar1.Panels(3).Text "正在播放文件：" + FileNames(PlayFileNum) + "……"
Slider1.Max = Form2!ShockwaveFlash1.TotalFrames
Label2.Caption = Str(Slider1.Max / 2) + "帧"
Label3.Caption = Str(Slider1.Max) + "帧"
End Sub

但错误提醒我 所声明的变量“FileNames（）”有问题，这个变量我是在模块里面声明的：Dim FileNames() As String
请问错误倒底出在哪儿呢？？？ 好心的高手们哪，帮帮我吧