vb高手请来啊！～～～～ 这段代码是什么意思啊？？

Private Sub Option1_Click()
If Option1.Value = True Then Combo1.Enabled = False 如果选中的单选框,下拉框就不能使用
End Sub

Private Sub Option2_Click()
If Option2.Value = True Then 如果选中了第2个单选框,那么下拉框就可以使用
Combo1.Enabled = True
Adodc1.Refresh 刷新数据
Combo1.Clear 下拉框清空,将数据库里面第一个字段添加到下拉框里
While Adodc1.Recordset.EOF = False
Combo1.AddItem Adodc1.Recordset.Fields(1)
Adodc1.Recordset.MoveNext
Wend
Combo1.Text = "请选择..."
End If
End Sub