HOw는 텍스트 상자에 기본값을 설정합니다. VB +

Question

VB와 Arduino에서 동시에 작업하고 있습니다. 내 주요 의도는 VB의 텍스트 상자에 연속적으로 표시되는 데이터를 얻는 것입니다

이제 문자열이나 직렬 데이터를 텍스트 상자에 넣을 수있는 방법을 원했습니다. Google에 있지만 sytax가 작동하지 않습니다. 간단한 텍스트 상자를 만들고 변수 abcd를 할당했습니다. 이제 Abcd를 텍스트 상자에 표시하려고했습니다. 이

를 작동하지 않는 이유는 직렬 데이터가

Private Sub Current_Read_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     SerialPort1.Open() 
     Dim str As String 
     str = SerialPort1.ReadExisting 
     Current_Read.Text = str 
     SerialPort1.Close() 
    End Sub 

그래서 텍스트 상자에 표시 읽고 싶다면

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged 

     TextBox1.Text = "ABCD" 
    End Sub 

예상대로 귀하의 코드가 발생하지 않습니다

Answer 1

때문에 사용하는 코드 textbox에 아무 것이나 입력 할 때만 실행됩니다.이 코드를 사용하면 아무 것도 입력 할 때 textbx에 아무 것도 입력 할 수 없지만 "ABCD"이됩니다. 이것을 피하려면 이 코드 TextBox1.Text = "ABCD"을 TextBox1_TextChanged 이벤트에서 form_Load 이벤트로 이동하십시오. 즉,

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     TextBox1.Text = "ABCD" 
    End Sub 

Answer 2

시도해보십시오. 단추를 추가하고 단추를 두 번 클릭하면 코드를 이벤트에 쓸 수 있습니다. Button_Click

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    SerialPort1.Open() 
    Dim str As String 
    str = SerialPort1.ReadExisting 
    Current_Read.Text = str 
    SerialPort1.Close() 
End Sub 

응용 프로그램을 실행하십시오. 버튼을 클릭하십시오