机房收费系统总结【2】-细节优化
前言:
機房收費的過程中遇到了很多以前沒有發現的問題!
問題1:
我們都要給用戶提示,詢問用戶是否確認關閉窗體,這個功能還是有必要的,萬一一不小心點擊退出!保障措施!
解決:在卸載事件里寫這樣的代碼,提示用戶!
Private Sub Form_Unload(Cancel As Integer)If MsgBox("確定要退出嗎?", vbYesNo) = vbNo ThenCancel = 1End If
End Sub
問題2:
在一些窗體中我們用到下拉列表時,需要給用戶設置一個默認缺省值,這樣可以減少用戶自己的輸入,這樣讓有特殊需求的用戶去自己選。能夠提高用戶體驗!
解決:
下拉框默認值
Private Sub Form_Load()
Combo1.Text = Combo1.List(1)
End Sub
問題三:
想要在系統中顯示現在時間,首先調用日期函數,將函數放到Timer控件中,隔一段時間就可以刷新,一直顯示的是當前時間!
解決:獲取時間
https://blog.csdn.net/u013201439/article/details/47376497
問題四:獲取消費時間
解決:關鍵是要計算上機時間和下機時間的差值是多少個單位時間!
DateDiff函數
格式:DateDiff(“s”,2017-1-1 18:00:00",“2017-1-2 18:00:00”)
計算2017年1月1號下午6點到2017年1月2號下午6點之間的秒數!
DateDiff(“n”,2017-1-1 18:00:00",“2017-1-2 18:00:00”)
計算2017年1月1號下午6點到2017年1月2號下午6點之間的分鐘數!
DateDiff(“h”,2017-1-1 18:00:00",“2017-1-2 18:00:00”)
計算2017年1月1號下午6點到2017年1月2號下午6點之間的小時數!
DateDiff(“n”,mrc!ontime",“now()”)
函數的兩個時間參數的格式需要一致!
相關推薦:
https://blog.csdn.net/lyyswx/article/details/51985300
https://blog.csdn.net/enzochan/article/details/51695466
問題五:
在文本框的輸入首先都會被處理為字符,但我需要輸入的內容進行計算!
解決:類型轉換函數
VAL(字符串表達式)將數字字符串換成數值
CSTR與VAL功能相反,CSTR將數值表達式的值換成字符串
如:VAL("-3.85")=-3.85VAL("vb5.0")=0VAL("12 bC")=12 CSTR(125)="125"
問題六:代碼中調用記錄集字段的兩種方法
mrc.Field(0) mrc!Date
解決:我還不是很懂兩種的區別!歡迎留言討論!!!!!!!!!
問題七:查詢操作,有的加架構名。有的不加!
解決:為了避免報錯,我在報錯的代碼中加入了架構名,但不懂為什么有的不加 還能運行出來,就奇了怪!
總結:
不會使用msdn和調試工具真的不方便!
總結
以上是生活随笔為你收集整理的机房收费系统总结【2】-细节优化的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 机房收费系统总结【1】-整体流程
- 下一篇: 机房收费系统总结【3】-数据库细节