วันอาทิตย์ที่ 30 กรกฎาคม พ.ศ. 2560

ใช้ Textbox ใน vb2010 บวกเลขไม่ได้

คุยกันก่อนครับ  เคยไหมครับที่เราจะเอาค่าใน Textbox มาทำการบวก ลบ คูณ หารแล้วไม่ได้ บอกได้เลยผมนี้เคยมากับตัว ตอนแรกไม่รู้ครับเอามาบวกกัน ผลออกมา เฮ้ย อะไรว่ะน่ะ คือลืมนึกไปครับว่า คอนโทรล Textbox ที่เอามาบวกกันไปใช้คุณสมบัติ Properties ชื่อว่า Text ก็มันบอกอยู่แล้วว่า Text  5555 พึ่งมานึกออก ลองทดสอบเป็นการบวกนะครับ


ตอนแรกก็เขียนโค้ดธรรมดาปกติแบบนี้ครับ


                       Textbox3.text = Textbox2.text + Textbox1.text

ผมใส่ข้อมูลในช่อง Textbox1 = 30
ใส่ข้อมูลในช่อง Textbox2 = 20
ผลลัพธ์ออกมาที่ช่อง Textbox3 = 2030  ซะงั้น



แต่การแก้ไม่ยากครับ แค่ใช้ฟังก์ชั่นของ vb2010 ที่เค้ามีมาให้ครับแก้เป็นแบบนี้ครับ


คือใช้ ฟังก์ชั่น Int ครอบคอนโทรลของเราครับ

                               Textbox3.text = int(Textbox2.text) + int(Textbox1.text)

คราวนี้ก็ลองรันโปรแกรมทดสอบดูครับ


คราวนี้ผลลัพธ์ที่ได้ก็ถูกต้องครับนั่นหมายความว่า เราจะเอาคุณสมบัติ .Text ของ Textbox มาคำนวนเลยไม่ได้นะครับ ต้องการใช้ฟังก์ชั่นก่อนครับถึงจะได้ คราวนี้ในตัวอย่างเราใช้ Int ซึ่งก็คือ Integer คือจำนวนเต็มครับ ผมลัพธ์ที่ได้ก็จะเป็นจำนวนเต็ม แล้วถ้าต้องการเป็นทศนิยม เราจะใช้อะไร ก็ลองค้นๆดูมันก็มี Cdbl ครับ เขียนแบบนี้


                         Textbox3.text = cdbl(Textbox2.text) + cdbl(Textbox1.text)

คราวนี้เราจะได้การคำนวนแบบทศนิยมได้ละครับ

บทสรุปครับ  คุณสมบัติ .Text เป็นข้อความหรือ String ครับ เมื่อนำมาคำนวนตรงๆ มันจะเอามาต่อกัน หาต้องการคำนวนจริงๆ ต้องใช้ ฟังก์ชั่นช่วยครับ ถึงจะคำนวนได้ จะใช้ Int หรือ Cdbl ก็ได้ครับแล้วแต่ว่าจะเอาแบบมีทศนิยมหรือไม่มี เอาไปประยุกต์ใช้ครับ

ทุกอย่างที่เขียน เกิดจากการใช้งานจริงทั้งหมดบางอย่างอาจมีวิธีที่ดีกว่า ให้ถือว่าเป็นแนวทางหนึ่งนะครับ อย่าเชื่อจนไม่คิดว่าจะมีวิธีอื่นอีก ขอบพระคุณที่เข้ามาอ่านครับ

วันพุธที่ 26 กรกฎาคม พ.ศ. 2560

การใส่รหัสป้องกันการเปิดไฟล์เวิร์ด Lock Word 2013

คุยกันก่อน เมื่อคราวที่แล้วผมได้เขียนเกี่ยวกับการป้องกันฐานข้อมูล Access ด้วยการกำหนดรหัสผ่านฐานข้อมูลไปแล้ว ก็เลยนึกขึ้นมาได้ว่าจริงๆแล้ว โปรแกรมในกลุ่ม Microsoft Office ตัวอื่นๆก็สามารถกำหนดรหัสผ่านในการเปิดไฟล์ได้ด้วยครับ ก็เลยนำเอามาบอกกันซึ่งก็ทำได้ไม่ยากเลยครับใช้เวลาเพียงน้อยนิดแต่สามารถป้องกันไฟล์งานสำคัญของเราได้เป็นอย่างดีครับ เริ่มกันเลย

1. ผมจะใช้กำหนดรหัสผ่าน ไฟล์งานโปรแกรมเวิร์ด Word ครับที่เราใช้กันพิมพ์งานกันทั่วไปนี่แหละครับผมจะใช้เวอร์ชั่น Microsoft Word 2013 นะครับแต่จริงๆแล้วเวอร์ชั่นไหนๆก็คล้ายๆกันครับไม่ต่างกันมากเท่าไหร่

หลังจากที่เราได้สร้างไฟล์ด้วยโปรแกรมเวิร์ดของเราเรียบร้อยแล้วนะครับเราก็เริ่มตั้งรหัสผ่านได้เลย ถ้าถามว่าต้องบันทึกหรือ Save ก่อนไหม บอกได้เลยว่าจะบันทึกก่อนก็ได้ หรือ ตั้งรหัสผ่านก่อนก็ได้ครับแต่ถ้าเอาแบบรอบครอบหน่อยก็ไปบันทึกก่อนนะครับ


2. หลังจากบันทึกแล้วก็มาที่เมนู Fileหรือ ไฟล์ ครับก็จะเจอกับหน้านี้ครับ ดูตรงข้อมูลครับ ป้องกันเอกสารที่มันเป็นรูปแม่กุญแจนั่นแหละครับที่บอกอย่างนี้เพราะบางเครื่องตั้งไว้เป็นภาษาที่ต่างกันครับ


3. หลังจากที่เราเลือกที่้ ป้องกันเอกสารแล้ว ก็จะมีเมนูเพิ่มเติมครับ ให้เราเลือกที่ เข้ารหัสลับด้วยรหัสผ่าน หรือรูปแม่กุญแจอีกแบบเดิมครับ


4. จากนั้นโปรแกรมจะให้เราทำการตั้งรหัสผ่าน


 และก็จะขึ้นมาให้เราใส่รหัสผ่านตัวที่เราใส่ไปอีกครั้งเป็นการยืนยันว่าจะใส่รหัสผ่านตัวนี้ครับ


5. จากนั้นลองปิดโปรแกรมแล้วเปิดขึ้นมาก็จะพบว่าเราต้องใส่รหัสผ่านก่อนเข้าใช้งานครับ แค่นี้ก็เป็นอันเรียบร้อยครับ


บทสรุป  ในชุดโปรแกรม Office ของ Microsoft นอกจากโปรแกรมฐานข้อมูล Access เราก็สามารถตั้งรหัสผ่านการเข้าใช้งานโปรแกรม Word ได้อีกด้วยครับ

วันจันทร์ที่ 24 กรกฎาคม พ.ศ. 2560

มาใส่กุญแจรักษาความปลอดภัยให้กับฐานข้อมูล Access กัน

คุยกันก่อนครับ  หลายๆคนคงจะเคยใช้โปรแกรมฐานข้อมูล Access กันมาบ้างแล้วนะครับ ซึ่งก็แน่นอนครับว่าโครงสร้างฐานข้อมูลเป็นสิ่งสำคัญครับเพราะเกิดจากการออกแบบกันมาและที่สำคัญสุดๆก็คือข้อมูลที่จัดเก็บอยู่ในนั้นครับ เอาแค่ ข้อมูลชื่อผู้ใช้กับรหัสผ่าน เข้าโปรแกรมก็เพียงพอต่อความอันตรายแล้วครับถ้าใครมาเปิดดูได้ก็สบายเค้าเลย เข้าโปรแกรมเราได้สบายใจ วันนี้ผมก็เลยจะเอาวิธีการป้องกันส่วนนี้มาฝากกันครับ พูดง่ายๆก็คือใส่กุญแจให้กับฐานข้อมูล Access กันครับ

1. เริ่มต้นครับให้เราเปิดโปรแกรม Access ขึ้นมาก่อนนะครับ(อย่าเปิดไฟล์เราโดยตรงนะครับ) ในที่นี้ผมใช้ Access2013 นะครับ


2. ทำการคลิกที่ Open Other File ครับ จากนั้นก็เลือกที่ Open  แล้วก็เลือกการเปิดจาก Computer แล้วทำการเลือกที่ Browse เพื่อหาไฟล์ฐานข้อมูลที่เราบันทึกไว้ในเครื่องของเรา


3. หลังจากเราทำการคลิกที่ปุ่ม Browse โปรแกรมจะให้เราเลือกไฟล์ฐานข้อมูลตรงนี้ก็อย่าพึ่งไปดับเบิ้ลคลิกนะครับ หรืออย่าพึ่ง คลิก Open เลยนะครับให้เลือกคลิกเลือกไฟล์แล้วไปคลิกที่ลูกศรชี้ลงนะครับ เลือก Open Exclusive ครับ


4. โปรแกรมก็จะเปิดงานของเราขึ้นมาตอนนี้ให้เลือกที่ File ครับ


5.  ตรงนี้เราจะอยู่ที่ Info ครับ ก็เลือก Encrypt with Password ครับ เพื่อทำการใส่รหัสผ่านให้กับฐานข้อมูลของเราครับ


6. เวลาใส่ฐานข้อมูลก็ใส่ 2 ครั้งเหมือนระบบอื่นๆทั่วไปครับเป็นการยืนยัน เสร็จแล้วก็จดไว้ก็ดีนะครับเผื่อลืม 5555


7. หลังจากใส่รหัสผ่านเรียบร้อยแล้วคราวนี้ก็ลองเปิดไฟล์โปรแกรมฐานข้อมูลของเราแบบปกติครับจะเปิดจากการดับเบิ้ลคลิกหรือเปิดผ่านโปรแกรมก็แล้วแต่มันจะถามรหัสผ่านก่อนครับ


บทสรุป โปรแกรม Access สามารถใส่รหัสผ่านฐานข้อมูลได้ครับ การกำหนดรหัสผ่านต้องเปิดจาก การOpen Exclusive จึงจะใส่ได้ครับ

วันเสาร์ที่ 22 กรกฎาคม พ.ศ. 2560

กำหนดให้ผู้ใช้ไม่สามารถขยายฟอร์มได้ vb2010

คุยกันก่อน  สำหรับใครที่ต้องการเขียนโปรแกรมแล้วไม่ได้กำหนดให้ฟอร์ม WindowState เป็น Maximized คือกำหนดให้มีขนาดเท่าที่สร้างฟอร์ม หลังจากสร้างแล้วหลังจากนำไปใช้ปรากฏว่า ผู้ใช้สามารถเอาเมาส์มาขยายฟอร์มได้ ซึ่งอาจทำโดยตั้งใจและไม่ได้ตั้งใจ ทำให้ฟอร์มมีการหดขยายได้  บ้างก็หดเข้าไปจนคอนโทรลต่างๆ หายไปหมด

หดจนเป็นแบบนี้


ปัญหาแบบนี้เราสามารถแก้ไขได้ง่ายๆด้วยการเขียนโค้ดง่ายครับ คือให้เราเขียนโค้ดที่ฟอร์มโหลดครับแบบนี้

จากโค้ดนะครับ
     me.maxinumsize  = new size (380,419)  อันนี้อธิบายจากโค้ดคือการกำหนดขนาดใหญ่สุดของ ฟอร์มครับ ตัวเลขตัวแรกคือความกว้างครับ ตัวหลังคือความสูง ในทำนองเดียวกันเราต้องกำหนดขนาดเล็กสุดของฟอร์มด้วยครับ  me.minimumsize  = new size (380,419)  อันนี้คือการกำหนดขนาดเล็กสุดของฟอร์มครับ หรืออีกวิธีครับ คือไม่ต้องมาเขียนโค้ดสำหรับคนที่ไม่ค่อยชอบพิมพ์ก็ง่ายๆครับไปกำหนดที่คุณสมบัติของฟอร์มครับ

แบบนี้ก็ง่ายเลยครับ
บทสรุป เราสามารถกำหนดฟอร์มไม่ให้มีการยืดหรือหดโดยผู้ใช้ได้ด้วยคุณสมบัติ Minimumsize กับ Maximumsize ครับ

วันพฤหัสบดีที่ 20 กรกฎาคม พ.ศ. 2560

การใช้ MaskedTextbox กำหนดรูปแบบการใส่ข้อมูล vb2010

คุยกันก่อน  สำหรับใครที่กำลังมองหาเครื่องมือในการช่วยให้การกรอกข้อมูลเป็นไปตามรูปแบบที่ต้องการ เช่น ตามรูปแบบหมายเลขบัตรประชาชร  9-9999-99999-99-9 หรือ หมายเลขโทรศัพท์
0-2123-4567-89  โดยการกำหนดรูปแบบนั้นมีประโยชน์ในหลายๆด้านครับเช่น จะได้ข้อมูลที่ถูกต้อง ครบ และเพื่อช่วยให้ผู้ใช้งานโปรแกรมกรอกได้สะดวกยิ่งขึ้น โดยใน vb2010 ก็มีเครื่องมือให้ใช้ได้อย่างสบายเลยครับ โดยมีชื่อว่า MaskedTextBox ครับ

1. สร้างคอนโทรล MaskedTextbox โดยการสร้างฟอร์มและเอาคอนโทรล MaskedTextbox มาวาดบนฟอร์ม

2. กำหนดคุณสมบัติ หลังจากเราเอาคอนโทรล maskedTextbox มาวางบนฟอร์มเรียบร้อยแล้วเราก็ไปกำหนดคุณสมบัติที่ Mask ครับ โดยเราสามารถเลือกจาก ปุ่มด้านหลัง ... ก็ได้หรือเขียนการกำหนดลงไปเองเลยก็ได้ครับ


3. เราสามารถเลือกจาก Input Mask ที่มีมาให้ได้ทันที


4. หรือเราจะสามารถเขียนรูปแบบลงไปตรงๆเลยก็ได้ครับ เช่น ผมต้องการจัดรูปแบบหมายเลขบัตรประชาชน ผมก็จะพิมพ์ตรง Mask ไปว่า  0-0000-00000-00-0 ครับแบบนี้ครับ


จากนั้นให้สังเกตุที่ฟอร์มที่คอนโทรลอยู่จะปรากฏรูปแบบการกำหนดที่เราใส่ไว้ จากนั้นเราก็จะสามารถใส่ข้อมูลไปตามรูปแบบที่กำหนดได้เลยครับ


บทสรุป  หากเราต้องการใส่ข้อมูลให้ได้รูปแบบที่แน่นอนเป็นการกรองข้อมูลและช่วยให้ผู้ใช้โปรแกรมใส่ข้อมูลได้ถูกต้อง Vb2010 มีคอนโทรลที่สามารถทำได้คือ MaskedTextbox

วันพุธที่ 19 กรกฎาคม พ.ศ. 2560

การทำให้ Textbox ใส่ได้เฉพาะตัวเลขใน vb2010

คุยกันก่อนครับ  วันนี้ผมจะมาเขียนโค้ดที่จะกำหนดให้ Textbox ของ vb2010 นั้นสามารถใส่ได้เฉพาะตัวเลขครับ ถ้าถามว่าทำไมต้องเป็นตัวเลขเท่านั้น ก็ให้นึกถึงว่าเวลาเขียนโปรแกรมเพื่อรับค่า  เบอร์โทรศัพท์   ราคาสินค้า    จำนวนสิ่งของ  หรือ  น้ำหนัก  ซึ่งทุกอย่างที่กล่าวมานั้นเป็นจำนวนตัวเลข โดยหากคนเขียนโปรแกรมจะทำการกรองข้อมูลเพื่อให้ได้ข้อมูลที่ถูกต้องเสมอ ก็จำเป็นต้องมีการเขียนโค้ดควบคุมครับ

เริ่มต้นสร้างโปรแกรม โดยการใช้ Label 1 ตัวครับกำหนดให้ คุณสมบัติ Text="กรอกข้อมูลตัวเลข" และใช้ Textbox 1 ตัวครับ


จากนั้นทำการเขียนโค้ดโดยการดับเบิ้ลคลิกไปที่ Textbox และให้ทำการเขียนโปรแกรมที่เหตุการณ์ Keypress ครับ  ใช้การตรวจสอบคำสั่ง Select case ครับตรวจสอบการกดแป้นพิมพ์ e.Keychar โดยกำหนดเป็น Case 48 to 57 เป็นการตรวจสอบค่าของตัวเลข 0-9 โดย keyChar ของ 0-9 จะอยู่ที่ 48-57 แต่เราจะต้องเพิ่ม keyChar บางส่วนเข้าไปเช่น การลบหรือ Backspace จะเท่ากับ 8  การ Enter เท่ากับ 13 และ Delete จะเท่ากับ 46 ครับ  ทั้งนี้การกำหนด Case แล้วหากเรากดอักษรบนคีย์บอร์ด KeyChar ที่ได้รับไม่ได้อยู่ในช่วงของ Case ที่เรากำหนดมันก็จะ แสดงข้อความเตือน ว่า " กรุณาใส่ตัวเลขครับ"
ทำการทดสอบโปรแกรม โดยการใส่ตัวอักษร ภาษาไทยหรือภาษาอังกฤษลงไปก็ได้ครับมันจะไม่ยอมให้กรอกครับพร้อมแสดงข้อความ " กรุณาใส่ตัวเลขครับ"

แต่หากเราใส่ตัวเลขเข้าไปก็จะสามารถใส่ได้ดั่งใจครับ


บทสรุป  ในการเขียนโปรแกรมตรวจสอบค่าของตัวอักษรที่ใส่เข้าไปนั้นสามารถตรวจสอบโดยใช้คำสั่ง Select Case และ ตรวจสอบ e.KeyChar ครับ โดยเลข  0-9 จะอยู่ที่ 48-57  ครับ

วันอังคารที่ 18 กรกฎาคม พ.ศ. 2560

สร้างปุ่มปิดโปรแกรมด้วย vb2010

คุยกันก่อนครับ  วันนี้ผมจะมาสร้างปุ่มปิดโปรแกรมของโปรเจ็คนะครับ โดยปกติเราจะปิดโปรแกรมโดยใช้ปุ่ม Close หรือปุ่มที่มันเป็นรูปตัว X ของเครื่องทีมีมาให้นะครับ แต่ถ้าในกรณีที่เราจะสร้างเองนั้นก็ไม่ยากครับ ลองไปดูกันเลยครับ
1. สร้างฟอร์ม และเครื่องมือดังภาพครับในที่นี้ผมสร้างปุ่มเพื่อนำมาใช้เป็นตัวอย่างในการปิดโปรแกรมนะครับ

2. สร้างโค้ดโปรแกรม  จากนั้นก็ทำการเขียนโค้ดโปรแกรมที่เหตุการณ์การคลิกของปุ่มที่เราสร้างได้เลยครับ
 
ใช้คำสั่ง msgbox ครับ ให้มีข้อความถามสักหน่อย แล้วก็ใส่ Vbquestion อันนี้หมายถึงให้มีรูปไอคอนเครื่องหมายคำถามครับ และก็ให้มีปุ่ม yes กะ no แล้วใช้ If ตรวจสอบครับว่าผู้ใช้กดปุ่มอะไร ถ้ากด Yes ก็ให้ ทำคำสั่ง ปิดครับ


บทสรุป แค่นี้เราก็มีปุ่มปิดโปรแกรมของเราเองได้แล้วครับ

วันจันทร์ที่ 17 กรกฎาคม พ.ศ. 2560

การสร้างไอคอน icon และการเปลี่ยนไอคอนใน vb2010

คุยกันก่อนครับ  เคยสงสัยไหมครับว่าการใส่ icon ให้กับโปรแกรมที่เขียนด้วย vb2010 นั้นทำอย่างไรจริงไม่ยากครับ แต่ไหนๆก็เกริ่นมาแล้วผมก็เลยจะขอทำให้ดูตั้งแต่ต้นเลยครับว่าขั้นตอนการสร้างแบบง่ายจนถึงการเอาไปใส่ในโปรเจ็คของเราทำอย่างไร
1.เริ่มแรกก็สร้างครับ ผมใช้ Photoshop ครับ โปรแกรมตกแต่งภาพยอดนิยมนี่แหละครับ กำหนดขนาดแบบนี้ครับ

2. เสร็จแล้วก็ออกแบบรูปให้แสดงและบ่งบอกถึงความเป็นโปรแกรมนั้นๆที่เราเขียนครับอาจเป็นภาพ เป็นตัวอักษร หรือ อะไรที่เราอยากตกแต่งครับตรงนี้ตามแต่ละท่านจะคิดเลยครับ





3. ในส่วนการบันทึก หรือ Save ของโปรแกรม Photoshop ก็เอาประเภทเป็น Gif หรือ PNG ก็ได้ครับ คือมันโปร่งใสได้ในกรณีที่รูปเราไม่ได้เป็นสี่เหลี่ยมผืนผ้าตลอดครับ


จากนั้นเราก็จะได้ภาพมา 1 ภาพและพร้อมกับการทำเป็น icon แล้วครับ
วิธีการทำ icon ก็แสนง่ายครับ เข้า google แล้วก็ค้นหาเลยครับ  หาคำว่า picture to icon ก็ขึ้นมาพรึบเลยครับแล้วก็เลือกมาสักเว็บครบ ส่วนตัวชอบเว็บนี้ครับ   http://icoconvert.com/  ใช้ประจำง่ายดี

วิธีการแปลงภาพเป็นไอคอน
1. เข้าเว็บ http://icoconvert.com/  ทำการเลือกไฟล์ภาพที่เราทำไวครับ และ ทำการ Upload

2. เราสามารถ Crop รูปให้ได้ตามต้องการแต่ถ้าไม่ต้องการทำอะไรก็ข้ามข้อนี้ไปได้เลยครับ


3.  ทำการเลือกรูปแบบครับ ถ้าไม่ได้เลือกอะไรก็จะเป็นรูปสี่เหลี่ยมปกติครับ

4. ขั้นตอนนี้เป็นการเลือกขนาดและประเภทเพื่อนำไปใช้ครับ ผมเลือกตรงข้อ 1 ครับ

5. จากนั้นทำการคลิก Convert ICO และก็ Download your icon(s) ได้แล้วครับผม

การเปลี่ยนไอคอนใน vb2010
1. ในส่วนของการนำไปใช้ ใน vb2010 ก็ให้เข้าที่ Project -> Properties ครับ


2. เลือกตรงส่วน Icon ครับ Browse เอาภาพที่ทำเป็นไอคอนแล้วจากเครื่องของเราครับ


 3. เลือกไอคอนของเราครับ


4.หลังจาก เลือกไอคอนแล้วจะปรากฏภาพไอคอนของเราขึ้นแทนที่ไอคอนที่โปรแกรมสร้างให้ก่อนหน้าครับ แบบนี้ครับ


5 .หลังจากเลือกได้แล้วเราก็ทำการรันโปรเจ็คของเราก่อนนะครับจากนั้นลองเข้าไปดูที่ Bin->Debug ครับมันก็จะเป็นโปรแกรมที่มีไอคอนของเราแบบนี้ครับ

บทสรุป  ไม่ยากเลยครับหลังจากที่ทำตามเราก็จะได้โปรแกรมที่มีไอคอนโปรแกรมเป็นของเราเองพร้อมนำไปทำตัว Setup แล้วครับ

โปรแกรมตั้งเวลา เข้าแถว เปิดเสียงหมดเวลา หมดคาบเรียน หรือชั่วโมงเรียน

สวัสดีครับในรอบ 2 ปี ผมหายไปตั้งแต่ปี 2560 ไม่ได้มาเขียน Blog เลย วันนี้กลับมา พร้อมกับโปรแกรมตัวนึงที่เขียนขึ้นเพื่อใช้งาน เล่านิดนึงครับ ผ...