전환버튼만들기-Toggle
*
Public Class Form1
Private Sub btnToggle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnToggle.Click
If btnToggle.Text = "Toggle Off" Then
btnToggle.Text = "Toggle On"
MsgBox("Hello!!")
ElseIf btnToggle.Text = "Toggle On" Then
btnToggle.Text = "Toggle Off"
MsgBox("Bye")
End If
End Sub
End Class
Private Sub btnToggle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnToggle.Click
If btnToggle.Text = "Toggle Off" Then
btnToggle.Text = "Toggle On"
MsgBox("Hello!!")
ElseIf btnToggle.Text = "Toggle On" Then
btnToggle.Text = "Toggle Off"
MsgBox("Bye")
End If
End Sub
End Class
버튼 하나로 2가지 기능을 하는 명령어 입니다.
이 게시물을
번호
제목
156
154
152
150
148
143
139