Storing trailing zeros

[snooglets7]

Hey there,

I need to store the trailing zeros when I convert a numerical string into a double...I jsut don't know how.

I.E.

txtLimDist.text = 10.00 (user enters this in the GUI)

This gets converted to a double

limDist = Double

But if the user enters 10.00 (for example) it is converted to 10

I have to keep the .00 as the number is used to search an array and select the numbers less than or equal to the limDist...at the moment it selects any number starting with 10...so it gets 10.oo and 10.71....this stuffs up the rest of my calculations... can anyone help here?

Ta

[SammyB]

What does your array look like? Is it Double or String? But in either case, 10.71 is greater than 10, so I'm confused. Your search must not be correct. Try single stepping thru the code (F10 for .Net, F8 for VB6 & VBA) and hovering over variables to see their values and make sure your code is correct.

[snooglets7]

HI,

My array is a double that stores numbers from a 2 column csv file (1st dimension is bearings, 2nd is distance). I get the user to enter a distance limit (limDist). I then sort the array by the 2nd dimension and then using the distance limit, I find the maximum and minimum values in the array 2nd dimension..... I have stepped through the code and it all runs fine but when I enter a distance limit of 10.00 the below code returns a maximum of 10.71 not 10.00 (in the csv file there are 2 values of 10.71 and one of 10.00 so I know that it should be returning 10.00 NOT 10.71) The same thing happens for similar values (eg. 14.00 returns 14.23, NOT 14.00)

 
Call sortArrDist(arrSurvey) 'This definatley works correctly
Try
targetIndex = -1
low = 0
mid = 0
high = arrSurvey.GetUpperBound(1) - 1 'max index
target = limDist 'to search for
 
Do While ((targetIndex < 0) And (high >= low))
   mid = (low + high) / 2
   If (arrSurvey(mid, 1) = target) Then 'found it
      targetIndex = mid
   ElseIf (arrSurvey(mid, 1) > target) Then 'search bottom half
      high = mid - 1
   Else 'search top half
      low = mid + 1
   End If
Loop
 
If low < arrSurvey.GetLowerBound(1) Then
   minDist = Double.NaN
   MessageBox.Show("The Distance Limit Entered does is not near a Survey point." _
& vbCrLf & "The Closest Distance to this Limit is the Control Point")
Else
   minDist = arrSurvey(0, 1)
   maxDist = arrSurvey(high, 1)
End If
 

I tried to format the limDIst in the Command Sub that calls the function that holds the above code (with 2 other claculations) but it returned max min and averages of 0.00 (I used Format(txtLimDI st.text, "0.00"); and also tried "f", "c",...but these are all formating for string output NOT conversion from string to doulbe and keepin the trailing zeros. I also tried using decimal, but I know that doesn't store trailing zero's...at least not for this purpose.....

I need to submit my work today! My tutor has made herself unavailable and I can't work this out!

Thanks

Kate

[SammyB]

Works for me, I think, but I had to change line 6 to
high = arrSurvey.GetUp perBound(0) - 1 'max index

[Killer42]

I agree with SammyB, the error must be in your search.

Sorry snooglets, but you're on totally the wrong track about the zeroes.

A numeric field, be in integer, double, or whatever, does not store any leading or trailing zeroes. It stores a numeric amount. If you want trailing zeroes, you can display it with as many as you want. If you need to know how many were there before you placed the value into the numeric field, then you'll have to store that information some other way. But I really doubt that you will need it.