實 現(xiàn) 你 的 要 求 有 些 麻 煩 ， 因 為 VB不 允 許 設 置 禁 止 狀 態(tài) 時 的 顏 色 。 
    一 種 辦 法 是 在 Click事 件 中 強 制 取 值 ， 比 如 將 CheckBox鎖 定 為 選 中 ， 可 以 ： 
    Private Sub Check1_Click() 
     Check1.Value = 1 
    End Sub 
    當 然 這 種 方 法 ， 在 用 戶 點 擊 時 略 微 有 點 閃 。 
    另 一 種 更 好 的 辦 法 是 先 放 置 一 個 Frame控 件 ， 在 Frame控 件 內 部 放 置 一 個 檢 查 框 。 然 后 設 置 Frame控 件 的 BorderStyle屬 性 為 0， Enabled屬 性 為 False。 這 樣 也 可 以 實 現(xiàn) "Lock"功 能 。 這 種 方 法 沒 有 前 面 方 法 的 閃 爍 的 毛 病 。 
<END>