Split関数 ： Access

■ 構文
Split(expression[, delimiter[, limit[, compare]]])

expression ：（必須） 分割する、区切り文字を含んだ文字列式を指定します。
delimiter ：（省略可能） 区切り文字を指定します。省略すると、スペース (" ") が使用されます。
limit ：（省略可能） 返る一次元配列の要素数を指定します。-1で、すべての文字列を含んだ配列を返します。
compare ：（省略可能） 文字列比較のモードを指定します。

[compareの設定値]
VbUseCompareOption ：　-1 　Option Compare ステートメントの設定を使用して比較
vbBinaryCompare ：　0 　バイナリ モードで比較
vbTextCompare ：　1　 テキスト モードで比較
vbDatabaseCompare ：　2 　Accessのみ有効。データベースに格納されている設定に基づいて比較を行う

■ 戻り値
1次元配列が返ります。

■ Access VBA 実行コード

Option Compare Database
'分割ボタン
Private Sub コマンド2_Click()
    Dim vspl As Variant
    'コンマ区切りで分割
    vaspl = Split(Me!テキスト0, ",", -1, vbBinaryCompare)
    Me!テキスト3 = ""
    '分割結果を一行づつ表示する
    For Each vret In vaspl
        Me!テキスト3 = Me!テキスト3 & vret & vbCrLf
    Next
End Sub