vb.net - Visual Basic - Display button will not calculate raise percentage -


I am trying to increase one percent by using new pay in the old pay and visual basics ... I I'm stuck in the way. Any ideas where I am going wrong

  'name: salary project project' Objectives: Performance enhancement 'PRECENTAGE' programmer:? & Lt; Sarah Jimenez & gt; On & lt; 7/24/2014 & gt; Option guessing strict closure option of Public Class frmMain private property txtNewSalary as clear object personal property object as txtOldSalary as private sub btnisplay_Click (this object, e EventArgs as) btndisplay.Click 'performance increase PRECENTAGE 'declared designated constant and variable dim intOldSalary handles as double dim intent of double dim intrusion as single-diamond insert difference as double as double end Calculated and the difference Silri Difafrens = Intvens Silri - Intolld increases Introij calculate Solri percentage Exercise = Int Silri difference * Intollsd Solri 'set gather percent' message or display, while increasing performance and display End Sub Private All BTNXtiglik (as the object, in the form of e EventArgs) handle btnExit.Click Me.Close () End Sub Personal Sub TextBox3_TextChanged (As the object, E Ev EntArgs) Handle TextBox3.TextChanged 'displays as the object lifting Percent End Sub Personal Sub-btnDisplay_Click (senders, eg events such as ARGS) BTNDDP AI. Click 'Extend Percentage End Sub End Class    

If you need to get it. Percentage you can do it this way as integer = intOldSalary / 100
intRaisePercentage = intNewSalary / OneP OneP Slim
- 100
TextBox3.Text = intRaisePercentage & amp; "%"

I do not know where you get the price, so I add them to the code.

I also repeat the integer

If you use an integer, then one percentage point will be 10% - if you want to have a percentage of 11.4% then give all the inters Change in time

  options clear alternative estimating strict closure option of Public Class frmMain private property object as txtNewSalary = 1100 Private property txtOldSalary object = 1000 Private sub btnisplay_Click (as this object E) Btndisplay.Click 'as EventArgs Do not increase PRECENTAGE 'declared named constants and low variable handled as integer As Integer = txtOldSalary dim intNewSalary As Integer As Integer Dim intSalaryDifference As Integer = txtNewSalary dim Introijeshn' salary difference calculated Sselri interface = IntNewSalary - intOldSalary 'calculation percentage increased as Deep OneP = intOldSalary / 100 intReisePercentage = intNewSalary / OneP - 100 TextBox3.Text = Intel AisePercentage & amp; "%" 'IntRaisePercentage = intSalaryDifference * In determining the percentage of take intOldSalary' 'message or calculated and d End Sub private Sub btnExit_Click (the object, such as e EventArgs) Handles btnExit.Click Me.Close () End sub Private sub TextBox3_TextChanged (object such as, e EventArgs) as handle TextBox3.TextChanged 'displays increase the percentage End sub Private sub btnDisplay_Click (as this object, e EventArgs) as BtnDisplaykClick handle display Does increase percentage end sub end class    

Comments

Popular posts from this blog

ios - Adding an SKSpriteNode to SKScene from a child SKSpriteNode -

Matlab transpose a table vector -

c# - Textbox not clickable but editable -