Page 1 of 1
รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 9:47 am
by jullathep
ผมเขียนที่ปุ่ม Comand ต้องการให้ textbox รับค่า A-D แล้วให้แสดงที่ Label 3 ช่อง เป็นค่าที่ตั้งไว้ แต่มันไม่ออกครับ รบกวนท่านอาจารย์หรือพี่ๆช่วยดูหน่อยครับ พอดี มือใหม่หัดทำครับ มีไฟล์แนบครับ
Code: Select all
Private Sub Command1_Click()
If TextBox1.Text = "A" Then
Label1.Caption = 10 & "-" & 20
Label2.Caption = 10 & "-" & 20
Label3.Caption = 10 & "-" & 20
ElseIf TextBox1.Text = " B " Then
Label1.Caption = 20 & "-" & 30
Label2.Caption = 20 & "-" & 30
Label3.Caption = 20 & "-" & 30
ElseIf TextBox1.Text = " C " Then
Label1.Caption = 30 & "-" & 40
Label2.Caption = 30 & "-" & 40
Label3.Caption = 30 & "-" & 40
ElseIf TextBox1.Text = " D " Then
Label1.Caption = 40 & "-" & 50
Label2.Caption = 40 & "-" & 50
Label3.Caption = 40 & "-" & 50
End If
End Sub
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 9:50 am
by snasui
ไฟล์ที่จะมี Code ได้ต้องเป็น .xlsm หรือ .xlsb เช่นนี้เป็นต้น ไม่เช่นนั้นจะแนบ Code ไปกับไฟล์ไม่ได้ ลองแนบไฟล์มาใหม่เพื่อน ๆ จะได้ช่วยตอบต่อไปจากนั้นครับ
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 9:56 am
by jullathep
snasui wrote: Sat Feb 03, 2018 9:50 am
ไฟล์ที่จะมี Code ได้ต้องเป็น .xlsm หรือ .xlsb เช่นนี้เป็นต้น ไม่เช่นนั้นจะแนบ Code ไปกับไฟล์ไม่ได้ ลองแนบไฟล์มาใหม่เพื่อน ๆ จะได้ช่วยตอบต่อไปจากนั้นครับ
.xlsm นี่เป็นมาโครใช่ไหมครับอาจารย์
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 10:01 am
by jullathep
jullathep wrote: Sat Feb 03, 2018 9:56 am
snasui wrote: Sat Feb 03, 2018 9:50 am
ไฟล์ที่จะมี Code ได้ต้องเป็น .xlsm หรือ .xlsb เช่นนี้เป็นต้น ไม่เช่นนั้นจะแนบ Code ไปกับไฟล์ไม่ได้ ลองแนบไฟล์มาใหม่เพื่อน ๆ จะได้ช่วยตอบต่อไปจากนั้นครับ
.xlsm นี่เป็นมาโครใช่ไหมครับอาจารย์
ผมแนบไฟล์ใหม่แล้วครับ อาจารย์
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 10:15 am
by snasui
ไม่พบ Code ในไฟล์ ลองพยายามอีกครั้งครับ
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 10:17 am
by jullathep
snasui wrote: Sat Feb 03, 2018 10:15 am
ไม่พบ Code ในไฟล์ ลองพยายามอีกครั้งครับ
อาจารย์ครับ Code มันอยู่ในปุ่มตกลงอะครับ ผมต้องทำยังไงเอ่ย
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 10:26 am
by snasui
กรุณาดาวน์โหลดไฟล์ที่แนบมาแล้วทดสอบว่ามี Code ที่กล่าวถึงหรือไม่ จะได้ทราบประเด็นที่ผมแจ้งไปครับ
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 10:46 am
by jullathep
snasui wrote: Sat Feb 03, 2018 10:26 am
กรุณาดาวน์โหลดไฟล์ที่แนบมาแล้วทดสอบว่ามี Code ที่กล่าวถึงหรือไม่ จะได้ทราบประเด็นที่ผมแจ้งไปครับ
แก้แล้วครับอาจารย์ คราวนี้น่าจะมีครับ ผมลองโหลดมีคลิกดูเจอ code แล้วครับ
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 11:04 am
by snasui
Code ทำงานได้ปกติเพียงแต่ใน Code เขียนให้มีค่าวรรคติดไปด้วย หากคีย์ใน TextBox ไม่มีค่าวรรคก็จะไม่ได้คำตอบครับ
ในภาพด้านล่างผมระบายสีไว้ให้แล้วว่าตรงไหนมีค่าวรรคให้ปรับแก้ตรงนั้นได้เลยครับ
การ Debug Code ให้คลิกลงไปใน Code แล้วกดแป้น F8 ซ้ำ ๆ เพื่อ Run ทีละ Step จะได้ตรวจสอบได้เบื้องต้นว่า Code ทำงานติดขัดบรรทัดใด หรือไม่ อย่างไร ครับ
Re: รบกวนช่วยดู Code Vba หน่อยครับ พอดีลองหัดทำแล้วมันไม่ได้
Posted: Sat Feb 03, 2018 11:09 am
by jullathep
snasui wrote: Sat Feb 03, 2018 11:04 am
Code ทำงานได้ปกติเพียงแต่ใน Code เขียนให้มีค่าวรรคติดไปด้วย หากคีย์ใน TextBox ไม่มีค่าวรรคก็จะไม่ได้คำตอบครับ
ในภาพด้านล่างผมระบายสีไว้ให้แล้วว่าตรงไหนมีค่าวรรคให้ปรับแก้ตรงนั้นได้เลยครับ
การ Debug Code ให้คลิกลงไปใน Code แล้วกดแป้น F8 ซ้ำ ๆ เพื่อ Run ทีละ Step จะได้ตรวจสอบได้เบื้องต้นว่า Code ทำงานติดขัดบรรทัดใด หรือไม่ อย่างไร ครับ
ขอบคุณครับอาจารย์