Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
テキストボックス内の数字が青くなるのを防ぎたい
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=220#CommentId1539
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
リスナー
 (学生)
投稿日時
2009/1/6 02:26:43
皆さんレスありがとうございます。
どの部分のコードをあげたらよいのか分からなくて困っています。
三枚あるうちのどれをあげるべきでしょう?
三枚目から前二枚を操作するソースでしたら、こちらになります。
>> 'フォームの初期化イベント
'フォームが開いた時点でテキストボックスに計算結果が表示されているという動作。
'変数の宣言
Dim Uriage As Decimal '売上を変数宣言
Dim Keihi As Decimal '経費を変数宣言
'変数への代入
'変数Uriageにフォーム1枚目のテキストボックスを代入します。
Uriage = CDec(Form1.TextBox1.Text)
'変数Keihiにフォーム2枚目のテキストボックスを代入します。
Keihi = CDec(Form2.TextBox1.Text)
'売上から経費を差し引く計算式
'「差額」を変数宣言しないで3枚目のテキストボックスに単純に計算結果を入れる。
Me.Textbox1.Text = CStr(Uriage - Keihi)
こんな感じになりますがどうでしょう。