使用VFP3.0編寫應用程序時，我們利用系統本身的性能可以制作出類似于WORD、EXCEL啟動時的軟件封面、漂亮的窗口背景和帶背景音樂、移動字幕的動感封底，使我們編寫的VFP3.0應用程序更具有專業性。
一、封面、背景的制作
1.用畫筆或其它繪圖工具軟件繪制一幅BMP位圖格式的封面圖片文件Face.bmp。也可從其它現有的圖片文件中截取剪切一幅比較合適的圖片，再用圖片轉換軟件將其轉換為BMP位圖格式文件，作為封面圖片。
2.以同樣方法再作一幅背景圖片Back.bmp，尺寸為屏幕大小，以全部覆蓋主菜單窗口空白區為準。如果屏幕分辯率為640×480，則背景圖片尺寸大概為640×450象素左右。
3.進入Visual Foxpro 3.0系統環境，打開應用程序所在的項目，在命令行窗口中鍵入Create Form或在“文件”菜單中選擇“新建”、“表單”，建立一個文件名為 Fack.scx 的新表單FORM1。
4. 設置表單FORM1的Picture屬性，選取剛才作好的Face.bmp文件，調整表單FORM1的窗口大小，使其恰好被封面圖片全部覆蓋；然后再設置表單FORM1的其它屬性：AutoCenter=.T.，Borderstyle= 0-無邊框，MaxButton=.F.，MinButton=.F.，Movlable=.F. 等。
5. 鼠標點擊“表單控制欄”中的“標簽”，并在表單FORM1上拉出一個矩形框Lable1，設置Lable1的Caption屬性為“人事管理系統”。
6. 鼠標點擊“表單控制欄”中的“計時器”，在表單FORM1中加入兩個計時器對象Timer1和Timer2，設置Timer1的Interval屬性為了3000（3秒），Timer2的Interval屬性為了4000（4秒），在Timer1的Time過程中加入語句：
_screen.picture="Back.bmp" &&打開屏幕背景圖片
在Timer2的Time過程中加入語句：
release thisform&&釋放封面表單
7.在主文件程序的最前面加入語句：
ZOOM WINDOWS SCREEN Max&&菜單主窗口最大化
DO FORM Face.scx&&執行封面表單
8. 實現效果：執行編譯后的應用程序，菜單主窗口出現并擴大到最大化時，彈出封面，封面停留3秒鐘后打出背景圖案，再經過1秒鐘封面消失，程序進入帶有背景圖案的主窗口界面。
二、帶背景音樂、移動字幕封底的制作
1. 用背景圖片的作法及標準制作一幅封底圖片Over.bmp，尺寸為屏幕大小，以全部覆蓋主菜單窗口空白區為準。如果屏幕分辯率為640×480，則封底圖片大概為640×440象素左右。
2. 建立一個文件名為 Over.scx 的新表單 FORM2。設置表單FORM2的Picture 屬性為 Over.bmp，再設置屬性AutoCenter=.T.，Borderstyle= 2-雙線邊框，MaxButton=.F.，MinButton=.F.，Movlable=.F.，Height=440,Width=640等。
3. 在表單FORM2中加入兩個標簽對象Lable1和Lable2，按實際情況調整好Lable1和Lable2的位置，設置Lable1和Lable2 的屬性AutoSize=.T.，BackStyle =0-透明，Caption=""，FontName=隸書，設置Lable1屬性FontSize=36，設置Lable2 的屬性FontSize=24。
4. 鼠標點擊“表單控制欄”中的“OLE容器控制”，拖動到表單FORM2中建立Olecontrol1對象，在彈出的“插入對象”窗口中選擇“媒體剪輯”對象類型，選中“以圖標顯示”框，將其隱藏。在打開的“媒體播放機”窗口中，從文件列表中選擇一.wav文件或.MID文作為封底背景音樂，選擇“編輯”菜單下“選項”中的“自動重復”，將其設為循還播放，并去掉“重放的控制條”的選中標記，讓音樂播放時不出現“媒體播放機”界面，確認后退出。然后設置Olecontrol1的屬性Visible=.F.，AutoSize=.T.。
5. 在表單FORM2的Avtivate過程中加入語句：
Public t&&定義全局變量t
t=0
a="人事管理系統"+chr(13)+chr(13)
b=" 項目策劃：李湘江"+chr(13)+chr(13)
c=" 軟件設計：李湘江"+chr(13)+chr(13)
d="矩菱機電工作室出品"+chr(13)
e=" 一九九八年二月"
thisform.label2.caption=a
thisform.label1.caption=b+c+d +e
thisform.olecontrol1.doverb(0)&&打開Olecontrol1對象
6. 在表單FORM2中加入一個計時器對象Timer1，設置Timer1的Interval屬性為了30（0.03秒）,在Timer1的Time過程加入程序語句：
If t<3000 then&&時間控制
t=t+4
ift<=255 then
thisform.label1.forecolor=RGB(t,0,0)&&顏色漸變，黑→紅
else
if t<=510 then
thisform.label1.forecolor=RGB(255,t-255,0)&&顏色漸變，紅→黃
else
thisform.label2.top=thisform.label2.top-1 &&字幕label2上移
thisform.label1.top=thisform.label1.top-1 &&字幕label1上移
endif
endif
endif
7. 在表單 FORM2 的 Click 過程中加入語句：
release t&&釋放全局變量t
release thisform&&釋放封底表單
8. 在主文件程序的最后面加入語句：
DO FORM Over.scx &&執行封底表單
9. 實現效果：執行應用程序后，在退出應用程序時，出現動態封底，同時響起優美的音樂。鼠標單擊封底畫面，封底關閉，返回Windows桌面。
作 者：李湘江