Re: VB. Net String conversion Exception Hanlder message

Hi Marv, much better.
OK, so do you have a valid number in the
costTextBox.Text TextBox? That is what did you enter in there.
You can use a MessageBox.Show to show the value if you want to check it before and after the Parsing before the calculations for debugging or using the Vb.net Debugger to check it if you know ho to do that. 
Rick USA
----- Original Message ----- From: "Marvin Hunkin" <startrekcafe@xxxxxxxxx> 
To: <programmingblind@xxxxxxxxxxxxx>
Sent: Sunday, September 28, 2008 8:39 AM
Subject: 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 

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

Other related posts: