mdlstandard.bas

vb源码大全

Attribute VB_Name = "mdlStandard"
Option Explicit

Sub main()
   ''实例化一个About窗口类
   Dim frm As New frmAbout
   ''调用About窗口对象的ShowDialog方法显示窗体
   frm.ShowDialog 1, "这是标题！", "这是程序描述！", "版本：2.1.5", 5
End Sub