SQL = " SELECT STRCONV(フィールド名,3) FROM テーブル名 "
又は、
SQL = " SELECT STRCONV(フィールド名,3) AS 名前 FROM テーブル名 "
STRCONV の引数に3を指定することで先頭文字を大文字に変換することができます。
「google」を変換すると「Google」になります。
サンプルソフト
[実行時の画面]
「文字列の先頭文字を大文字に変換する STRCONV関数」ボタンをクリックすると、
ニュースフィールドの先頭文字が小文字のアルファベットの場合、大文字に変換し右のテキストボックスに表示しています。
win xp壁紙の草原は実在
[結果] Win Xp壁紙の草原は実在
x2、d60、α200、 k200D……売れ筋
[結果] X2、d60、α200、 k200D……売れ筋
これが、x2、d60、α200、 k200D……売れ筋のようにα200とk200Dの間にスペースが含まれている場合、
[結果] X2、d60、α200、 K200D……売れ筋 k200Dも大文字になります。
ana(全日本空輸)
[結果] Ana(全日本空輸)
■実行画面
[サンプルデータ テーブル]
データID ニュース
10 win xp壁紙の草原は実在
11 x2、d60、α200、 k200D……売れ筋
13 ana(全日本空輸)
[コード]
Option Compare Database
Private Sub コマンド8_Click()
Dim SQL As String
Dim rs As Recordset
Me!テキスト1 = "■元の文字列" & vbCrLf
Me!テキスト2 = "■先頭文字を大文字に変換" & vbCrLf
SQL = "SELECT ニュース,STRCONV(ニュース,3) FROM サンプルデータ"
Set rs = CurrentDb.OpenRecordset(SQL)
Do Until rs.EOF
Me!テキスト1 = Me!テキスト1 & rs(0) & vbCrLf
Me!テキスト2 = Me!テキスト2 & rs(1) & vbCrLf
rs.MoveNext
Loop
Set rs = Nothing
End Sub
サンプルソフトのダウンロード