这个题目对于初学者实现有相当的难度，在此可以给你提供一点创意思路，仅供参考：
1、创建一个最大化无边框窗体；
2、窗体前景色填充为黑色或深靛蓝色，当然也可以插入带天际线和遥远繁星的夜景素材照片；
3、在窗体加入非绑定对象框，对象编辑器方便起见可以选择PowerPoint，用绘图工具中的星与旗帜绘制小星星，要将幻灯片背景色设为与窗体背景同色比如黑色，绘制完成退出编辑，右键打开菜单选择属性将非绑定对象框格式中的背景样式和边框样式均设为透明，其余的星星可以用复制/粘贴的方法添加任意个，并将每个小星星按自己意愿填充任意颜色，调整不同大小，旋转任意角度，拖放到窗体任意位置；
4、打开窗体属性-事件找到计时器触发选择事件过程，并填上合适的计时器间隔时间值；
5、在事件过程代码中构建以随机函数RND()为主体，以Select Case分支为框架的程序，根据随机函数结果设置不同星星的可见性(Visible)属性,让散布于窗体不同位置的星星随机亮灭。
温馨提示：答案为网友推荐，仅供参考