﻿Version=6.80
NumberOfForms=1
Form1=Form1
FormWidth=238
FormHeight=268
IconFile=
NumberOfDesktopIncludes=0
NumberOfDeviceIncludes=0
NumberOfObjects=0
NumberOfModules=0
Sub designer
addform(Form1,"Form1","",220,220,220)@
addbutton(form1,Button5,150,155,75,20,"Button5",212,208,200,0,0,0,True,True,9)@
addbutton(form1,Button4,55,145,75,23,"Button4",212,208,200,0,0,0,True,True,9)@
addbutton(form1,Button3,135,105,75,23,"Button3",212,208,200,0,0,0,True,True,9)@
addbutton(form1,Button2,50,100,75,23,"Button2",212,208,200,0,0,0,True,True,9)@
addbutton(form1,Button1,60,30,75,30,"Button1",212,208,200,0,0,0,True,True,9)@
End Sub
@EndOfDesignText@
Sub Globals
	'Declare the global variables here.

End Sub

Sub App_Start
	Form1.Show
	
	For a = 1 To 5
AddEvent("Button" & a,Click, "Btn1_Click")
Next a

End Sub


Sub Btn1_Click
a=Sender.text
Msgbox(a)
End Sub
