Asc関数、AscB関数、AscW関数:Access

Access Asc関数は指定した文字列内にある先頭の文字の文字コード(ASSCIIコード)を返す関数です。

BackHomeへ BackAccess関数メニューへ



■ 構文
Asc(string)

■ 引数
string : (必須) 変換する文字列を指定します。

■ 戻り値
DBCS を使用していないシステムでは、0 ~ 225 の範囲の値が返されます。DBCS を使用しているシステムでは、-32768 ~ 32767 の範囲の値が返されます。
(DBCSとは、1文字が2bytesの日本語等のキャラクタセットのことです)

AscB関数は、最初のバイトデータを返します。
AscW関数は、Unicode文字セットの文字を返します。

■ 実行後の画面
リストボックスの左の列より、「引数文字」と「Asc」「AscB」「AscW」のそれぞれの変換結果を表示しています。
Asc関数実行フォーム


■ Access VBA 実行コード

Option Compare Database
Private Sub コマンド0_Click()
Dim s1 As String
'リストボックスのクリア
Me!リスト1.RowSource = ""
s1 = "012345"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "12345"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "2345"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "345"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "012345"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "abcdef"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "ABCDEF"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "abcdef"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "ABCDEF"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
s1 = "あいうえお"
Me!リスト1.AddItem s1 & ";" & Asc(s1) & _
";" & AscB(s1) & ";" & AscW(s1)
End Sub



BackHomeへ BackAccess関数メニューへ

Copyright(C) FeedSoft