View
0
Download
0
Category
Preview:
Citation preview
pEscola Técnica Informática
Disciplina
Curso Técnico de Gestão
Ensino Técnico
Joanico Guterres Monteiro,B.Gi
Rua : No.6 de Setembro, Nu’u
Escola Técnica Informática(ETI)
ina Programação Orientada a Objetos
Curso Técnico de Gestão Linguagem Programação
Ensino Técnico Profissional 12º ano
Joanico Guterres Monteiro,B.Gi
\
Rua : No.6 de Setembro, Nu’u Badak Akadiru-Hun, Nain
Díli
2014
Escola Técnica Informática
Linguagem Programação
Hun, Nain-Feto
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 2
MODULO 1
KONESIMENTO GERAL PROGRAMASAUN VISUAL BASIC
1. Intrudusaun
Visual Basic ne’e hanesan lian programasaun komputador nian. Lian
programasaun mak instrusaun sira nebe bele kompriende husi komputador atu halo
servisu espesifiku ruma. Lian programasaun Visual Basic dezemvolve husi Microsoft
iha tinan 1991, nebe sei kontinuasaun dezemvolve, sai hanesan lian programasaun
BASIC (Beginner,s) All-purpose Symbolic Instruction Code) nebe dezemvolve iha
1950 i tal.
Visual Basic henesan Develompent Tool ida, mak intrumento auxiliar ida nebe
bele ajuda ita atu halo (kria) programa komputador nian oin-oin, especialmente ba
komputador sira nebe mak utiliza sistema operativo windows. Visual basic mos
hanesan lian programasaun komputador nian ida nebe bele suporta objeto (Object
Oriented Programming = OOP).
2. Integrated Development Integration (IDE), (ambiente servisu visual basic nian)
Atu hahu ka ativu programa visual basic 6.0 liu husi butaun menu Start > All
Programs > Microsoft Visual Studio 6.0 > Microsoft Visual Basic 6.0, hein to’o mosu
jenela hanesan tuir mai ne’e :
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 3
Husi jenela nebe iha leten ba hili Standart EXE no klika iha butaun Open, hafoin sei
hamosu ambiente servisu visual basic nian ka IDE, hanesan tuir mai ne’e :
Deskripsaun kompnente husi Visual Basic :
1. Project : konjunto modulo/programa aplikasaun VB nian rasik nebe sei rai ho extensaun
ficeiro .VBP nebe sei priense husi Form sira.
2. Menubar : iha komponente/parte ida ne’e sei iha menu basiku sira nebe sei utiliza durante
kria programa ruma.
3. Toolbar : iha parte sei hamosu ikon sira husi menu principal nebe mak iha menubar,
hanesan imagen tuir mai ne’e :
1
2
3
4
5
6
7
8
9
N Naran Projeto N Loke Projeto N Rai Projeto N Exekuta Projeto
Tipo Projeto
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 4
4. Toolbox : iha parte ida ne’e sei komposto husi icon sira/ komponete sira atu hatama objeto
espesifiku ruma ba iha form laran waihira iha dezeno programa ruma.
5. Janela Formulario (form) : area/ambiente ida nebe mak iha relasaun ho jenela ida nebe bele
hare’e wainhira aplikasaun lao. Iha form ne’e mak bele tau kontrolo no kodigu sira atu
kria programa.
6. Janela kodigu : atu hakerek source code husi programa nebe mak ita sei halo/kria.
Code Editor
Label
TextBox CommandButton
OptionButton
CheckBox ComboBox
Naran Form Minimize Form
Maximize Form
Close Form
Event
Form
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 5
7. Project Explorer : sei hamosu form sira no mudul nebe iha programa nia laran nebe ita
halo. Ho project explorer ita bele muda husi form ida ba form seluk.
Deskripsaun :
1. Project Visual Basic
2. View Code : atu hare’e janela editor program
3. View Object :atu hare’e janela formulario
4. Toggle Folders : atu har’e pasta rai ficeiro ba.
5. Form nebe ativo hela.
8. Janela Propriedade/properties : atu kontrola propriedade husi form. Kontrolo sira iha
propriedade ne’e iha mudansa tuir form ka kontrolo nebe ita hili no presiza.
Janela Propriedade
Properties Caption
Valor Properties
Programação Orientada a Objetos
Joanico G. Monteiro, B.Gi.
9. Jenela Form Layout : atu kontrola pozisaun form iha monitor waihira halao exekusaun ba
programa (runing program).
3. Object, Property, Event no Method
Iha programasaun orientada objetos (OOP), ita prensiza hatene kona ba termo
Property, Event no Method
Object : komponente nebe iha programa ida nia laran
Property : karateristika husi object
Event : eventu/akontesimentu
Method : aksaun
4. Ilustrasaun ba Object, Property, Event no Method
Exemplo ida husi ilustrasaun ida ne’e,
objeto (object) ida nebe iha Property, Event no Method
Object : motor
Property : Marka (Yamaha
Method : Ba oin, Ba kotuk
Event : Gas, Dudu
Object : Form
Property : BackColor, BorderStyle, Caption, icon,
Event : Click, Load, Activated, DoubleClick, Unload, nst.
Method : Show, Hide, Move, nst.
Programação Orientada a Objetos
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466
Jenela Form Layout : atu kontrola pozisaun form iha monitor waihira halao exekusaun ba
programa (runing program).
Object, Property, Event no Method
Iha programasaun orientada objetos (OOP), ita prensiza hatene kona ba termo
Property, Event no Method, mak hanesan tuir mai ne’e :
komponente nebe iha programa ida nia laran
: karateristika husi object
: eventu/akontesimentu nebe infrenta husi object
: aksaun nebe halo husi Object
Ilustrasaun ba Object, Property, Event no Method
Exemplo ida husi ilustrasaun ida ne’e, ita bele kompara ho motor ida nebe sai hanesan
objeto (object) ida nebe iha Property, Event no Method. Atensaun ba imajen tuir mai ne’e :
Yamaha), Tipe (Vixion), Koor : Metan
Ba kotuk no Para/stop
Dudu no Xoke
: BackColor, BorderStyle, Caption, icon, picture, nst.
: Click, Load, Activated, DoubleClick, Unload, nst.
: Show, Hide, Move, nst.
2014
.Hp: +670 77417466 Página 6
Jenela Form Layout : atu kontrola pozisaun form iha monitor waihira halao exekusaun ba
Iha programasaun orientada objetos (OOP), ita prensiza hatene kona ba termo Object,
bele kompara ho motor ida nebe sai hanesan
. Atensaun ba imajen tuir mai ne’e :
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 7
MODULO 2
HAHU DEZENO PROGRAMA IHA VISUAL BASIC
Atu dezeno interface programa ida liu husi etapa 4 :
1. Kria Interface
Prepara form foun ida
Tau TexBox no CommandButton iha Form laran
2. Muda Property
Muda property tuir tabela iha kraik :
Object/objeto Property Value/Valor Form Caption Formulario Identidade Pessoal TexBox Text (Hamamuk tiha) CommandButton Caption Konesimento
3. Hakerek Kodigu Programa
Atu hakerek kodigu programa, klika dala 2 iha butaun CommanButton (Konesimento).
Hafoin hakerek kodigu tuir mai ne’e :
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 8
4. Exekuta programa
Atu exekuta programa hodi hare’e nia rezultad, klika iha butaun Run > Start ka hanehan
butaun F5 iha teklado (keyboard), hanesan tuir mai ne’e :
Hafoin klika tiha mak sei mosu janela no. 1 no ba klika iha butaun konesimento mak sei
hamosu rezultado programa iha no. 2
Obrigado barak no bom exprimentar….!
Exercício 1 :
1. Halo aplikasaun foun ida (File | New Project | Standard EXE)
2. Tau label 2, text 1 no commandbutton 2
1 2
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 9
3. Troka komponente idak-idak nia properties tuir tabela tuir mai ne’e :
Object Properties Valor
Form1
Caption StartUpPosition MaxButton MinButton
Konecimento CenterScreen False False
Label1 Caption AutoSize Font
Hakerek Naran True Comic Sans MS no Size (14)
Label2 Caption Naran sei mosun iha ne’e
Text1 Text Font
Hamamuk tiha (Delete) Comic Sans MS no Size (14)
Command1 Caption &Ok Command2 Caption &Sai
4. Hafoin troka ninia properties, mak sei hetan rezultadu hanesan tuir mai ne’e :
5. Klika dala 2 iha butaun Ok no hakerek kodigu hanesan tuir mai ne’e :
Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub
6. Klika dala 2 iha butaun sai no hakerek kodigu hanesan tuir mai ne’e :
Private Sub Command2_Click()
Unload Me
End Sub
7. Hakerek naran iha text nia laran, hafoin klika iha butaun ok, atu hare’e nia rezultadu no
klika iha butaun Sai atu taka form ida ne’e.
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 10
Exercício 3:
1. Halo aplikasaun foun ida (File | New Project | Standard EXE)
2. Tau label 2, text 1 no commandbutton 2, Frame 1, Option 4 no Check 3, tuir dezeno iha
kraik ne’e :
3. Muda ka troka ninia properties tuir tabela iha kraik
Object Properties Valor
Form1
Caption StartUpPosition MaxButton MinButton
Konecimento CenterScreen False False
Label1 Caption AutoSize Font
Hakerek Naran iha ne’e True Comic Sans MS no Size (14)
Label2 Caption Naran sei mosun iha ne’e
Text1 Text Font
Hamamuk tiha (Delete) Comic Sans MS no Size (14)
Command1 Caption &Ok Command2 Caption &Sai Frame1 Caption Hili Opsaun Option1 Caption Mean Option2 Caption Azul Option3 Caption Matak Option4 Caption Kinur 7
4. Hafoin troka hotu tiha ninia properties, mak sei mosu rezultadu hanesan tuir mai ne’e
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 11
5. Klika dala 2 iha butaun Ok no hakerek kodigu tuir mai ne’e :
Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub
6. Klika dala 2 iha butaun Sai no hakerek kodigu tuir mai ne ‘e :
Private Sub Command2_Click()
MSG = MsgBox("Ita hakarak sai husi form ida ne'e ?", vbQuestion + vbYesNo,
"Mensajen")
If MSG = vbYes Then
Unload Me
End If
End Sub
7. Klika dala 2 iha butaun Mean no hakerek kodigu :
Private Sub Option1_Click()
Label2.ForeColor = vbRed
End Sub
8. Kodigu Azul :
Private Sub Option2_Click()
Label2.ForeColor = vbBlue
End Sub
9. Kodigu Matak:
Private Sub Option3_Click()
Label2.ForeColor = vbGreen
End Sub
10. Kodigu Kinur :
Private Sub Option4_Click()
Label2.ForeColor = vbyellow
End Sub
11. Kodigu Bold :
Private Sub Command1_Click()
Label2.FontBold = Check1.Value
End Sub
12. Kodigu Italic
Private Sub Check2_Click()
Label2.FontItalic = Check2.Value
End Sub
13. Kodigu Underline
Private Sub Check3_Click()
Label2.FontUnderline = Check3.Value
End Sub
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 12
14. Rezultado exekusaun programa
15. Klika iha butaun sai no hili yes atu taka programa
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 13
Exercicio 4
1. Halo aplikasaun foun ida (File | New Project | Standard EXE)
2. Dezeno programa ida henesan dezeno iha kraik ne’e :
3. Troka komponente idak-idak nia properties tuir tabela iha kraik :
Object Properties Valor
Form1
Caption BorderStyle StartUpPosition Name
Kompras 1-Fixed Single 2-Center Screen Fnegosio
Label1 Caption Sasan nia Naran Label2 Caption Folin Sasan $ Label3 Caption Kuantidade Sasan Label4 Caption Total Folin $ Text1 to’o Text4 Text Hamamuk (Delete tiha) Text1 Name Txtnaran Text2 Name Txtfolin Text3 Name Txtkuantidade Text4 Name Txttotal
Command1 Caption Name
&Processu cdprocessu
Command2 Caption Name
&Sai Cdsai
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 14
4. Hafoin troka hotu tiha ninia properties, mak sei mosu rezultadu hanesan tuir mai ne’e
5. Klika dala 2 iha butaun processu, hafoin hakerek kodigu tuir mai ne’e :
Kodigu Butaun Processu
Private Sub cdprocessu_Click()
txttotal.Text = Val(txtfolin) * Val(txtkuantidade)
End Sub
Kodigu Butaun Sai
Private Sub cdsai_Click()
MSG = MsgBox("Ita hakarak sai husi form ida ne'e ?", vbQuestion + vbYesNo,
"Mensajen")
If MSG = vbYes Then
Unload Me
End If
End Sub
6. Klika iha butaun processu atu hare’e rezultadu exekusaun progrma
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 15
7. Klika iha butaun sai, mak sei hanesan tuir mai :
Exercício 5:
1. Dezena programa ida tuir dezeno iha kraik ne’e :
2. Troka nia properties tuir tabela iha kraik
Object Properties Valor
Form1 Caption StartUpPosition Name
Identidade Pessoal 2-Center Screen Fidentidade
Label1 Caption Naran Label2 Caption Sexo Label3 Caption Enderesu Label4 Caption No.Telemovel
Label5 Caption Font Alignment
IFORMASAUN PESSOAL Bold , Size = 18 2-center
Text1 – Text3 Text Hamamuk tiha
Combo1 Text Name
Hamamuk tiha Cmbsexo
Text1 Name Txtnaran Text2 Name Txtenderesu Text3 Name Txtmovel
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 16
Command1 Caption Name
&Processu Cdprocessu
Command2 Caption Name
&Sai Cdsai
3. Rezultadu hafoin troka nia properties
4. Hakerek kodigu tuir mai ne’e
Kodigu ba form
Private Sub Form_Load()
cmbsexo.AddItem "Mane"
cmbsexo.AddItem "Feto"
End Sub
Kodigu ba Processu
Private Sub cdprocessu_Click()
MsgBox " Ita nia naran " & txtnaran.Text & " Sexo " & cmbsexo.Text & " Ita nia enderesu
" & txtenderesu.Text & " Ho numero telemovel " & txtmovel.Text, vbInformation,
"INFORMASAUN HUSI NYCHO GUTERRES"
End Sub
Kodigu ba Sai
Private Sub cdsai_Click()
MSG = MsgBox("Ita hakarak sai husi form ida ne'e ?", vbQuestion + vbYesNo,
"Mensajen")
If MSG = vbYes Then
Unload Me
End If
End Sub
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 17
5. Input dadus ba laran hafoin klika iha butaun processu atu hare’e rezeltadu husi exekusaun
programa
TPC 1 – kria programa ida ho rezultado hanesan tuir mai ne’e
Programação Orientada a Objetos 2014
Joanico G. Monteiro, B.Gi.. Email : gamaksoft@gmail.com No.Hp: +670 77417466 Página 18
TPC – 2 kria programa kalkulador ho rezultado hanesan tuir mai ne’e :
Recommended