[질답] VB.NET PerformClick관련해서 문의 드립니다.

질문

VB.NET PerformClick관련해서 문의 드립니다. 내공100

visi****

질문22건

질문마감률85.7%

질문채택률85.7%

2018.01.09. 09:31

조회수7

VS 2017을 다운 받아서 사용해보고 있습니다.

 

If Input0 = True Then
     fTest.btnStart.PerformClick()
End If

If Input1 = True Then
     fTest.btnStop.PerformClick()
End If

If Input2 = True Then
     fTest.btnOrg.PerformClick()
End If

 

이런 식으로 입력을 받으면 각 버튼이 클릭 될 수 있도록 만들어봤습니다.

 

그런데 Input0, Input2는 정상적으로 되는데 Input1은 동작이 안됩니다.

fTest.btnStop.PerformClick()은 실행이 되는데

btnStop_Click쪽으로 넘어가지 않습니다.

어떤 이유에서 안넘어가는지 궁금합니다. 아시는 분 계시면 도움 부탁드립니다.

---

유사한 코드로 만들어서 아래와같이 테스트 해보았는데,

실제로 클릭이 잘 이루어집니다.

아마도 btnStop 이라는 버튼이 생각하신 버튼이 아닌, 다른버튼의 이름으로 지정되어있지 않은가? 생각됩니다.

혹은 버튼클릭 이벤트가 두가지로 복제되어 있는경우일수도 있습니다.

제가 테스트해본 내용은 아래와 같습니다.

Public Class Form1
    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        If TextBox1.Text = "Input0" Then
            btnStart.PerformClick()
        End If
 
 
        If TextBox1.Text = "Input1" Then
            btnStop.PerformClick()
        End If
 
        If TextBox1.Text = "Input2" Then
            btnOrg.PerformClick()
        End If
    End Sub
 
    Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
        MessageBox.Show("btnStart")
    End Sub
 
    Private Sub btnStop_Click(sender As Object, e As EventArgs) Handles btnStop.Click
        MessageBox.Show("btnStop")
    End Sub
 
    Private Sub btnOrg_Click(sender As Object, e As EventArgs) Handles btnOrg.Click
        MessageBox.Show("btnOrg")
    End Sub
End Class

해당화면 이미지는 아래와 같습니다.

텍스트박스에 Input0  를 넣고 Button4 를 클릭하면 

btnStart.PerformClick()

이 작동하는 형식으로 만들어봤습니다.

VB_PerformClick.zip