Re: VB. Net String conversion Exception Hanlder message

        Hi.
here's the line of code where it is not liking it.
line 43:

costDecimal = Decimal.Parse(costTextBox.Text)


and will then copy the exception error log as well.

System.FormatException was unhandled
  Message="Input string was not in a correct format."
  Source="mscorlib"
  StackTrace:
       at System.Number.StringToNumber(String str, NumberStyles options, 
NumberBuffer& number, NumberFormatInfo info, Boolean parseDecimal)
       at System.Number.ParseDecimal(String value, NumberStyles options, 
NumberFormatInfo numfmt)
       at System.Decimal.Parse(String s)
       at Finance.financeForm.calculateButton_Click(Object sender, EventArgs 
e)
       at System.Windows.Forms.Control.OnClick(EventArgs e)
       at System.Windows.Forms.Button.OnClick(EventArgs e)
       at System.Windows.Forms.ButtonBase.OnKeyUp(KeyEventArgs kevent)
       at System.Windows.Forms.Control.ProcessKeyEventArgs(Message& m)
       at System.Windows.Forms.Control.ProcessKeyMessage(Message& m)
       at System.Windows.Forms.Control.WmKeyChar(Message& m)
       at System.Windows.Forms.Control.WndProc(Message& m)
       at System.Windows.Forms.ButtonBase.WndProc(Message& m)
       at System.Windows.Forms.Button.WndProc(Message& m)
       at 
System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
       at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& 
m)
       at System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, 
Int32 msg, IntPtr wparam, IntPtr lparam)
       at System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& 
msg)
       at 
System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(Int32
 
dwComponentID, Int32 reason, Int32 pvLoopData)
       at 
System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 
reason, ApplicationContext context)
       at 
System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, 
ApplicationContext context)
       at System.Windows.Forms.Application.Run(ApplicationContext context)
       at 
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
       at 
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
       at 
Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[]
 
commandLine)
       at Finance.My.MyApplication.Main(String[] Args)
       at System.AppDomain._nExecuteAssembly(Assembly assembly, String[] 
args)
       at System.AppDomain.ExecuteAssembly(String assemblyFile, Evidence 
assemblySecurity, String[] args)
       at Microsoft.VisualStudio.HostingProcess.HostProc.RunUsersAssembly()
       at System.Threading.ThreadHelper.ThreadStart_Context(Object state)
       at System.Threading.ExecutionContext.Run(ExecutionContext 
executionContext, ContextCallback callback, Object state)
       at System.Threading.ThreadHelper.ThreadStart()
  InnerException:


cheers Marvin.
----- Original Message ----- 
From: "Ricks Place" <OFBGMail@xxxxxxxxx>
To: <programmingblind@xxxxxxxxxxxxx>
Sent: Sunday, September 28, 2008 10:31 PM
Subject: Re: VB. Net String conversion Exception Hanlder message


Hi Marv:
Just send the Error Message and the line of code, or short code block,
related to the message for help please.
Rick USA
----- Original Message ----- 
From: "Marvin Hunkin" <startrekcafe@xxxxxxxxx>
To: <programmingblind@xxxxxxxxxxxxx>
Sent: Sunday, September 28, 2008 8:02 AM
Subject: VB. Net String conversion Exception Hanlder message


> Hi.
> now, for my finance project, got an exception error, and says some thing
> about conversion string.
> how can i fix this one, and if any one can help, would be appreciative. vb
> programming book.
> for my vb class.
> if any one can help me out, and show me how to fix the problem, will go
> and
> show you the code and the exception helper window.
>
>
> 'Program:   Finance
> 'Programmer:    Marvin Hunkin
> 'Date:  Tuesday September 9 2008
> 'Description:   Enter beginning, ending and cost of living for a
> management
> company.
> 'Calculate  the beginning, ending and cost of living, display the average
> inventory,  and the turnover.
>
>
> Public Class financeForm
>
>
>    'Constant Declaration
>
>    Const yearInteger As Integer = 365
>
>
>
>
>
>
>
>
>
>    Private Sub calculateButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles calculateButton.Click
>
>
>        'Calculate Beginning Inventory, Ending Inventory and Cost Of Goods
>
>        Dim beginDecimal As Decimal
>        Dim endDecimal As Decimal
>        Dim costDecimal As Decimal
>        Dim averageDecimal As Decimal
>        Dim turnoverInteger As Integer
>
>
>        'Convert variables.
>
>        With Me
>
>
>
>            beginDecimal = Decimal.Parse(beginTextBox.Text)
>            endDecimal = Decimal.Parse(endTextBox.Text)
>            costDecimal = Decimal.Parse(costTextBox.Text)
>            averageDecimal = Decimal.Parse(averageTextBox.Text)
>            turnoverInteger = Integer.Parse(turnoverTextBox.Text)
>
>
>            'Calculate Finance Details.
>
>
>
>
>
>
>
>            averageDecimal = beginDecimal * endDecimal * costDecimal /
> yearInteger
>            turnoverInteger = beginDecimal * endDecimal / yearInteger
>
>
>            Try
>
>
>
>
>            Catch beginException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>            Catch endException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>
>
>
>
>            Catch costException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>
>
>
>
>
>
>                'Format Text Boxes.
>
>                .beginTextBox.Text = beginDecimal.ToString("C")
>                .endTextBox.Text = endDecimal.ToString("C")
>                .costTextBox.Text = costDecimal.ToString("C")
>                .averageTextBox.Text = averageDecimal.ToString("C")
>                .turnoverTextBox.Text = turnoverInteger.ToString("N")
>
>
>                With beginTextBox
>
>
>                    .Focus()
>                    .SelectAll()
>
>                End With
>
>
>
>            End Try
>
>
>        End With
>
>
>
>
>    End Sub
>
>    Private Sub clearButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles clearButton.Click
>
>
>
>        'Clear Text boxes.
>
>        beginTextBox.Clear()
>
>    End Sub
>
>    Private Sub exitButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles exitButton.Click
>
>
>        'Exit the project.
>
>        Me.Close()
>
>    End Sub
> End Class
>
>
> 'Program:   Finance
> 'Programmer:    Marvin Hunkin
> 'Date:  Tuesday September 9 2008
> 'Description:   Enter beginning, ending and cost of living for a
> management
> company.
> 'Calculate  the beginning, ending and cost of living, display the average
> inventory,  and the turnover.
>
>
> Public Class financeForm
>
>
>    'Constant Declaration
>
>    Const yearInteger As Integer = 365
>
>
>
>
>
>
>
>
>
>    Private Sub calculateButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles calculateButton.Click
>
>
>        'Calculate Beginning Inventory, Ending Inventory and Cost Of Goods
>
>        Dim beginDecimal As Decimal
>        Dim endDecimal As Decimal
>        Dim costDecimal As Decimal
>        Dim averageDecimal As Decimal
>        Dim turnoverInteger As Integer
>
>
>        'Convert variables.
>
>        With Me
>
>
>
>            beginDecimal = Decimal.Parse(beginTextBox.Text)
>            endDecimal = Decimal.Parse(endTextBox.Text)
>            costDecimal = Decimal.Parse(costTextBox.Text)
>            averageDecimal = Decimal.Parse(averageTextBox.Text)
>            turnoverInteger = Integer.Parse(turnoverTextBox.Text)
>
>
>            'Calculate Finance Details.
>
>
>
>
>
>
>
>            averageDecimal = beginDecimal * endDecimal * costDecimal /
> yearInteger
>            turnoverInteger = beginDecimal * endDecimal / yearInteger
>
>
>            Try
>
>
>
>
>            Catch beginException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>            Catch endException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>
>
>
>
>            Catch costException As FormatException
>
>
>                MessageBox.Show("Entry must be numeric.", "Data Errror", _
>                                MessageBoxButtons.OK,
> MessageBoxIcon.Exclamation)
>
>
>
>
>
>
>
>
>                'Format Text Boxes.
>
>                .beginTextBox.Text = beginDecimal.ToString("C")
>                .endTextBox.Text = endDecimal.ToString("C")
>                .costTextBox.Text = costDecimal.ToString("C")
>                .averageTextBox.Text = averageDecimal.ToString("C")
>                .turnoverTextBox.Text = turnoverInteger.ToString("N")
>
>
>                With beginTextBox
>
>
>                    .Focus()
>                    .SelectAll()
>
>                End With
>
>
>
>            End Try
>
>
>        End With
>
>
>
>
>    End Sub
>
>    Private Sub clearButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles clearButton.Click
>
>
>
>        'Clear Text boxes.
>
>        beginTextBox.Clear()
>
>    End Sub
>
>    Private Sub exitButton_Click(ByVal sender As Object, ByVal e As
> System.EventArgs) Handles exitButton.Click
>
>
>        'Exit the project.
>
>        Me.Close()
>
>    End Sub
> End Class
>
> graphic 94  Solution Explo... Data SourcetTextBox.Text)
> averageTextBox.Text) Properties
> (turnoverTextBox.Text) graphic 545
> graphic 545
> graphic 932
> graphic 756  graphic 692
>
>
>
> __________
> View the list's information and change your settings at
> http://www.freelists.org/list/programmingblind

__________
View the list's information and change your settings at
http://www.freelists.org/list/programmingblind


__________
View the list's information and change your settings at 
http://www.freelists.org/list/programmingblind

Other related posts: