主题：[求助]焦点转移不起作用

 测试，没有问题，不是会把焦点设置到ComboBox3么？

 不可能。你看看你是不是把控件的名字搞错了。

 我看你的ComboBox1是有值的哦，有值，根据你的代码，是调到ComboBox2的。

 

 你代码写在什么事件里？

 你的截图，ComboBox1 明显有值。

 

那就不可能，例子发上来。

 没有外部数据源，打不开你的窗口测试。

  哦，代码

 

If e.KeyCode=keys.enter Then
    If Forms("窗口1").Controls("ComboBox1").Text IsNot Nothing Then
        e.Form.Controls("ComboBox4").Select
    End If
    If Forms("窗口1").Controls("ComboBox1").Text ="" Then
        MsgBox("请选择其他分类!",64,"提示")
        e.Form.Controls("ComboBox3").Select
    End If
    e.cancel = True
End If