การสร้างฟอร์ม Log-in ด้วย vb.net

ในบทความนี้เราจะมาศึกษา การสร้างฟอร์ม Log in เบื้องต้น ด้วย vb.net และวิธีการลิ้งฟอร์ม

1. เปิดโปรแกรม Visual Studio 2010 Express ขึ้นมา แล้วเลือก New Project แล้วเลือก Windows Forms Application พร้อมกับตั้งชื่อว่า FormLoginVB หรือ จะตั้งชื่ออื่นก็ได้ตามต้องการ ตามรูป

2. ทำการดีไซด์ตามในรูป โดยใช้ Textbox 2 อัน อันแรกเอาไว้สำหรับกรอกชื่อผู้ใช้งาน อันที่ 2 เอาไว้กรอกรหัสผ่าน และทำการเปลี่ยน Properties UseSystemPasswordChar เป็น True จากนั้นเพิ่ม label 2 อัน อันแรกเปลี่ยนProperties Text เป็น "ชื่อผู้ใช้งาน" อันที่ 2 เปลี่ยนProperties Text เป็น "รหัสผ่าน" และมี button 2 อัน เช่นกัน โดยอันแรก เปลี่ยน Properties Text เป็น "เข้าระบบ" ส่วนอันที่สองเปลี่ยน Properties Text เป็น "ออกจากโปรแกรม"

3. ทำการเพิ่มฟอร์มใหม่เข้ามาในโปรเจคโดยตั้งชื่อว่า Form2 หรือจะตั้งอะไรก็ได้ตามต้องการ

4. หลังจากนั้นให้ออกแบบฟอร์ม2ให้เป็นดังรูป โดยทำการเพิ่ม label เข้าไป 1 อัน เราจะใช้แสดงชื่อของ User ที่ทำการล็อคอินเข้าสู่ระบบ
และเพิ่ม button 1 อัน เปลี่ยน Properties Text เป็น "ออกจากระบบ" เมื่อคลิกปุ่มนี้เราจะให้โปรแกรมออกจากระบบ กลับมาที่ฟอร์มล็อคอิน

5. กลับมาที่ ฟอร์ม1ดับเบิ้ลคลิกที่ปุ่ม เข้าระบบ จากนั้นพิมพ์โค๊ดลงไป
If TextBox1.Text = "" Or TextBox2.Text = "" Then
            'ถ้า ชื่อผู้ใช้(textbox1) หรือ รหัสผ่าน(textbox2) เป็นค่าว่างหรือไม่ได้ระบุนั้นเอง
            'โปรแกรมก็จะแสดงกล่องข้อความบอกว่าคุณกรอกข้อมูลไม่ครบ
            MessageBox.Show("คุณกรอกข้อมูลไม่ครบ", "ข้อความจากระบบ", MessageBoxButtons.OK, MessageBoxIcon.Error)
        ElseIf TextBox1.Text = "Admin" And TextBox2.Text = "vb.net" Then
            'ถ้า ชื่อผู้ใช้(textbox1) = Admin และ รหัสผ่าน(textbox2) = vb.net
            'โปรแกรมก็จะแสดงกล่องข้อความว่ายินดีต้อนรับเข้าสู่ระบบ
            MessageBox.Show("ยินดีต้อนรับเข้าสู่ระบบ", "ข้อความจากระบบ", MessageBoxButtons.OK, MessageBoxIcon.Information)
            Me.Hide() 'หลังจากนั้นฟอร์มนี้ก็จะซ่อนตัวเอง
            Form2.Show() 'และแสดงฟอร์ม2ออกมา
        Else
            'ถ้าไม่เข้ากรณีใดๆเลย
            'โปรแกรมก็จะแสดงกล่องข้อความบอกว่า ชื่อผู้ใช้ หรือ รหัสผ่านไม่ถูกต้อง
            MessageBox.Show("ชื่อผู้ใช้ หรือ รหัสผ่านไม่ถูกต้อง", "ข้อความจากระบบ", MessageBoxButtons.OK, MessageBoxIcon.Warning)
        End If

จากนั้นดับเบิลคลิกที่ปุ่ม ออกจากโปรแกรมแล้วพิมพ์โค๊ดนี้ลงไป
Me.Close() 'เมื่อคลิกก็จะออกจากโปรแกรม

หลังจากนั้นให้ไปที่ฟอร์ม 2 ดับเบิลคลิกที่ Form2 แล้วพิมพ์โค๊ดลงไป

Label1.Text = "ยินดีต้อนรับ " & Form1.TextBox1.Text
'เพื่อให้แสดงชื่อของ User ที่ล็อคอินเข้ามา

และทำการดับเบิลคลิกที่ปุ่ม ออกจากระบบ แล้วพิมพ์โค๊ดลงไป

MessageBox.Show("คุณได้ออกจากระบบเรียบร้อยแล้ว", "ข้อความจากระบบ", MessageBoxButtons.OK, MessageBoxIcon.Information)
        'แสดงกล่องข้อความว่าคุณได้ออกจากระบบเรีบร้อยแล้ว
        Form1.Show() 'ให้ฟอร์ม1 แสดงขึ้นมา
        Me.Close() 'และให้ฟอร์ม2ปิดลง

4. จากนั้นทำการเซฟโปรเจค กดที่ File > Save all หรือ กด Ctrl + Shift + S หรือ กดที่ ไอคอน Save all ดังรูป

5. ทดลองรันโปรแกรม กด start Debugging หรือกด F5 และทำการทดสอบโปรแกรม

หากเราไม่ได้ระบุ ชื่อผู้ใช้งาน หรือ รหัสผ่าน โปรแกรมก็จะแสดงกล่องข้อความบอกว่าคุณกรอกข้อมูลไม่ครบ