|
いつもお世話になっております。
あるVBA例題を理解しようとしています。動きに関しては、なんら問題
もなく、ちゃんと動いてくれますが、そのプログラムの内部動きへの理解は
まだできていないので、この掲示板へ投稿しました。
よろしくお願いいたします。
目的:クエリの中で、テーブルの名前の文字列から、姓と名を分離して、
それぞれ、表示させるため。
PG:Function Name_HiLow(s As String,fig As Integer) As String
Dim s2 As String
'sは姓名を格納する変数
s2= " " '姓名を分ける識別文字
If fig= 0 then '姓の取得
Do Until StrComp(Mid(s, 1, 1), s2) = 0
Name_HiLow=Name_HiLow & Mid(s, 1, 1)
s = Right(s, len(s)-1)
Loop
Else '名の取得
・
・
・
End Function
質問:例、s = "佐々木 誠司"の場合は、
Do・・・Loopの循環に入ってから、
最初、StrComp(Mid(s, 1, 1), s2)の動きというのは、
Mid関数により、文字列「s」の一番目より、一つの文字を取得して[佐]、
それから論理判断になると思います。
ではDo・・・Loop次の動きも、
Mid関数により、文字列「s」の一番目より、一つの文字を取得して[佐]、
それから論理判断になると思います。
同様になるのではないか?
|
|