hlep~ need a fix

[wildguardian]

1Error Handles clause requires a WithEvents variable defined in the containing type or one of its base types

Code: Select all

Public Class frmPS

    Private Sub btnCompute_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCompute.Click
       
Dim costPerShare, numberOfshares, amount As Double
        costPerShare = 25.625
        numberOfshares = 400
        amount = costPerShare * numberOfshares
        lstoutput.Items.Add(amount)

    End Sub

End Class


it shows error > btnCompute.Click

help please :~S

[ilkut]

but it's working