您好！

没有用过播放rm文件的函数，不过您可以使用Realplayer提供的控件来实现播放rm文件。

首先，添加Real Player ActiveX Control Library控件，该控件可以通过安装Realplayer 或者注册rmoc3260.dll获得。

然后，添加下面的代码
Private Sub Form_Load()
    RealAudio1.Controls = "imagewindow"
    RealAudio1.Source = "F:Film重庆森林重庆森林.rm"
    RealAudio1.DoPlay
End Sub