家庭理财系统,使用VB6.0编写,相当不错,可以用于课程设计

				Attribute VB_Name = "Const"
				'版本号
				Public Const VerNum As String = "版本 1.0"
				'生成日期
				Public Const GenDate As String = "日期 2005-12-03"
				'定义数据库连接字符串
				Public Const Conn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=FM.mdb;"
				 '一次执行connect操作可以访问数据库的次数
				Public Const CONNECT_LOOP_MAX = 10