Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2202 / 9994

←次へ　｜　前へ→


	【11069】ＶＢＡコードの意味はわからない？

Akaishi - 09/4/14(火) 6:54 -


	引用なし

	パスワード

いつもお世話になっております。
　
　あるＶＢＡ例題を理解しようとしています。動きに関しては、なんら問題
もなく、ちゃんと動いてくれますが、そのプログラムの内部動きへの理解は
まだできていないので、この掲示板へ投稿しました。
よろしくお願いいたします。

目的：クエリの中で、テーブルの名前の文字列から、姓と名を分離して、
　　　それぞれ、表示させるため。
　　　
ＰＧ：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」の一番目より、一つの文字を取得して[佐]、
　　　それから論理判断になると思います。
　　　同様になるのではないか？
　　　　　　

470 hits

▼

【11069】ＶＢＡコードの意味はわからない？ Akaishi 09/4/14(火) 6:54