1. 程式人生 > >機房收費系統——新增刪除使用者窗體

機房收費系統——新增刪除使用者窗體

    新增刪除使用者這個視窗看起來並不是太難,但是還是有一些細節需要注意的。

   

    首先,要設定myflexgrid控制元件的屬性,因為我們刪除使用者時要求選中一整條記錄,而不是單個一個,這就要用到下面的程式碼:

     myflexgrid.SelectionMode = flexSelectionByRow     '單擊的時候選擇的是整行
     myflexgrid.FocusRect = flexFocusNone               '在當前單元的周圍畫一個焦點框
     myflexgrid.HighLight = flexHighlightWithFocus      '該值決定了所選定的單元是否突出顯示

                  就要就可以實現這個功能了,如圖:

   

物理設計上要求大概就這麼多了,讓師父驗收的時候還出現了一個小小的邏輯問題,你有沒有想過,如果系統打包釋出後,如果系統裡面所有的使用者都刪完了怎麼辦,那豈不是無論如何也進不了這個系統了嗎?這裡其實只要一個技巧,新增一下段SELECT語句就可以,這樣就可以為系統永久的設定一個總的系統管理員,而且保證這個管理員不會被刪掉。

    首先,現在確定資料中要保留的使用者名稱,假設我們要保留"zjx"這個系統管理員。

  

    那麼為了避免這個使用者不被刪除,在用SELECT語句查詢時,可以加上以下語句:

strSQL = "select * from user_info where level='" & Combo1.Text & "'" & " and userid <> 'zjx' "

     就OK了,可以嘗試下下。