Do Until을 사용하여 양식을 만들려고했습니다. 문제는 내가이 코드를 실행할 때 "System.InvalidCastException"예외가 발생합니다. 그래서 실행하려는 코드는 다음과 같습니다.
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim x As Boolean = False
Do Until x
If Form2.Visible = False & Form3.Visible = False & Form4.Visible = False Then
x = True
End If
Loop
End
End Sub
또한 내가하려는 작업에 대한 설명 : form2, form3 및 form4가 보이지 않을 때 프로그램이 종료됩니다.
VB.NET에서 사용할 논리 연산자는 And 또는 better AndAlso입니다.
If Form2.Visible = False AndAlso
Form3.Visible = False AndAlso
Form4.Visible = False Then
x = True
End if
그리고 연산자의 왼쪽이 거짓이면 나머지 줄을 평가하지 않고 즉시 테스트를 중단하기 때문에 더 좋습니다.
물론 이러한 형태가 표시되는 경우이 루프는 무한 루프라는 점을 명심하십시오. 광고 무한대로 계속 실행되며 다른 양식에 대해 아무것도 할 수 없어 종료 할 수 있습니다. 이것은 UI를 효과적으로 분쇄합니다.
적어도 여기에 Application.DoEvents를 추가해야 해당 루프 내에서 다른 작업이 발생할 수 있습니다.
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다