/// 実習A4簡単なプログラミング | プログラミング実習 |
プロジェクト名 実習A4ラベル1
デザイン
オブジェクト
Button1
Textプロパティ:メッセージ黒
動作:メッセージ(学校名)を黒で表示する。
Button2
Textプロパティ:メッセージ赤
動作:メッセージ(学校名)を赤で表示する。
Button3
Textプロパティ:終了
動作:プログラムを終了する。
Label1 新規
Textプロパティ:メッセージ
動作:Clickで"メッセージ"と黒で表示する。
コード(プログラム)
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Label1.ForeColor = @ 'ラベル1の文字色を黒に設定
Label1. A = "大阪府立成城高等学校" 'ラベル1の文字を設定
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button2.Click
Label1. B = C 'ラベル1の文字色を赤に設定
D = "大阪府立成城高等学校" 'ラベル1の文字を設定
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button3.Click
E
End Sub
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Label1.Click
Label1.ForeColor = F
Label1.Text = "メッセージ"
End Sub
End Class
キーワード
- プロパティ
- ForeColor=色名
解説
オブジェクト ラベル(Label)のプロパティAutoSizeはTrueが初期値となっている。
/// 実習A4簡単なプログラミング | Copyright©2014 Hiroshi Masuda |