ボタンを押すとテキストを表示しメッセジボックスを表示させる
ソースコード
***********************************************
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("Hello World")
End Sub
End Class
***********************************************
完成品
テキストBOXに文字を入力後その文字をメッセージBOXに表示する
ソースコード
***********************************************
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim txt1 As String 'txt1という変数をString型で宣言
txt1 = TextBox1.Text 'txt1にTextBox1を代入
MsgBox("「" & txt1 & "」と入力しましたね?") 'MsgBox1にtxt1を表示
End Sub
End Class
************************************************
完成品
');
}
-->
0 件のコメント:
コメントを投稿