修改一：結賬添加管理員
在結賬中結的只是操作員的，但既然管理員能夠執行這個系統的所用操作，也就是說他也有售卡退卡及充值的權利，那麼他的賬是不是也要結呢？在聽完師傅的建議之後，我覺得有必要把管理員也添加進去。添加管理員並不難，只要將查詢的條件修改一下就可以了，如下。
原代碼：
圖1
修改之後的代碼：
圖2
修改二：基本數據調用最新一條記錄
我們知道，在上下機，註冊等窗體都要調用基本數據，而在基本數據設定的窗體中是可以重新修改數據的。這樣當修改數據時就會增加一條新的記錄，而在調用時查詢的卻是第一條記錄，那修改的意義就沒有了。若想查詢時調用的是最新添加的那條記錄，在點擊修改的時候把數據庫Basicdata表中之前的記錄刪除，在確定的時候在添加記錄，這樣就可以解決這個問題了。但是，如果想要看到修改的記錄，那麼怎麼辦呢？那就讓查詢的時候查詢最後一條記錄！代碼如下。
圖3
修改三：MSHFlexGrid自動調節列寬
在給師傅驗收的時候，MSHFlexGrid控件顯示查詢信息時出現部分信息被遮擋，顯示不完全的情況。於是上網查了查使MSHFlexGrid自動調節列寬的代碼，具體如下：
一、在模塊中聲明函數
Option Explicit
Public Sub AdjustColWidth(frmCur As Form, _
gridCur As Object, _
Optional bNullRow As Boolean = True, _
Optional dblIncWidth As Double = 0)
'功能 ：自動調整Grid各列列寬爲最合適的寬度
'參數
'frmcur 當前工作窗體
'gridcur 當前調整的Grid
Dim i As Integer
Dim j As Integer
Dim dblWidth As Double
With gridCur
For i = 0 To .Cols - 1
dblWidth = 0
If .ColWidth(i) <> 0 Then
For j = 0 To .Rows - 1
If frmCur.TextWidth(.TextMatrix(j, i)) > dblWidth Then
dblWidth = frmCur.TextWidth(.TextMatrix(j, i))
End If
Next j
.ColWidth(i) = dblWidth + dblIncWidth + 100
End If
Next i
End With
End Sub
二、在窗體中調用函數
AdjustColWidth frmStCheckOnRs, MSHFlexGrid
（參考自：http://blog.csdn.net/liu765023051/article/details/6707919）
師傅說給我們的機房收費系統也是師姐敲出來的，所以並不是最完善的，有很多可以修改的更好的地方。師傅的話其實更多的體現了全心全意爲人民服務的思想。通過修改這些，也讓我有了很多收穫，不僅是對代碼這些基礎知識的應用，還有對這一思想的理解。