Convert string to double vb6 series#
Convert string to double vb6 windows#

Str1 = Replace(Str1, ',', '.',, , vbTextCompare)Įloc = InStrRev(Str1, 'E',, vbTextCompare) This is my code: Function GetSixDig(number As Double) As String So the number this function produces will be inserted for example in columns 11 to 16, right justified. The input on each line follows fixed position input. Now it uses a text file as input, and each line represents a card. This program provides input to a structural analysis program that originated in the 80's.

I am wondering if there is a much easier way to do this. This made the function grow much bigger than I anticipated. The double can be a large value, a small value, positive or negative or in scientific notation. This seemed like a very simple task in the beginning, but I ran in to many issues.

CodeBank - ASP / ASP.I am converting a double to a string with a fixed length (6 characters in this case).

Slow Chat with the Microsoft Visual Basic team.

Convert string to double vb6 windows#

Universal Windows Platform and Modern Windows Experience.

Quick Navigation Visual Basic 6 and Earlier Top I am highly appreciated for your 'DOUBLE to binary' codes. I used double type array to hold c#'s int array MISTAKELY, so it lead me a wrong question.

I didn't notice C# int is the same with VB's Long in Signed 32-bit length. What I need is to convert C# int to VB's binary data. If this function is not what you want, then you will have to be more specific with examples of what you expect the function to return, as I have no idea if it is not what it currently is doing.Sorry for misleading you. If this function is not what you want, then you will have to be more specific with examples of what you expect the function to return, as I have no idea if it is not what it currently is doing. This may still be unclear to you, but I don't intend to beat any more on this subject since you can get more detail on floating point representation by searching for information on the internet. Refer back to the hex double representations above of 2 and 4, to see that 3 and 5 have one additional bit set. You would see that second bit in the floating point representation, i.e. Both 3 and 5 would have a second bit set, i.e. (I'm describing the IEEE standard representation of Floating Point, which most machines use these days, but there are other representations and those may or may not have an implied '1' as the MSB of the mantissa.)Ī couple of example of integer numbers that are not powers of two. That MSB '1', will not be part of the floating point number, it is 'implied' to exist as one additional bit 'above' the most significant bit of the mantissa portion of the floating point number. Since the most significant bit of the mantissa is always 1, the 1 is not actually stored, to give an extra bit of precision in the floating point format, so you won't see that '1' in the above numbers since they are all integer powers of 2, and integer powers of two would have only 1 bit set,i.e, as an integer type, the first few powers of two in binary are: What you are seeing above is the incrementing of the exponent portion of the floating point number. would go on forever, but since you only have 64 bits, the last bit is rounded up, so the last Hex digit is A, instead of 9.Ī few examples of numbers that are powers of 2, stored in a double, and what the resulting bit pattern is, in Hex

Convert string to double vb6 series#

Since numbers such as 0.1 can't be represented exactly in Floating point (it is an infinite series of repeating binary digits), it will give a more interesting pattern than the Floating point values holding simple integer values, as above.Ġ011111110111001100110011001100110011001100110011001100110011010 I made the assumption that what your supplied function returned, a string of 32 bits represented by a string of 0's and 1's, was what you wanted for a double, of course a double is 64 bits, not 32. Which is the binary representation of a double with the value of 2. The DoubleToString simply copies the 8 bytes of a double into two Longs, and then calls your function twice, passing the Most Significant half first and concatenates the lower half to that, so you get a 64 character string of 0's and 1's, most significant bit first.įor instance, for a double value of 1.0, the 8 bytes in hex are:Ġ011111111110000000000000000000000000000000000000000000000000000 Your LongToBitString function returns a 32 character string of 0's and 1's, most significant bit first.