文件名称:VB源码-粒子流-小程序
文件大小:15KB
文件格式:RAR
更新时间:2012-01-27 13:38:38
VB源码
Attribute VB_Name = "Module1" Option Explicit '定义公共变量 Public Color As Long Public Mode As Integer Public Performance As Integer '定义Sub Main()过程 Sub Main() '单击“预览”命令按钮 If InStr(Command, "/s") > 0 Then 粒子流.Show '单击“设置”命令按钮 ElseIf InStr(Command, "/c") > 0 Then 设置对话框.Show End If End Sub
【文件预览】:
Form1.frm
粒子流.vbp
设置对话框.frm
Module1.bas
粒子流.exe
粒子流.vbw