Post on 18-Apr-2015
การเขี�ยนโปรแกรมภาษาการเขี�ยนโปรแกรมภาษาคอมพิ�วเตอร�ขี��นสู�งคอมพิ�วเตอร�ขี��นสู�ง
41233054123305โดย อ. น�ฐพิงศ์� สู�งเน�ยมสูาขีาว�ชา เทคโนโลย�สูารสูนเทศ์ และสูาขีาว�ชา ว�ทยาการคอมพิ�วเตอร�คณะว�ทยาศ์าสูตร�และเทคโนโลย� มหาว�ทยาล�ยราชภ�ฏพิระนคร
http://www.siam2dev.comxnattapong@hotmail.com nattapong@siam2dev.comxnattapong2002@yahoo.com
เอกสูารสู'าหร�บ การเอกสูารสู'าหร�บ การเร�ยนใน เร�ยนใน
สู�ปดาห�ท�* สู�ปดาห�ท�* 11
Agendaแนะน�� vb.netVisual Programming คื�ออะไรEvent Driven คื�ออะไรWinformWebformPropertiesMethodEvent
Agenda (cont..)แนะน��หน �ต่��งก�รสร �ง Project
แนะน��คือนโทรลLabel
TextBox
อ��น ๆ
ก�รเร�ยกโปรแกรม MS-studio.net ขึ้��นม�ใช้ ง�น
• กดท�� Start• เล�อก Program• เล�อก microsoft visual
studio.net2003• เล�อก microsoft visual
studio.net2003 อ�กคืร#�งหน��ง
จะปรากฏหน,าแรก เม-*อเขี,าสู�� จะปรากฏหน,าแรก เม-*อเขี,าสู�� โปรแกรม ด�งร�ป โปรแกรม ด�งร�ป
ส�วนประกอบขึ้องหน �ต่��งโปรแกรม MS-Studio.NET2003
Title BarMenu BarTool BarStatus BarStart PageSolutionToolboxProperties WindowsCode view
สู�วนประกอบท�*สู'าค�ญขีองหน,าต�างโปรแกรม สู�วนประกอบท�*สู'าค�ญขีองหน,าต�างโปรแกรม Microsoft Microsoft Visual Studio.netVisual Studio.net
Start Page
Solution Explorer
ก�รสร �ง Project ใหม�
• ก�รสร �ง Project ขึ้อง Vb.net ขึ้��นม�ใหม�น#�นโดยปกต่&ส�ม�รถท��ได 2 ว&ธี� ด#งน��– ว&ธี�ท�� 1
• ไปท��เมน) File >> New >> Project
– ว&ธี�ท�� 2• Click ท�� Start Page >> เล�อกแถบ Project >> แล วกดท��
ป*+ม New Project
จ�กน#�นจะปร�กฏหน �ต่��ง New Project ขึ้��นม�ด#งร)ป
• โดย ม�ร�ยละเอ�ยดด#งน��• Project Type
– หม�ยถ�ง เล�อกช้น&ดขึ้อง ภ�ษ�ท��เร�ต่ องก�รสร �ง Project ในท��น��ก0ให เล�อก Visual Basic Project
• Templates– หม�ยถ�ง ประเภทขึ้อง
Project ท��เร�ต่ องก�รจะสร �งขึ้��นม�ใช้ ง�น ห�กเร�ต่ องก�รจะสร �งโปรแกรมท��จะท��ง�นอย)�บนว&นโดวส1 ก0ต่ องเล�อก เป2น Windows Application ด#งร)ป
หน �ต่��ง New Project (ต่�อ)
• ต่รงช้�อง Name น#�นให เร�ใส�ช้��อขึ้องโปรเจ0กต่1ท��ต่ องก�รจะสร �งขึ้��นม� โดยในท��น�� ผม จะต่#�งช้��อว�� “FirstProject”
• ส�วนในช้�องขึ้อง Location น#�นหม�ยถ�งต่��แหน�งท��อย)�ขึ้องไฟล1โปรเจ0กต่1ท# �งหมดท��เร�ต่ องก�รจะเก0บขึ้ อม)ลไฟล1ไว ซึ่��งห�กเร� ย#งไม�ได เคืยสร �งโฟลเดอร1ไว ก�อนหน �น�� VB.NET ก0จะสร �งโฟลเดอร1น��ให เร�โดยอ#ต่ม#ต่&
• จ�กน#�นก0กด OK ได เลย
• หล#งจ�กสร �งโปรเจ0กต่1ใหม�แล ว ก0จะเขึ้ �ส)�โปรแกรมขึ้องเร�ด#งร)ป
• โดย VB.NET จะสร �ง ส&�งท��เร�ยกว�� Form ขึ้��นม�ให เร�ใช้ ง�นด#งร)ป
ToolBox
• หน �ต่��งแสดงเคืร��องม�อต่��ง ๆ ท��เร�จะใช้ ในก�รเขึ้�ยนโปรแกรมโดย ปกต่& VB.NET จะเร�ยกเคืร��องม�อเหล��น��ว�� Control โดย Control ส�วนใหญ่�ท��เร�ม#กจะใช้ ง�นบ�อย ๆ ม�ด#งต่�อไปน��– Label– LinkLabel– TextBox– Button– MainMenu– CheckBox– RadioButton– GroupBox
ToolBox (ต่�อ)
– PictureBox– Panel– ListBox– CheckListBox– ComboBox– ListView– TreeView– TabControl– DateTimePicker– MountCalendar
ร) จ#กก#บ Label
• Label คื�อเคืร��องม�อท��เร�ใช้ ในก�รแสดงขึ้ อคืว�มต่��ง ๆ โดยจะไม�ส�ม�รถร#บเขึ้ �ม)ลได และม�คื*ณสมบ#ต่&ท��ส��คื#ญ่และท��เร�ม#กใช้ ง�นบ�อย ๆ ด#งน��
คื*ณสมบ#ต่&ท��ส��คื#ญ่ขึ้อง Label• Name• Autosize• BackColor• BorderStyle• Cursor• Enable• Font• ForeColor• Image• ImageAlign• ImageIndex• ImageList• Location• Size• Text• Visble
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
NameNameเป0นช-*อขีอง เป0นช-*อขีอง Label Label โดยปกต�ม�กจะต��งให,โดยปกต�ม�กจะต��งให,ขี1�นต,นด,วยค'าว�า ขี1�นต,นด,วยค'าว�า Lb Lb แล,วตามด,วยหน,าท�*แล,วตามด,วยหน,าท�*ขีอง ขีอง Label Label น��น ๆน��น ๆ เช�น เช�น
• LbNameLbName• LbTitleLbTitle• LbTAXLbTAX• LbSalaryLbSalary• LbAGELbAGE• LbSEXLbSEX
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
AutosizeAutosizeเป0นการก'าหนดเป0นการก'าหนดขีนาดขีนาดขีอง ขีอง Label Label ให,พิอด�ก�บขี,อความให,พิอด�ก�บขี,อความท�*อย��ใน ท�*อย��ใน Label Label น��น น��น ๆๆโดยม�ค�าอย�� โดยม�ค�าอย�� 2 2 ค�าค-อค�าค-อ
- True- True- False- False
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
BackColorBackColor
เป0นการก'าหนดเป0นการก'าหนดสู�สู�พิ-�นหล�งพิ-�นหล�งขีอง ขีอง Label Label
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
BorderStyleBorderStyleเป0นการก'าหนดเป0นการก'าหนดล�กษณะขีองพิ-�นล�กษณะขีองพิ-�นหล�ง หล�ง ขีอง ขีอง Label Label โดยม� โดยม� 3 3 ล�กษณะให,ล�กษณะให,ก'าหนดด�งน�� ค-อก'าหนดด�งน�� ค-อ
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
CursorCursor
เป0นการก'าหนดเป0นการก'าหนดล�กษณะล�กษณะขีองต�วช��เมาสู� ขีองต�วช��เมาสู� เม-*อถู�กเม-*อถู�กวางท�บบน วางท�บบน Label Label ในในขีณะร�นโปรแกรมขีณะร�นโปรแกรม
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
TextTextเป0นการก'าหนดเป0นการก'าหนดขี,อความ ขี,อความ ท�*ต,องการให,ท�*ต,องการให,แสูดงบน แสูดงบน Label Label ในขีณะในขีณะร�นโปรแกรมร�นโปรแกรม
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
TextAlignTextAlignเป0นการก'าหนด เป0นการก'าหนด ต'าแหน�งขีองต'าแหน�งขีองขี,อความ ขี,อความ ท�*ต,องการให,ท�*ต,องการให,แสูดงบน แสูดงบน Label Label ในขีณะในขีณะร�นโปรแกรมร�นโปรแกรมโดยม�รายละเอ�ยดด�งร�ปโดยม�รายละเอ�ยดด�งร�ป
ค/ณสูมบ�ต�ท�*สู'าค�ญขีอง Label
VisibleVisible
เป0นการก'าหนด เป0นการก'าหนด ให,ให,แสูดงหร-อไม�แสูดง แสูดงหร-อไม�แสูดง Label Label ในขีณะร�นในขีณะร�นโปรแกรมโปรแกรมโดยม�รายละเอ�ยด โดยม�รายละเอ�ยด 2 2 ค�า ค�า ค-อค-อ
TrueTrueFalseFalse
Visible = False
ร) จ#กก#บ TextBox
• TextBox คื�อเคืร��องม�อท��เร�ใช้ ใน การร�บและแสูดงขี,อม�ล ต่��ง ๆ โดยม�คื*ณสมบ#ต่&ท��ส��คื#ญ่และท��เร�ม#กใช้ ง�นบ�อย ๆ ด#งน��
คื*ณสมบ#ต่&ท��ส��คื#ญ่ขึ้อง TextBox• Name• Autosize• BackColor• BorderStyle• Cursor• Enable• Font• ForeColor• Line• Location• Locked• MultiLine• PasswordChar• ReadOnly• Size• Text• Visble
โคื ดในป*+ม BtnOK
private sub BtnOK_Click( )
msgbox ("Hello World @@@ :: " & TxtName.Text)
end sub
โคื ดในป*+ม BtnCancel
private sub BtnCancel_click()
TxtName.Clear()
TxtName.Focus()
end sub
โปรแกรมเคร-*องค�ดเลขีอย�างง�าย
Lb1 , Lb2BtnOK
BtnCancelBtnExit
TxtInput1TxtInput2LbResult
r1 , +r2 , -r3 ,*r4,/r5,^r6,sqrt
โคื ดในป*+ม Exit
Private sub BtnExit_Click()
Me.Close()
End Sub
โคื ดในป*+ม Exit
Private sub BtnExit_Click()
Close()
End Sub
โคื ดในป*+ม Exit
Private sub BtnExit_Click()
END
End Sub
โคื ดในป*+ม Cancel
Private sub BtnExit_Click()
TxtInput1.ClearTxtInput2.ClearLbResult.Text= “”R1.Checked= TrueTxtInput1.Focus
End Sub
Any Question ?