SQL STRCONV関数で文字列を全角に変換する

STRCONVの引数に4を指定することで半角文字列を全角に変換することができます。

SQL = " SELECT STRCONV(フィールド名,4) FROM テーブル名 "
又は、
SQL = " SELECT STRCONV(フィールド名,4) AS 名前 FROM テーブル名 "
Set rs = CurrentDb.OpenRecordset(SQL)

STRCONV の引数に4を指定することで半角文字列を全角に変換することができます。
全角にできるのは、半角カタカナ・半角数字になります。

「オークションでdvdが3500円」を変換すると「オークションでdvdが3500円」になります。



BackHome BackSQL Tips

サンプルソフト
[実行時の画面]
「文字列を全角に変換する STRCONV関数」ボタンをクリックすると、
ニュースフィールドの全角に変換可能な文字を変換し右のテキストボックスに表示しています。

センター試験終了、計1151人に再試験
 [結果]センター試験終了、計1151人に再試験

J1札幌への10億円 回収不能に
 [結果]J1札幌への10億円 回収不能に

ミスター子どもたちにサイン
 [結果]ミスター子どもたちにサイン

■実行画面
全角変換

[サンプルデータ テーブル]
データID   ニュース
10  センター試験終了、計1151人に再試験
11  J1札幌への10億円 回収不能に
13  ミスター子どもたちにサイン
ニュースデータベース

[コード]
Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    Dim rs As Recordset
    Me!テキスト1 = "■元の文字列" & vbCrLf
    Me!テキスト2 = "■全角に変換" & vbCrLf
    SQL = "SELECT ニュース,STRCONV(ニュース,4) 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

サンプルソフトのダウンロード

BackHome BackSQL Tips

Copyright(C) FeedSoft