• ベストアンサー

VBについて質問です

VB2010でフォームデザイナーに、ツールBOXからテキストBOXとボタンを挿入します。テキストBOX内に数字を入力し、ボタンクリックで線がかけるようなプログラムを作成したいのですが、初心者で分かりません。コード等詳しく教えていただけないでしょうか。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.3

こんばんは megane-enagemさんの知識がどの位なのかわかりませんと、TooManyBugsさんが回答されたとおり、1から全て書くことは私のレベルでは、少々難しいですので、少し、質問させてください。 1.下記のコードを生成できますか(Buttonがクリックされた時に実行されるコードです。)? Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click End Sub 2.TextBoxに入力された変数の型指定はできますか? 例  TextBoxに入力された数字が整数の場合です。 Dim x As Integer Dim y As Integer x = TextBox1.Text y = TextBox2.Text 3..Formまたは PictureBoxに線を引けますか? ここまででわからない場合は、補足情報に出来る範囲で結構ですので、記入してください。 1番ができるようでしたら、下記のようにプログラムしたい、文章を書いていきます。 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click この間にコードを記入します。 End Sub 2番ができるようでしたら、線を引くために、TextBoxを4個Formに貼り付けましょう。  線を引くためには、線の始まり点をX、Yの2点で決定します、線の終点もX、Yの2点で決定します。  ですので、TextBoxは4個使いましょう。  TextBox1→線の始まり点 X  TextBox2→線の始まり点 Y  TextBox3→線の終点 X  TextBox4→線の終点 Y ここまででわからない場合は、補足情報に出来る範囲で結構ですので、記入してください。 3番が少し問題でしょうか?  Dim g As Graphics '変数gをGraphicsに型指定する。   g = Me.CreateGraphics  'MeはForm1のこと gはForm1に描画する  始めのうちは以上のコードは意味がわからなくてもいいと思います、じょじょにわかります。  線を引くには、DrawLineを使います。  DrawLineの基本パターンです。  g.DrawLine(ペンの色、Xの開始点,Yの開始点,Xの終点,Yの終点)  上記の変数gを利用してます。  Xの開始点,Yの開始点,Xの終点,Yの終点は、それぞれ2番で決定した変数を割り当てます。  ここまででわからない場合は、補足情報に出来る範囲で結構ですので、記入してください。    参考 http://dobon.net/vb/dotnet/graphics/drawline.html      

megane-enagem
質問者

お礼

とても分かりやすい説明ありがとうございました。なんとか引けるようになりました。

その他の回答 (2)

回答No.2

ここで回答できるような量ではありませんね。 VBの参考書を読むか誰かにお金を払って作ってもらうことですね。

  • LHS07
  • ベストアンサー率22% (510/2221)
回答No.1

ここで全くの素人から最初から線がかけるまでただで指導しろというの 昔の人は    お殿様じゃあるまいし といったものですが・・・???? どういう意味ですかね???

関連するQ&A

  • Excel2003 VB コマンドボタン

    Excel2003 VB コマンドボタン VB初心者です。コマンドボタンをクリックしたら、テキストボックス1に入力してあるコードと一致する値を別シートのデータTBからvlookupで呼び出してテキストボックス2に表示したいのですが、うまくいきません。コードの例を教えていただけると助かります。よろしくお願いします。

  • VB2008で曜日を取得する方法

    VB2008初心者ですがよろしいでしょうか 曜日の取得方法について教えて下さい ユーザーフォーム上の テキストボックスに、任意の生年月日を 入力し、ボタンをクリックした時に、生年月日 の曜日を取得したいのですが、可能でしょうか WeekdayName関数を使えばできるような感じですが 使い方が分かりません よろしくお願いします 1.テキストボックスに   2009-08-13   と入力しボタンをクリックする 2.メッセージボックスに   曜日を表示する

  • 数字→漢数字変換

    VBの超初心者です。 数字から漢数字への変換に挑戦しているのですが、 苦戦しています… テキストボックスに5桁までの数字を入力して、コマンドボタンを クリックしたら、ラベルボックスに5桁の漢数字が出力されるという プログラムです。 ex「65432」→「六万五千四百三十二」 このような感じにしたいのですが、どなたか教えて下さい。 宜しくお願いします。 使用しているの、VB6.0です。

  • VBでLOOKUP機能

    テキストボックス(TextBox1)にコード番号を入力して ボタンを押すとメッセージボックスにコード番号に合った 名前を表示させるプログラムを作っているのですが、 こういうエクセルでいうLOOKUP機能がVBでできるのでしょうか?可能であれば教えて頂けないでしょうか? (例) 名前データが以下です。 code  name 0 東 1 斎藤 2   大西 テキストボックスに1を入力してボタンを押すと メッセージボックスに斎藤と表示させる。

  • VB テキストボックスの数字を自動計算させたい

    VBの講義を始めて2週間の初心者です。課題で作らないといけないプログラムがあるのですが手詰まりました。助言をお願いします。 プログラムはアメフトの試合結果を計算するものです。 全てテキストボックスを5個用意し、うち4個に1回から4回までの得点を入力し、残り1個に合計点を表示させるものです。 ボタンはありません。テキストボックスのみです。もしかしたら、合計点表示はラベルかもしれませんがなんだか判別がつきません。 また、テキストボックスに数字を入力したら自動的に計算するように、と条件が出ています。 4つのテキストボックスに数字を入力し、1つのテキストボックスまたはラベルに合計を表示させるコードってどう書けばいいのでしょうか・・・?本やサイトを参照したりもしましたがどうもうまくいかず頭に疑問符が浮かぶだけです。 授業自体はまだ始まって間もなく、ハローワールド的な導入部分、主なコントロールの紹介、変数の宣言しかやっていないのでIFなど複雑なものコードは書かないとは思いますが・・・。

  • VB2005について教えてください

    フォームを3つ作成し、実行時に最初に表示されるフォーム1にボタンを1つ配置し、そのボタンをクリックするとRadioButtonが一つとボタンが一つあるフォーム2が開きます。そして、フォーム2のボタンをクリックするとテキストボックスが一つとボタンが一つあるフォーム3が開きます。そこで、フォーム3のテキストボックスの中身をフォーム2のRadioButton.Textに表示させたいのですができません。フォーム1にRadioButtonを配置してRadioButton.Textに表示は出来るのですがフォーム2には表示させることが出来ません。どのようにすればできるのか教えてください。よろしくお願い致します。

  • VBについて

    Visual Basicで1つのオブジェクトの中にフォームを2つ作った時、片方のフォームに入力した情報を処理し、もう1つのフォームでその結果を見るにはどうすれば良いのでしょうか?  例えば、1つのフォームにテキストボックスAとコマンドボタンを貼り付け、もうひとつにテキストボックスBを貼り付けて、テキストボックスAにXと入力し、コマンドボタンを押すとテキストボックスBにYと入力されるような事です。  分かる方、是非教えてください。

  • 基本的な質問で本当に申し訳ありません。

    VB6で計算できるようなプログラムを作っています。 今3つのテキストボックスを作っています。そこにそれぞれ数字を入れてボタンを押すと計算結果が4つ目のテキストボックスに表示されるよう にしたいのです。 そこで質問したいのですが (1) 3つのテキストボックスすべてが入力されるまで変換ボタンを使用できない(押せない)ようにするのはどのようにしたらいいのでしょうか? (2) 3つのテキストボックスに入力された文字が数字以外の場合エラーメッセージ(数字を入力してくだい)と言う表示を出したい場合どのようにしたらいいのでしょうか? 上記の質問についてお解かりの方は、ぜひとも説明と方法を教えていただければと思っていますよろしくお願いします。

  • ASP.NET/VBでのユーザコントロールを使用したプログラム

    開発環境:VS2005 言語:ASP.NET(VB) 質問させてください。 現在ASP.NETでプログラムを作っています。 プログラム等は経験なくほぼ初心者です。 内容としては テキストボックス(txtB)1個のユーザコントロールを ボタン(btn1)1個とテキストボックス(txtA)1個のフォーム(aspx)に貼り付け、 ボタンを押下することでフォームのテキストボックス内の値を ユーザコントロールのテキストボックスに表示させるという プログラムを作りたいのですがうまくいきません。 色々調べたのですが、 ユーザコントロールのテキスト内の値をフォームのテキストに表示させる方法は あったのですが逆の方法は見つけられませんでした。 説明等わかりにくいところもあるかもしれませんが 回答よろしくお願いいたします。

  • VB(ビジュアルベーシック)のコード

    VB(ビジュアルベーシック)のコード 学校の課題でVBを使って課題に出された物を作れ(英語)、といわれ困っています。 (1)苗字、名前、住所、住んでる街、州、ジップコードのテキストボックスを作る (2)4つのラジオボタンを作る (3)全てのテキストボックス、ラジオボタンにバリデーションルールを使う(例:苗字のテキストボックスを入力しなかったら”苗字を入力して下さい”とメッセージフォームが表示されるルールだそうです) (4)全ての情報(テキストボックス&ラジオボタン)を入力しおわったらボタンを使わずに自動的にその情報が記載されたメッセージフォームを表示する しかしこの課題ではボタンを使わずに、全て自動的にメッセージフォームを表示させなきゃいけないのですがそれに非常に頭を悩ませています。 バリデーションルールでラジオボタンのコード Private Sub Form1_L(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If MrRadioButton.Checked = False And MsRadioButton.Checked = False And _ MrsRadioButton.Checked = False And DrRadioButton.Checked Then MessageBox.Show("One of the four salutations must be selected ", "Error", _ MessageBoxButtons.OK, MessageBoxIcon.Exclamation) End If なのですが、プログラム起動と同時にメッセージフォームがあがってくるので困っています。

専門家に質問してみよう