210 likes | 340 Views
การเขียนโปรแกรมคอมพิวเตอร์ และอัลกอริทึ่ม Lec03 : 25/03/2551 การทำงานกับ Event ต่าง ๆ. โดย อ. นัฐพงศ์ ส่งเนียม http://www.mobi2you.com xnattapong@mobi2you.com xnattapong@hotmail.com xnattapong2002@yahoo.com. บทที่ 3 พื้นฐานการเขียนโปรแกรมด้วย VB.NET.
E N D
การเขียนโปรแกรมคอมพิวเตอร์ และอัลกอริทึ่มLec03 : 25/03/2551การทำงานกับ Event ต่าง ๆ โดย อ. นัฐพงศ์ ส่งเนียม http://www.mobi2you.com xnattapong@mobi2you.com xnattapong@hotmail.com xnattapong2002@yahoo.com
บทที่ 3 พื้นฐานการเขียนโปรแกรมด้วย VB.NET ในการที่จะออกแบบหน้าจอขึ้นมานั้น เราจำเป็นต้องทราบถึงหลักการพื้นฐานเกี่ยวกับฟอร์ม และคอนโทรล เพื่อที่จะได้สามารถนำมาออกแบบฟอร์มให้เหมาะสม :: รู้จักกับคุณสมบัติ เมดธอด และอีเว็นต์
Agenda Object Properties Method Event --------------------------------- Variables and Declaration
คุณสมบัติ (Properties) คือกำหนดลักษณะต่างๆ ของฟอร์มและคอนโทรล เราสามารถกำหนดคุณสมบัติสำหรับคอนโทรลต่างๆ ผ่านทางหน้าต่าง Properties หรือโดยใช้คำสั่งที่มีรูปแบบดังต่อไปนี้
Object • เนื่อง VB.NET นั้นได้มีการเพิ่มความสามารถมากขึ้นจาก VB6.0 มากมาย หนึ่งในนั้นคือความสามารถในการเขียนโปรแกรมแบบ OOP นั่นเอง • โดย แนวคิดของ การเขียนโปรแกรมแบบ OOP คือ การมองทุกอย่างเป็นวัตถุ (Object) และการจัดการกับวัตถุเหล่านั้นก็คือการเขียนโปรแกรมเพื่อควบคุมการทำงานหรือการกำหนดพฤติกรรมของวัตถุนั่นเอง • ใน VB นั้นจะเรียกสิ่งที่เรานำมาวางไว้บนฟอร์ม รวมทั้งตัวฟอร์มว่า Object หรือเรียกอีกอย่างหนึ่งว่า Controls
เหตุการณ์ (Event) • รู้จักกับเหตุการณ์ต่าง ๆ ของฟอร์ม • Load • Activate • Click • DoubleClick • MouseMove • MouseWheel • Enter • Closing • Closed
เขียนโค้ดใน Form Load ดังนี้ • ผลลัพธ์
เขียนโค้ดใน Form_Click ดังนี้ • ผลลัพธ์
เขียนโค้ดใน Form_KeyPress ดังนี้ • ผลลัพธ์ เมื่อ กดปุ่ม A บนคีย์บอร์ด
เขียนโค้ดใน Form_KeyDown ดังนี้ • ผลลัพธ์ เมื่อ กดปุ่ม A บนคีย์บอร์ด
เขียนโค้ดใน Form_MouseMove ดังนี้ • ผลลัพธ์ เมื่อ เลื่อนเมาส์บนฟอร์ม
เหตุการณ์ MouseWheel If e.Delta >= 120 Then LbXY.Top += 10 Else LbXY.Top -= 10 End If Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseWheel End Sub
เขียนโค้ดใน Form_MouseWheel ดังนี้ • ผลลัพธ์ เมื่อ กดปุ่ม ล้อของ mouse
เขียนโค้ดใน Form_Colsing ดังนี้ • ผลลัพธ์
เขียนโค้ดใน Form_Colsed ดังนี้ • ผลลัพธ์
การทำงานกับเหตุการณ์ของ Label • เขียนโค้ดใน LbXY_Click ดังนี้ • ผลลัพธ์
การทำงานกับเหตุการณ์ของ TextBox • TextChange • Click • Enter • GotFocus • LostFocus • KeyPress • KeyDown • KeyUp
ต.ย. การใช้งาน Event ต่าง ๆ ของ Textbox Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Clear() TextBox2.Clear() End Sub พิมพ์โค้ดนี้ โดยการ DoubleClick ที่ Form แล้วเลือกเหตุการณ์ Form_Load
ต.ย. การใช้งาน Event ต่าง ๆ ของ Textbox Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Label1.Text = TextBox1.Text End Sub พิมพ์โค้ดนี้ โดยการ DoubleClick ที่ Textbox1 และเลือกเหตุการณ์เป็น TextBox1_TextChanged
ต.ย. การใช้งาน Event ต่าง ๆ ของ Textbox Private Sub TextBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Click TextBox1.Clear() End Sub พิมพ์โค้ดนี้ โดยการ DoubleClick ที่ Textbox1 และเลือกเหตุการณ์เป็น TextBox1_Click
การทำงานกับเหตุการณ์ของ TextBox • เขียนโค้ดใน LbXY_Click ดังนี้ • ผลลัพธ์