SHOEISHA iD

※旧SEメンバーシップ会員の方は、同じ登録情報(メールアドレス&パスワード)でログインいただけます

CodeZine編集部では、現場で活躍するデベロッパーをスターにするためのカンファレンス「Developers Summit」や、エンジニアの生きざまをブーストするためのイベント「Developers Boost」など、さまざまなカンファレンスを企画・運営しています。

VB6プログラマのためのCurl入門(AD)

VB6プログラマのためのCurl入門
コントロールを貼り付けてビジュアルプログラミング

第1回

  • X ポスト
  • このエントリーをはてなブックマークに追加

Curl言語によるコーディング

 CommandButtonのイベントハンドラ(イベント発生時に呼び出されるメソッド)に、加算処理を行うコードを記述しましょう。CommandButtonをクリックして選択し、プロパティで「イベントハンドラ」タブをクリックします。イベントハンドラの「Action」をクリックして選択し、その右側に表示された[||]ボタンをクリックします(図7)。

図7 イベントハンドラを作成する
図7 イベントハンドラを作成する

 VLEからCurl IDEに切り替わり、ウインドウの中央部にエディタが表示され、Curl言語のソースコードが自動生成されています。冒頭で説明したように、Curl言語は中かっこ { } を多用するのが特徴です。中かっこは範囲を示しています。VB6では、Sub~End SubやIf~End Ifのように範囲を示しますが、これをCurl言語では { ~ } で示すのです。CommnadButtonのイベントハンドラは、{on Action do ~ } で囲まれた部分です。この中に、イベント処理のコードを記述します。その他の自動生成されているコードは、VLEで行ったビジュアルなデザインを記録したものです。

 2つのTextFieldに入力された値を加算し、その結果をTextDisplayに表示するコードを記述します。それらのコントロールのオブジェクト名は何だったでしょうか。プロパティで確認してみましょう。「デザイン名」の「値」に設定されているのが、コントロールのオブジェクト名です。

 VB6ユーザーには意外かもしれませんが、VLEでは、コントロールを貼り付けた時点で自動的にデフォルトのオブジェクト名が付けられることはありません。従って、「デザイン名」の「値」は空欄になっています。あらためて、上側のTextFieldの「デザイン名」の「値」に「text-field1」、下側のTextFieldに「text-field2」、TextDisplayに「text-display1」と設定しましょう。コードで操作しないコマンドボタンには、デザイン名を設定する必要はありません。

 再度Curl IDEのウインドウに戻って、{on Action do ~ } で囲まれた部分に、リスト1で網掛けした部分のコードを記述してください。selfは、VB6のMeに相当します。例えば、self.text-diplay1.valueは、VB6のMe.Label1.Captionに相当します。その他の文法は、次回以降で説明します。

リスト1 イベントハンドラに記述するコード
{on Action do
    {let x:int, y:int, ans:int}
    {set x = {{String self.text-field1.value}.to-int}}
    {set y = {{String self.text-field2.value}.to-int}}
    {set ans = x + y}
    {set self.text-display1.value = {String ans}}
}

次のページ
アプリケーションの実行

この記事は参考になりましたか?

  • X ポスト
  • このエントリーをはてなブックマークに追加
VB6プログラマのためのCurl入門連載記事一覧

もっと読む

この記事の著者

矢沢久雄(ヤザワヒサオ)

パッケージソフトの開発・販売に従事するかたわら、書籍や雑誌記事の著作活動、セミナーやカンファレンスにおける講演活動も精力的にこなす自称ソフトウエア芸人です。 

※プロフィールは、執筆時点、または直近の記事の寄稿時点での内容です

【AD】本記事の内容は記事掲載開始時点のものです 企画・制作 株式会社翔泳社

この記事は参考になりましたか?

この記事をシェア

  • X ポスト
  • このエントリーをはてなブックマークに追加
CodeZine(コードジン)
https://codezine.jp/article/detail/3068 2008/10/01 12:16

おすすめ

アクセスランキング

アクセスランキング

イベント

CodeZine編集部では、現場で活躍するデベロッパーをスターにするためのカンファレンス「Developers Summit」や、エンジニアの生きざまをブーストするためのイベント「Developers Boost」など、さまざまなカンファレンスを企画・運営しています。

新規会員登録無料のご案内

  • ・全ての過去記事が閲覧できます
  • ・会員限定メルマガを受信できます

メールバックナンバー

アクセスランキング

アクセスランキング