'Wag Mo Na Sana By Parokya Ni Edgar

Been my favorite song. I dunno why . Tsk.



"Wag Mo Na Sana"

Naiinis na ako sa iyo
Bakit mo ba ako ginaganito
Ikaw ba ay naguguluhan sa ‘king tunay na nararamdaman sa iyo
Ano pa bang dapat na gawin pa
Sa ‘king pananamit at pananalita
Upang iyong mapagbigyang pansin aking paghanga at pagtingin sa iyo

[chorus]
Wag mo na sana akong pahirapan pa
Kung ayaw mo sa ‘kin ay sabihin mo na
Wag mo na sana akong ipaasa sa wala
Oo na mahal na kung mahal kita

Ano pa bang dapat na gawin ko
Upang malaman mo ang nadarama ko
Upang iyong mapagbigyang pansin
Akign paghanga at pagtingin
Sa iyo

[repeat chorus]

Oo na mahal na kung mahal kita

Just Sharin'

It's always been a sad day. Maybe I should commit suicide. I really love her but the problem is, it's too damn fucking complicated. I always think of her, every day and night. A day without you on my sights is like a day without a light. Because you light up my world with nobody else. I want nobody, nobody but YOU !(Karizza ♥)

You know our love was meant to be
The kind of love that lasts forever
And I need you here with me
From tonight until the end of time

You should know, everywhere I go
You're always on my mind, in my heart
In my soul

You're the meaning in my life
You're the inspiration
You bring feeling to my life
You're the inspiration
want to have you near me
I want to have you hear me sayin'
No one needs you more than I need you

And I know, yes I know that it's plain to see
We're so in love when we're together
And I know that I need you here with me
From tonight until the end of time

You should know, everywhere I go
Always on my mind, in my heart
In my soul

You're the meaning in my life
You're the inspiration
You bring feeling to my life
You're the inspiration
want to have you near me
I want to have you hear me sayin'
No one needs you more than I need you

You're the meaning in my life
You're the inspiration
You bring feeling to my life
You're the inspiration
want to have you near me
I want to have you hear me sayin'
No one needs you more than I need you

20 Reasons I Dislike Philippines

20 Reasons I Dislike the Philippines from Myles Cavill on Vimeo.

This I Promise You

By: Charlene Anne Borbon

As the years pass day by day
And the seasons change its way
There’s only one thing that I will never forget
When I loved you without any regret.

When I’m with you I feel complete
When you’re not with me I feel so weak
You give me strength, you give me happiness
When I have problems and circumstances.

But now I have to forget what I feel for you
Even though it’s very hard for me to do
Because everyone always inform me
Education must be my first priority.

Every time I think of you
I remember the memories we have been through
Truly, I admit, I’m missing you
But I always think it’s also for me and you.

When I go to church I pray for you
And I wish to God to take care of you
I also pray that you will wait for me
And soon will love me unconditionally.

There is a saying “True Love can wait”
But nowadays only few can make
I promise to you I will wait for the time
We will be together and will call you mine.

Making A Calculator With Visual Basic 6.0

PrintScreens ~

Codes:


Option Explicit
Dim num1 As Single
Dim num2 As Single
Dim ansnumber As Single
Dim op As String
Private Sub cmd0_Click()
Text1.Text = Text1.Text & 0
End Sub
Private Sub cmd00_Click()
Text1.Text = Text1.Text & "00"
End Sub
Private Sub cmd1_Click()
Text1.Text = Text1.Text & 1
End Sub
Private Sub cmd2_Click()
Text1.Text = Text1.Text & 2
End Sub
Private Sub cmd3_Click()
Text1.Text = Text1.Text & 3
End Sub
Private Sub cmd4_Click()
Text1.Text = Text1.Text & 4
End Sub
Private Sub cmd5_Click()
Text1.Text = Text1.Text & 5
End Sub
Private Sub cmd6_Click()
Text1.Text = Text1.Text & 6
End Sub
Private Sub cmd7_Click()
Text1.Text = Text1.Text & 7
End Sub
Private Sub cmd8_Click()
Text1.Text = Text1.Text & 8
End Sub
Private Sub cmd9_Click()
Text1.Text = Text1.Text & 9
End Sub
Private Sub cmdAdd_Click()
num1 = Val(Text1.Text)
Text1.Text = ""
op = "+"
End Sub
Private Sub cmdClear_Click()
Text1.Text = ""
End Sub
Private Sub cmdDivide_Click()
num1 = Val(Text1.Text)
Text1.Text = ""
op = "/"
End Sub
Private Sub cmdEquals_Click()
num2 = Val(Text1.Text)
Select Case op
Case "+"
ansnumber = num1 + num2
Case "-"
ansnumber = num1 - num2
Case "*"
ansnumber = num1 * num2
Case "/"
ansnumber = num1 / num2
End Select
Text1.Text = ansnumber
End Sub
Private Sub cmdMultiply_Click()
num1 = Val(Text1.Text)
Text1.Text = ""
op = "*"
End Sub
Private Sub cmdPoint_Click()
Text1.Text = Text1.Text & "."
End Sub
Private Sub cmdSubtract_Click()
num1 = Val(Text1.Text)
Text1.Text = ""
op = "-"
End Sub