Capiz Tourist Spot

In the town in capiz is the place where in there are some tourist spot but we prepared to choose in the Agtaline Shrine.

The Latest Fashion Of this Year...

The Shoes For this year...

The hairstyle for this year...

Rocreh Web "design review

To all the students and the people over their...........

What are you Waiting for...........

Come on.....!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Rocreh web design is a contest of the all the students or all the people wants to win and test their ability where in they can show their skills in blogging. Not only in blogging but it has also on the web design for the people who has a good web design.

IneTch RocReh web Design

jeLLow,,,,,
shoyou kn0wangga the rocReh web design contest..
itechewa is d shontest for d ek ek chuvanish.....
soOOHHH all the jugels are qukas na joytining...
go......go.......gOWWhaNNN,,,,San Goko

Talk N Me....

Just Click

Visual basic for CSL 2-E

Private Sub btnmhoroscope_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnmhoroscope.Click

lblzsign.Visible = True
txtzsign.Visible = True
lbllcolor.Visible = True
txtlcolor.Visible = True
lbllday.Visible = True
txtllday.Visible = True
lbllnumber.Visible = True
txtlnumber.Visible = True


txtfname.Enabled = False
txtlname.Enabled = False
cmbage.Enabled = False
cmbday.Enabled = False
cmbgender.Enabled = False
cmbmonth.Enabled = False
cmbyr.Enabled = False


If cmbmonth.Text = "January" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Aquarius"
txtlcolor.Text = "Red"
txtlnumber.Text = "10,18, &32"
txtllday.Text = "Monday"

ElseIf cmbmonth.Text = "February" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Cancer"
txtlcolor.Text = "Apple Green"
txtlnumber.Text = "24,36 & 14"
txtllday.Text = "Tuesday"

ElseIf cmbmonth.Text = "March" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Gemini"
txtlcolor.Text = "Orange"
txtlnumber.Text = "19,28 & 35"
txtllday.Text = "Wednesday"

ElseIf cmbmonth.Text = "April" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Taurus"
txtlcolor.Text = "Black"
txtlnumber.Text = "17,16 & 27"
txtllday.Text = "Thursday"

ElseIf cmbmonth.Text = "May" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Aries"
txtlcolor.Text = "Brown"
txtlnumber.Text = "31,24 & 13"
txtllday.Text = "Friday"

ElseIf cmbmonth.Text = "June" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Scorpio"
txtlcolor.Text = "White"
txtlnumber.Text = "28,34 & 18"
txtllday.Text = "Monday"

ElseIf cmbmonth.Text = "July" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Libra"
txtlcolor.Text = "Blue"
txtlnumber.Text = "58,14 & 69"
txtllday.Text = "Tuesday"

ElseIf cmbmonth.Text = "August" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Virgo"
txtlcolor.Text = "Pink"
txtlnumber.Text = "1,15 & 29 "
txtllday.Text = "Wednesday"

ElseIf cmbmonth.Text = "September" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Leo"
txtlcolor.Text = "Gray"
txtlnumber.Text = "24,36 & 34"
txtllday.Text = "Thursday"

ElseIf cmbmonth.Text = "October" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Pisces"
txtlcolor.Text = "Yellow Green"
txtlnumber.Text = "22,26 & 34"
txtllday.Text = "Friday"

ElseIf cmbmonth.Text = "November" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Capricorn"
txtlcolor.Text = "Violet"
txtlnumber.Text = "14,12 & 9"
txtllday.Text = "Saturday"

ElseIf cmbmonth.Text = "December" Then
lblzsign.Visible = True
txtzsign.Visible = True
txtzsign.Enabled = True
txtzsign.Text = "Sagittarius"
txtlcolor.Text = "Sky Blue"
txtlnumber.Text = "8,10 & 24"
txtllday.Text = "Sunday"

End If

End Sub

Private Sub btnclear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnclear.Click

lblzsign.Visible = False
txtzsign.Visible = False
lbllcolor.Visible = False
txtlcolor.Visible = False
lbllday.Visible = False
txtllday.Visible = False
lbllnumber.Visible = False
txtlnumber.Visible = False

txtfname.Text = " "
txtlname.Text = " "
cmbage.Text = " "
cmbday.Text = " "
cmbgender.Text = " "
cmbmonth.Text = " "
cmbyr.Text = " "

txtfname.Enabled = True
txtlname.Enabled = True
cmbage.Enabled = True
cmbday.Enabled = True
cmbgender.Enabled = True
cmbmonth.Enabled = True
cmbyr.Enabled = True

txtzsign.Text = " "
txtlcolor.Text = " "
txtllday.Text = " "
txtlnumber.Text = " "
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click
Me.Close()
End Sub

End Class

Pbb double task video

The House B housemates makes a funny video inside the house of big brother. As you can see this video its make laugh to you. It is hard for them to do but they want the people outside and all over the world whose watching this video will be happy.