1、創建壹個最大化無邊框窗體;
2、窗體前景色填充為黑色或深靛藍色,當然也可以插入帶天際線和遙遠繁星的夜景素材照片;
3、在窗體加入非綁定對象框,對象編輯器方便起見可以選擇PowerPoint,用繪圖工具中的星與旗幟繪制小星星,要將幻燈片背景色設為與窗體背景同色比如黑色,繪制完成退出編輯,右鍵打開菜單選擇屬性將非綁定對象框格式中的背景樣式和邊框樣式均設為透明,其余的星星可以用復制/粘貼的方法添加任意個,並將每個小星星按自己意願填充任意顏色,調整不同大小,旋轉任意角度,拖放到窗體任意位置;
4、打開窗體屬性-事件找到計時器觸發選擇事件過程,並填上合適的計時器間隔時間值;
5、在事件過程代碼中構建以隨機函數RND()為主體,以Select Case分支為框架的程序,根據隨機函數結果設置不同星星的可見性(Visible)屬性,讓散布於窗體不同位置的星星隨機亮滅。