例: SQL = " SELECT LCASE(フィールド名) FROM テーブル名 "
例: SQL = " SELECT LCASE(フィールド名) AS 名前 FROM テーブル名 "
Set rs = CurrentDb.OpenRecordset(SQL)
アルファベットの大文字以外は無関係です。
  
サンプルソフト
    [実行時の画面]
「アルファベットの大文字を小文字に変換する関数 LCASE関数」ボタンをクリックすると、
ニュースデータベーステーブルのニュースフィールド内のアルファベットの大文字を小文字に変換し表示します。
■実行画面
「FIA会長 過半数の信任獲得」  結果  「fia会長 過半数の信任獲得」
「「Windows Live」APIを公開」  結果  「「windows live」apiを公開」
「Intel P45搭載PCが発売解禁  」  結果  「intel p45搭載pcが発売解禁  」
[ニューステーブル]
データID ニュース
10 FIA会長 過半数の信任獲得
11 「Windows Live」APIを公開
13 Intel P45搭載PCが発売解禁
 
[コード]
Option Compare Database
Private Sub コマンド8_Click()
    Dim SQL As String
    Dim rs As Recordset
    SQL = "SELECT ニュース,LCASE(ニュース) FROM ニュースデータベース"
    Set rs = CurrentDb.OpenRecordset(SQL)
    Do Until rs.EOF
        Me!テキスト1 = Me!テキスト1 & "「" & rs(0) & "」  結果  「" & rs(1) & "」" & vbCrLf
        rs.MoveNext
    Loop
    Set rs = Nothing
End Sub
    
サンプルソフトのダウンロード