━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ レンタル掲示板とクイズ投稿サイトを開発した櫻井文人の プログラムの考え方が身につくメルマガ『プログラムは考え方です』 ─────────────────────────────────── メルマガ発行人 櫻井文人のプロフィール ⇒ http://www.bunzin.net/program/prof.html ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ こんにちは、メルマガ発行人の櫻井文人です。 皆さんは、金ちゃんヌードルを知っていますか? 詳しくは編集後記で。 それでは、今回は簡単なプログラムを動かしてみたいと思います。 このプログラムを使って、前回まで説明してきた以下の4つの命令の 種類について確認していきたいと思います。 ・情報を入れたり出したりするための命令 ・情報をとりあえず覚えておくための命令 ・情報をいじるための命令 ・命令を実行する流れを操る命令 今回はVBScriptというプログラム言語を使います。VBScriptはOSがWindowsで あれば、何かを新しく追加しなくても使うことができます。 ※ただしVBScriptが使えるのはWindows98以降なので、 Windows95ではVBScriptは使うことができません。 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ■■ 簡単なプログラムを動かしてみよう ─────────────────────────────────── それでは、今回使用するプログラムがどのようなものか説明いたします。 今回のプログラムでは、50円のお菓子をいくつか買った場合の合計金額を 計算します。また、遠足でのおやつは300円までと相場が決まっているので、 合計金額が300円を超えてしまった場合も警告文を表示するようにします。 ■プログラムを保存しましょう 以下が今回の実習で使うプログラムです。 「rem プログラムの開始」から「rem プログラムの終了」までをコピーして メモ帳を開いて貼り付けましょう。 そして「okashi.vbs」いうファイル名で適当な場所に保存しましょう。 ---------------------------------------------------------------------- rem プログラムの開始 n = InputBox ("50円のお菓子をいくつ買いますか?") result = 50 * n MsgBox "合計で" & result & "円です。" If result > 300 Then MsgBox "おやつは300円までですよ!" Else MsgBox "予算内におさまりました。" End If rem プログラムの終了 ---------------------------------------------------------------------- ■ プログラムを動かしましょう 保存した「okashi.vbs」をダブルクリックすると、 すぐにプログラムが動きます。 ■ プログラムの解説 最初の行の『rem プログラムの開始』と最後の行の『rem プログラムの終了』 は、プログラムの内容などを説明するための文章です。 コメント行と呼ばれています。 コメント行はプログラムを実行しても無視されます。 以下、コメント行以外の行を順番に解説していきます。 1.情報を入力して、とりあえず覚えておく n = InputBox ("50円のお菓子をいくつ買いますか?") 「50円のお菓子をいくつ買いますか?」と問われるので、 「お菓子を買う数」という情報をキーボードから入力します。 そして入力した情報をとりあえず「n」という変数に覚えておきます。 2.情報をいじって、とりあえず覚えておく result = 50 * n 情報をいじっています。 お菓子の価格である50円と「n」という変数に覚えておいた 「お菓子を買う数」をかけあわせて合計金額を計算しています。 そして計算した合計金額をとりあえず「result」という変数に 覚えておきます。 3.情報を出力する MsgBox "合計で" & result & "円です。" 「result」という変数に覚えておいた合計金額を画面に出力します。 「合計で250円です。」のような感じで出力されます。 4.命令を実行する流れを操る If result > 300 Then MsgBox "おやつは300円までですよ!" Else MsgBox "予算内におさまりました。" End If 命令を実行する流れを操っています。 「result」という変数に覚えておいた合計金額が300円よりも 大きかったら「おやつは300円までですよ!」と画面に表示する 命令を実行します。 合計金額が300円以下であった場合は、 「予算内におさまりました。」と画面に表示する命令を実行します。 とりあえず、プログラムの解説をしましたが、実際に動かしながら プログラムの内容を見ていただくほうが分かりやすいかもしれません。 ある程度理解できてきたら、いろいろ好きなようにプログラムを いじってみて遊んでみるのも面白いかもしれませんね。 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ■■ 編集後記 ─────────────────────────────────── 皆さんは、金ちゃんヌードルを知っていますか? 徳島製粉という会社の製造しているカップめんなのですが、 中部地方より西日本のほうでしか売ってないようなので、 知らない人も多いのかと思います。 この金ちゃんヌードルは、私の実家のある静岡市では、 たいていどこでも売っています。 そのため、私は子供の頃は金ちゃんヌードルはとても身近だったので、 今住んでる川崎市近辺に売っていないのが逆に違和感を覚えました。 なんとも言えない素朴でさっぱりとした醤油味が懐かしく、 いまでは実家に帰ると、必ず買って食べています。 最後までお読みいただき、ありがとうございました。 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ●櫻井が開発したレンタル掲示板は コチラ ⇒ http://www.bunzin.gr.jp/m_board/ 画像のアップロードも可能なレンタル掲示板です。 無料ですのでお気軽にどうぞ。 ●櫻井が開発したクイズ投稿サイトは コチラ ⇒ http://www.bunzin.gr.jp/quiz/ あなたが考えたクイズを投稿することができます。 投稿されたクイズに回答することもできます。 無料ですのでお気軽にどうぞ。 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ メルマガ発行人 櫻井文人 メルマガ発行責任者情報は コチラ ⇒ http://www.bunzin.net/program/mghsinfo.html アドレス変更と登録解除はコチラ ⇒ http://www.mag2.com/m/0000293166.html メルマガバックナンバーは コチラ ⇒ http://www.bunzin.net/program/mailmaga/backnumber/ 櫻井文人のプロフィール ⇒ http://www.bunzin.net/program/prof.html ご意見・ご感想はコチラ ⇒ bunzin●bunzin.gr.jp (メール送信の際は、●を@に置き換えてください。) (櫻井が確実に読みますが、返信は保障できません。) ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ |