OriosのActiveBasic講座(1-3):プロシージャ

文字列内検索(InStr関数)
検索対象文字列 の開始位置 バイト目(最初の文字は1バイト目です)から、検索対象文字列 の中に検索文字列 が含まれるかどうかを検索します。 もし検索文字列 が見つかった場合はその場所を、見つからなかった場合は「0」を戻り値として返します。
ActiveBasicの関数では文字列の場所は最初のバイトを「1バイト目」とする「バイト単位」で表されます。 バイトとは文字を表す最小単位で、半角文字は1バイト、全角文字(いわゆる日本語の文字)は2バイトで構成されています。 例えば"AB講座"という文字列なら、

文字列	A	B	講		座
16進表記	41	42	8D	75	8D	C0
バイト	1	2	3	4	5	6

というふうに構成されます。半角文字の"A","B"は1バイトで、全角文字の"講","座"は2バイトで構成されていますね。

文字列の数字変換(Val関数)
前に(数値の)「123」と文字列の"123"は違うということをコラムで書いたと思いますが、でも文字列の"123"を数字の「123」に変えたいと思ったことありませんか？ それを可能にするのがその関数です。 文字列 の部分に数字が記録されている文字列(例:"123","-876"など)を書けば、戻り値にその文字列に書かれている数字を「実際の数値」に変えたものが返ってきます。 「実際の数値」とはLong型などの変数に入れることのできるもので、実際に「+」「-」などの演算子で計算ができます。 ちょっと説明が複雑になってきましたが下の例を見ていただければ分かっていただけると思います。
[例] Val ("1") + Val ("1") = 2 (注意:文字列の場合 "1" + "1" = "11"[単なる文字列同士の連結(演算ではない)], ×"2" - "1"[文字列を含むの計算はできない] )

※AB3.07現在ではVal関数は小数が扱えません。 小数を引数に渡しても切り捨てされてしまいます。(例: Val("3.07") = 3) 3.08よりVal関数が小数に対応しました。(2004年3月29日追記)

文字列の一部取り出し(Mid$関数)
これは文字列の中から指定した部分を取り出す関数です。 実際の指定の仕方はまず最初の引数のところに取り出したい文字列が含まれている(もしくは全部)文字列を書きます。変数でも"abc"のようなリテラル値でもOKです。 次の引数には文字列を取り出す最初の場所をバイト単位で書きます。 (最初が「1」バイト目で半角文字を「1バイト」全角文字を「2バイト」として計算します。) そして最後の引数には取り出す長さをまたバイト単位で指定します。 ただしこれは省略しても構いません。 省略した場合は開始位置 から後全部が取り出されます。
[例] Mid$("abcdefg", 3, 2) = "cd"
　　　Mid$("あいうえお", 5, 4) = "うえ" (全角文字は1文字が「2バイト」です。)
　　　Mid$("The quick brown fox", 11) = "brown fox" (取り出し長 を省略すると開始位置 の後全てが取得されます。省略するときは直前のコンマも一緒に省略してください。)

※「取り出す」という表現をしていますが、取り出された方の文字列には何の影響もありません。 「取り出し」たからといって対象文字列 の「取り出さ」れた部分が消えるなんてことはありません。

文字列の長さを求める(Len関数)
この関数は文字列 の長さを求める関数です。 戻り値として返される値はバイト単位ということに注意してください。 文字列 の部分は変数でもリテラル値でも構いません。
[例] Len("Active Basic") = 12 (半角スペースは「1」バイトとしてカウントされます。)
　　　Len("講座") = 4 (全角文字は1文字が「2」バイトです。)

数値から文字列への変換(Str$関数)
ここでは文字列を連結して表示する部分ですが、前にも書いたとおり数値が混ざると連結をすることができません。 そこで数値を文字列に変換する必要があります。 そのときに使うのがこのStr$関数なのです。 機能はVal関数の正反対で、引数で渡された数値を文字列に変換します。
[例] Str$(123) = "123" ()

※Str$関数はAB3.07現在のVal関数と違い小数にも対応しています。

10進表記から16進表記への変換(Hex$関数)
「10進表記」「16進表記」といきなり言われてもピンとこないかもしれないのでまずこれから解説からします。 「10進表記」は普通に私たちが使っている「123」のような数字の表記方法です。 問題なのは「16進表記」のほうですが、これは一つの桁に0〜9とA〜Fの計16文字を使って数字を表す表現です。 まずそれぞれの文字の対応は次の通りです。

16進表記	0	1	2	3	4	5	6	7	8	9	A	B	C	D	E	F
10進表記(いわゆる普通の数字)	0	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15

そして16を超える数字は2つ以上の16進法の数字を使って例えば1A(=26)のように表します。 (下の表を参照)

10進表記(いわゆる普通の数字)	16	17	…	25	26	27	…	31	32	33	…	159	160	161	…	255	256	257	…
16進表記	10	11	…	19	1A	1B	…	1F	20	21	…	9F	A0	A1	…	FF	100	101	…

表のように16進法は下位1桁目が0〜Fまであり、Fを超えるときにはその左の桁の数字を1増やし、その左の桁がまたFを超えたときはそのさらに左の桁を1増やし……という具合に数字を表記します。 この16進法はコンピュータ上では頻繁に使われる表記です。 理由はコンピュータのデータがバイト単位(=8ビット=256)で扱われるため1バイトを2桁で表せる16進法(16^2=256)をよく使うのです。 ただどうしても16進法が理解ができないときはWindowsに標準でついている「電卓」(「スタート」→「プログラム」→「アクセサリ」→「電卓」)を使えば簡単に変換できるのでそれを使ってください。

で本題のHex$関数ですが、これに16進数に変換したい10進数を渡せば、その10進数を16進数で表記した文字列が返ってきます。 文字列が返ってくるということに注意してください。

[例] Hex$(123) = "7B"

※小数は変換しようとすると切り捨てされます。負数は複雑なので理由は言いませんがまともな値はでません。

日付の取得(Date$関数)
現在の日付をコンピュータから取得して、yyyy/mm/dd (yyyy:西暦4桁,mm:月2桁,dd:日2桁)という形式の文字列を戻り値として返します。 もし月・日が1桁のときはその頭に"0"がつけられて強制的に2桁の文字列になります。
[例] Date$() = "2004/01/01" (2004年1月1日の場合)
　　　Date$() = "2003/10/01" (2003年10月1日の場合)

時刻の取得(Time$関数)
現在の時刻をコンピュータから取得して、hh:mm:ss (hh:時2桁(24時間制),mm:分2桁,ss:秒2桁)という形式の文字列を戻り値として返します。 もし時・分・秒が1桁のときはその頭に"0"がつけられて強制的に2桁の文字列になります。
[例] Time$() = "00:00:00" (0時0分0秒の場合)
　　　Time$() = "20:08:10" (20時8分10秒の場合)