VB里如何让WindowsMediaPlayer控件播放指定文件夹内音乐文件
VB里如何让WindowsMediaPlayer控件播放指定文件夹内音乐文件
日期：2016-10-28 12:07:29 人气：2
一个按钮,一个文本框用于输入文件夹地址(要正确输入,不要加引号),一个WMP,一个文件列表框
Dim i%
Private Sub Command1_Click()
On Error GoTo userCanceled
File1.Path = Text1.Text
If File1.ListCount < 2 Then Exit Sub
i = Int((File1.ListCount - 1) * Rnd)
File1.Selected(