Case အေၾကာင္း

Case အေၾကာင္းပါ
Case ဟာ Label ေတြ Button ေတြကို
ကိုလိုသလို ခိုင္းေစလို႔ရပါတယ္
သူကို Event ဘက္မွာ သံုးရပါမယ္
ဥပမာျပမယ္ေနာ္.....
Main အပိုင္းပါ
AddButton("btn",40%x,60%y,30%x,10%y,"")

Event အပိုင္းပါ
Sub Button_Click(who)
Select Who
Case"btn"
CallPhone("106")
End Select
End Sub

စမ္းၾကည့္ပါ

Case "btn"
လို႔ေရးထားတာဟာ
ကိုခိုင္းခ်င္တဲ့ Button Name ပါ
CallPhone ကေတာ့ ဖုန္းေခၚေပးမယ္ Code ပါ