Microsoft Access 掲示板

Microsoft Access 掲示板

検索コンボボックスの選択肢追加 / 7

17 コメント
views
4 フォロー
7
cerophan 2020/08/07 (金) 08:37:07 0029a@1c915

下記作成しましたが、何を選択してもなにも表示されない状態になりました。
また、コンボボックス内に空白の選択肢ができてしまいます。

SELECT "(すべて)" AS 年月
FROM T_案件
UNION SELECT 年月
FROM T_案件;

'年月選択 更新後処理
Private Sub cbo年月_AfterUpdate()
    If Me.cbo年月 = "" Then
        Me.Filter = ""
        Me.FilterOn = True
    Else
        Me.Filter = "年月=" & Me.cbo年月
        Me.FilterOn = True
    End If
End Sub

通報 ...