怎样用VB做一个财务管理系统?

1：去下载一个现成的财务管理系统。把它的数据库结构弄清楚。

2：开始模仿人家的财务管理系统写需求分析，做出一个原型。

3：再多下卜悉让几个财务管理系统，陆缺吸收人家的优点。进一步开发。

4：开始测试型局，发放试用版，推出正式版。

以上只供快速开发及对财务管理系统不是很了解的人使用。

1.用access软件建立数据库,然后用它的导入余桥导出功能把数据从excel中导入.

2.建立数据源,连接access中的 数据库

3.用vb建立数据库程序,使用数据源,建嫌衫立数据 *** 作芹毁腔窗体.

'4个text1-text4,Label1(0-3).

Private Sub Command1_Click()

Dim k1 As Single, k2 As Single, k3 As Single, k4 As Single

k1 = Val(Text1.Text) '金额

k2 = Val(Text2.Text) '年限

If Val(Text1.Text) = 0 Then MsgBox "请输入金额！"

If k2 = 0 Then MsgBox "请输入存款年限！"

If k1 >= 5 Then

k4 = 3.6

Else

If k1 >= 4 Then

k4 = 3.2

Else

If k1 >= 3 Then

k4 = 2.9

Else

If k1 >= 2 Then

k4 = 2.7

Else

If k1 >= 1 Then

k4 = 2.5

Else

k4 = 1.8

End If

End If

End If

End If

End If

Text3.Text = (k1 * k2 / 100)

Text4.Text = k1 + (k1 * k2 / 100)

MsgBox k2 &" 年陪启携到期利息：　" &Text3.Text &"　元"

End Sub

Private Sub Command2_Click()

end

End Sub

Private Sub Form_Load()

Command1.Caption = "计算"

Command2.Caption = "退出"

Label1(0).Caption = "存旁兄款金额："

Label1(1).Caption = "存款年限："

Label1(2).Caption = "到期利息："

Label1(3).Caption = "芦伏本息合计："

End Sub

---