Page 31 - ePB316_最佳案例 Visual Basic 2017 程式設計

Chapter 02 │基本語法

ɧeᜊᅰၾ੬ᅰٙϞࣖᇍఖ

ίɓࡈɽۨਖ਼ࣩ㛪dɓࡈਖ਼ࣩ݊͟ᅰࡈڌఊଡ଼ΥϾϓfவԬڌఊஷ੬͟஢εɛ

Υɢҁϓdމəᒒе־Ϥᜊᅰʝ޴ʍᓔdה˸̀඲ՓࠈᜊᅰٙϞࣖᇍఖ€ɦ၈މ͛
ն඄ಂfԷνjੵɧண stunum=15dҽ̬ɦண stunum=20dۆ್̀ிϓೌجཫಂ

ٙ፹Ⴌdধਗ਼ᜊᅰٙϞࣖᇍఖાࠑνɨj

΂ɓᜊᅰٙ܁ѓd߰ೌतࣿᑊ׼dѩ᙮׵ਜਹᜊᅰdՉϞࣖᇍఖස˟׵༈ᜊᅰהί

ٙ೻όਜ෯fԷνj܁ѓίݔࡈાࠑਜ෯ʕdν if א for ાࠑਜ෯dۆ̴ٙϞࣖᇍఖ
ස˟׵༈ાࠑਜ෯dйٙાࠑਜ෯݊ೌج՟੻༈ਜਹᜊᅰٙ࠽i߰܁ѓ׵Ռόʕd

ۆ̴ٙϞࣖᇍఖස˟׵༈ՌόdՉ̴ٙՌόѩೌج՟੻༈ਜਹᜊᅰٙ࠽i߰܁ѓί
ڌఊdۆՉϞࣖᇍఖස˟׵༈ڌఊdΝᅵٙ༸ଣdՉ̴ٙڌఊ݊ೌج՟੻༈ਜਹᜊ

ᅰٙ࠽fԷνj˸ɨાࠑٙ a ᜊᅰd̴ٙϞࣖᇍఖ݊዆ࡈڌఊdה˸ cmd1_Click()
ʿ cmd2_Click() ѩ̙π՟ a ᜊᅰfՉϣdcmd1_Click() ʿ cmd2_Click() Ռόʫ܁ѓ

b ၾ c ᜊᅰdۆ̴ࡁٙϞࣖᇍఖස˟׵ cmd1_Click() ʿ cmd2_Click() Ռόʫd̥ࠅ
ᕎකϤՌόуೌجπ՟வԬᜊᅰf

௰ܝdᒱ್ cmd1_Click() ၾ cmd2_Click() Ռόʫ΢Ϟ d ᜊᅰdШϤ d ۍ΢ІЦ͜ʔ

Νٙাኳ᜗d־Ϥʔ޴ʝʍᓔdϤуމਜਹᜊᅰٙᎴᓃfఱνΝίʔΝٙ࢕ࢬ༁d
ᗭеึ՟͜޴ΝٙɛΤdШ݊Ց˒݁ԫਕה೮াࣛdɓ֛̙˸ʱৣՑʔΝٙԒ΅ᗇ

໮ᇁfՉϣd޴ΝٙᜊᅰΤ၈dʔঐ̈ତίΝɓՌόdఱνΝdΝɓ࢕ࢬʔึϞՇ
ࡈɛΝΤf

Public Class Form1

Dim a As Short
Private Sub Button1_Click(n) Handles Button1.Click
Dim b, d As Short
End Sub

Private Sub Button2_Click(n) Handles Button2.Click
Dim c, d As Short
End Sub
End Class

23