0

ユーザーがクリックするとすぐに検証したいVBAフォームにドロップダウン選択リストがあります。前提条件のドロップダウンがすでに入力されていることを確認する必要があります。

これは、最初に入力する必要がある特定のフィールドがあるため、ユーザーがフォームを先に進めないようにするためです。これまでの私の試みはうまくいきません:

Private Sub cbo_moduleName_Click()

    If Len(cbo_moduleCode.Value) = 0 Then
        MsgBox ("Please select a module code")
        Exit Sub
    End If

End Sub
4

1 に答える 1

2

Clickボックスの値が物理的にクリックされるたびにではなく、マウスでボックスの値が変更されたときにのみイベントがアクティブになるようです。これを試して：

Private Sub cbo_moduleName_Enter()

    If Len(cbo_moduleCode.Value) = 0 Then
        MsgBox ("Please select a module code")
        cbo_moduleCode.SetFocus
        Exit Sub
    End If

End Sub
于 2012-10-27T11:32:24.000 に答える