vb個(gè)人財(cái)務(wù)管理信息系統(tǒng)課設(shè)報(bào)告(文件)
【正文】 9。, ) B = (0) If IsNull(B) Then B = 0 End If = B C = A B If C 0 Then （論文） 15 D = 盈余 Else C = Abs(C) D = 透支 End If = Year(Now) amp。 , amp。 元 End If End Sub Private Sub Form_Load() On Error Resume Next Dim A, B, C As Integer Dim D As String Dim Year1, Month1, Riqi, Riqi1, Riqi3, Riqi4 Year1 = Year(Now) Month1 = Month(Now) Riqi = Year1 amp。 Month1 + 1 Set Mydb = ExeCutesql(select * from 收入 where 日期 between 39。and 39。, Str_text) Set = Mydb Set Mydb1 = ExeCutesql(select * from 支出 where 日期 between 39。and 39。, Str_text) Set = Mydb1 Set Money = ExeCutesql(select sum(金額 ) from 收入 where 日期 between 39。and 39。, ) A = (0) If IsNull(A) Then A = 0 （論文） 16 End If = A Set Money1 = ExeCutesql(select sum(金額 ) from 支出 where 日期 between 39。and 39。, ) B = (0) If IsNull(B) Then B = 0 End If = B C = A B If C 0 Then D = 盈余 Else C = Abs(C) D = 透支 End If = Year(Now) amp。 , amp。 元 End Sub Private Sub MSHFlexGrid2_Click() End Sub 【銀行交易統(tǒng)計(jì)】窗體代碼設(shè)計(jì) 【項(xiàng)目管理】窗體代碼設(shè)計(jì) 【基本信息查詢】窗體代碼設(shè)計(jì) 【選擇月份】窗體代碼設(shè)計(jì) 代碼設(shè)計(jì)如下： Dim Mydb As New Dim Riqi, Riqi1, Year1, Month As String （論文） 17 Private Sub Command1_Click() If = Then MsgBox 請(qǐng)選擇年份！ , vbOKOnly + 32, 注意！ Else If = Then MsgBox 請(qǐng)選擇月份！ , vbOKOnly + 32, 注意！ Else aa = True Year1 = Month = Riqi = Year1 amp。 Month + 1 Cdate1 = Format(Riqi, yyyymm) Cdate2 = Format(Riqi1, yyyymm) Unload Me End If End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() Dim Y, M As Integer Y = 2020 For Y = Int(Year(Now) 5) To Int(Year(Now)) Y Next Y M = 1 For M = 1 To 12 M Next M End Sub （論文） 18 6 系統(tǒng)運(yùn)行 系統(tǒng)主界面操作 系統(tǒng)運(yùn)行從主界面開始，這樣才能調(diào)用其他窗體。 單擊【添加】按鈕，在【添加項(xiàng)目】文本框中輸入“轉(zhuǎn)賬”，然后單擊【保存】按鈕，即可往系統(tǒng)中添加一條收入項(xiàng)目。 分別填寫日常收入的相關(guān)信息后單擊【添加】按鈕，即可添加一條收入記錄。 對(duì)借入款項(xiàng)的添加、修改和刪除操作與對(duì)日常收入記錄的管理類似。 （論文） 19 月度統(tǒng)計(jì)管理操作 單擊工具欄中的【月度統(tǒng)計(jì)】按鈕，即可進(jìn)入【月度統(tǒng)計(jì)】管理界面。網(wǎng)絡(luò)資源是一個(gè)豐富的共享體系，我通過在 論壇上提出問題得到了很多熱心網(wǎng)友的幫助，這堅(jiān)定了我通過 網(wǎng)絡(luò)吸收知識(shí)的信心。 單擊【其他月份】按鈕，在彈出的【選擇月份】窗口中選擇相應(yīng)的日期，然后單擊【確定】按鈕，則會(huì)在【月度統(tǒng)計(jì)】窗口中顯示已選擇月份的統(tǒng)計(jì)詳情。 單擊【上一條】、【下一條】按鈕，可以瀏覽記錄，單擊【末條】按鈕則會(huì)顯示最后 一條記錄信息。 對(duì)日常支出的管理 和銀行賬戶信息的管理 與此類似。 對(duì)支出項(xiàng)目的管理與此類似。 單擊工程中的【啟動(dòng)】按鈕或按【 F5】快捷鍵運(yùn)行系統(tǒng)，顯示系統(tǒng)主界面，在主界面上選擇不同的菜單命令或者單擊不同的命令按鈕，即可顯示不同的窗體。 Month
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1