Public Class Form1
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim k, b As Double
k = (b)
End Sub
End Class
UHVibGljIENsYXNzIEZvcm0xCgogICAgUHJpdmF0ZSBTdWIgTGFiZWwyX0NsaWNrKEJ5VmFsIHNlbmRlciBBcyBTeXN0ZW0uT2JqZWN0LCBCeVZhbCBlIEFzIFN5c3RlbS5FdmVudEFyZ3MpIEhhbmRsZXMgTGFiZWwyLkNsaWNrCgogICAgRW5kIFN1YgoKICAgIFByaXZhdGUgU3ViIFRleHRCb3gxX1RleHRDaGFuZ2VkKEJ5VmFsIHNlbmRlciBBcyBTeXN0ZW0uT2JqZWN0LCBCeVZhbCBlIEFzIFN5c3RlbS5FdmVudEFyZ3MpIEhhbmRsZXMgVGV4dEJveDEuVGV4dENoYW5nZWQKICAgICAgICBEaW0gaywgYiBBcyBEb3VibGUKICAgICAgICBrID0gKGIpCgogICAgRW5kIFN1YgpFbmQgQ2xhc3M=