Picture1.ForeColor = QBColor(13): Picture1.Print " "; s1(I); " "; /设置要显示文字的颜色为粉色
Picture1.ForeColor = QBColor(10): Picture1.Print s2(I)/设置要显示文字的颜色为绿色
CurY = CurY 800/设置要显示文字的行间距
Next I
CurY1 = CurY1 200/改变下一屏要显示文字起始纵坐标，即两屏间文字的纵坐标差
End If
End Sub
所有代码完成之后先把它编辑为exe格式的文件，然后把你的相片、动画和背景音乐文件复制到exe文件的目录中，并将它们分别命名为Demo.bmp、Demo.avi和Demo.wav。然后再运行程序看看，这时屏幕背景为黑色，在屏幕中间适当位置显示一幅图象，在此图象右上角适当位置连续播放动画，显示的文字信息从屏幕下面向上面滚动，至中间指定位置停止滚动，同时在此过程中连续播放背景音乐。看看你的你的大头照、动画和文字，不是全部显示出来了吗？
小蘑菇：行呀，叮当姐姐还真的很厉害！我算是服了你。但是假如我想实现走马灯形式的文字循环滚动怎么办呢？
小叮当：这也简单呀，只要改变横坐标Picture1_CurrentX就可以实现从左右二个方向往中间滚动显示，这部分我就不多说了，还是你自己参照着上面的代码修改完成吧。
小蘑菇：好吧，我再琢磨一下。嘿嘿，就这么轻轻松松的把我的多媒体简历界面做好了，看来下学期我可以多一些时间来玩游戏了，哈哈。