Page 1 of 1

อยากทราบเรื่องการเขียน Code VB ที่สามารถ รับค่าที่เรากำหนด และค่าอื่น Textbox เดียวกันได้หรือไม่

Posted: Tue Feb 06, 2018 8:56 am
by jullathep

Code: Select all

Private Sub CommandButton1_Click()
If TextBox1.Text = "Zn" & " " Then
    Label1.Caption = "สังกะสี (Zn)"
    End If
End Sub
คือผมอยากให้ Textbox เดียว รับ ค่า Zn 5% (Znเป็นค่าตั้งต้น) (5% เป็นค่าว่างที่จะต้องกรอก)
ในส่วนการแสดงผลใน Label คือ แสดงค่า เป็น
สังกะสี (Zn)................................................................5%
ผมไม่ทราบว่าจะต้องเขียน Code ยังไง รับกวนพี่ๆ อาจารย์ ทุกท่านด้วยครับ

Re: อยากทราบเรื่องการเขียน Code VB ที่สามารถ รับค่าที่เรากำหนด และค่าอื่น Textbox เดียวกันได้หรือไม่

Posted: Tue Feb 06, 2018 9:44 am
by puriwutpokin
ตัวอย่างโค้ดครับ

Code: Select all

Private Sub CommandButton1_Click()
If TextBox1.Text <> "" Then
    Label1.Caption = "Zn (สังกะสี )................................................5%"
    ElseIf TextBox1.Text = "" Then
    Label1.Caption = ""
    End If
End Sub

Re: อยากทราบเรื่องการเขียน Code VB ที่สามารถ รับค่าที่เรากำหนด และค่าอื่น Textbox เดียวกันได้หรือไม่

Posted: Tue Feb 06, 2018 9:55 am
by jullathep
puriwutpokin wrote: Tue Feb 06, 2018 9:44 am ตัวอย่างโค้ดครับ

Code: Select all

Private Sub CommandButton1_Click()
If TextBox1.Text <> "" Then
    Label1.Caption = "Zn (สังกะสี )................................................5%"
    ElseIf TextBox1.Text = "" Then
    Label1.Caption = ""
    End If
End Sub
ขอบคุณครับพี่