跪求VB6.0,背景音乐及避免闪烁问题(急!!!!)

1)背景音乐.。我用的系统是XP SP2，看了网上用API做背景音乐的文章,试了一下却不好用,不知为什么.请指教。以下是网上看到的文章：
                你使用的是VB 6.0，可你调用的API函数却都是16位的，当然不会成功。正确的方法如下：
               实现加入如下声明：
                     Private Declare Function mciSendString Lib "winmm.dll" Alias _
                     "mciSendStringA" (ByVal lpstrCommand As String, ByVal _
                     lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal _
                     hwndCallback As Long) As Long
              ' 如果你想播放其它文件，修改这里
                    Private Const Song As String = "C:/Win95/Media/Canyon.MID"
             播放时使用如下命令：
                    mciSendString "open " & Song & " type sequencer alias canyon", _
                   0&, 0, 0
                   mciSendString "play canyon FROM 0", 0&, 0, 0
            停止时使用：
                  mciSendString "close canyon", 0&, 0, 0
2)消除闪烁问题。我打算在VB中播放一个GIF动画,此动画是一只鸽子,只具有煽动翅膀原地不动的能力.所以我想用某些控件承载它(最好控件可以透明)并且让该控件以一定轨迹在屏幕中移动，但是我发现，只要是透明控件必然存在闪烁问题。如果把控件的背景颜色设成和FORM的背景颜色一致就感觉不到闪烁。请教我应该使用什么控件，或函数，如何解决。
                                                                                   谢谢各位