初学者的两个vb问题，望各位高手不吝赐教！

Question

1.用“切换断点”的方法调试这段代码有没有被运行。
2.权限的限制，简单的方法就是对主菜单可显示项目进行隐藏
Private Sub adf()
    Dim UserName As String
    Dim Passwd As String
    UserName = TxtUsername.Text
    Passwd = TxtPwd.Text
    Dim Rs As ADODB.Recordset
    Set Rs = DBCn.excute("select * from Users where [username]='" & _
    UserName & "'")
    With Rs
        If .BOF And .EOF Then
            MsgBox "没有这个用户"
            Exit Sub
        End If
        
        If Passwd <> .Fields("Password") Then
            MsgBox "密码不符。"
            Exit Sub
        End If
        
        Dim Power As String
        Power = .Fields("权限")
        Select Case Power
            Case "Admin"
            '在此处写入主菜单要隐藏的项目            Case "User"
            '在此处写入主菜单要隐藏的项目
                MainMenuTools.visible=false
                MainMenuUsers.visiblse=false
            Case "Manager"
            .............................
        End Select
    End With
    
End Sub

Answer 1

如果你的控件是ComBox的化，先看看它的属性（是只能选择，还是可选、可填）。如果是只能选择的ComBox控件，当你直接给它赋值的时候，若ComBox的下拉框中没有相同的值，就会对你的赋值不予与理睬。

Answer 2

for question one:use Data1.Add first ... finally,updata();
By Morn

Answer 3

To： exiong(悠扬) 
那样子会报错的。

Answer 4

谢谢各位的指教！第二个问题我已按zerg2001的指教解决了！
可是第一个问题还是没有解决哟：（。
请各路朋友继续指教！
对了，我想问问exiong朋友，你说的combobox的属性 (只能选择，可选、可填)，是哪项？如何修改？谢谢了！