Exponential Value (scientific Notation)
I'm trying to do digit counting in vb. I convert all my input numbers to single so that it retains the decimal points. I then convert the single to string type. This algorithm works great until at some point VB decided to drop the decimal points and use scientific notation. My question is how big of a number can VB retain before it converts it to exponential value. Moreover, is there a way to force VB to convert a number into scientific notation?
150 --> 1.5e+2
Any help would be appreciated.
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Is it possible to prevent visual basic (v.6.0) from automatically converting large numbers to scientific notation?
Just for curiosity sake might come in handy one day how would get this
Dim Number1 as double
Number1 = 100000 ^ 10000000
Label1.caption = number1
To show up in a format not in scientific notation but rather show most or all the #'s?
Does anyone know how to stop VB from transforming your long number into a scientifically notated one?
Dim myBigNumber As Long: myBigNumber = 1024551063141712
When I type that in it changes it to 1.02455106314171E+15 and then throughs and error. "Runtime Error 6, overflow"
First off, I need it to stop notating the number. If it does that then it is rounding some of the numbers and I can't let it do that.
Fixing the first should fix the second so I don't think the RunTime error is a problem.
How to fix this:
Label1.Caption = CDbl(3 / 180)
'result is 1.66666666666667E-02
'how do i make it to be 0.01666666666666667
'without the scientific notation E
How can I conver from +7.38610000E+01 and 00000000.019 to +7.386 and 0.019 ??? Is there a function i VB or do I have to write my own?
How To Disable Scientific Notation?
I'd like to make a text box display a small number (e.g. 0.012345) after a calculation, but instead VB6 automatically converts it into scientific notation (i.e. 1.2345e-2). How can I stop this treatment or change that back to 0.012345? After all I don't want scientific notation to be displayed there.
IsNumeric And Scientific Notation
Hi. I've got a problem regarding IsNumeric and scientific notation. I found out that IsNumeric will actually return True for an expression formatted in scientific notation. For example, IsNumeric(123E456) or IsNumeric (112D91) will return True. The first example is actually considered as a Single data type and the second is considered as a Double. I think VB6 performs some sort of conversion on the expression, although technically it is a string expression because of the "E" and "D" contained within it.
Is there a way to force IsNumeric to accept the example as a pure string expression so that it returns False? Thanks.
Eliminate Scientific Notation
I need to display the Double value 1.800000000000000123E+18 as the whole number 1800000000000000123 without the scientific notation. Does VB6 have anything that'll do this, or do I need to write my own?
No Scientific Notation For Large Numbers
Is there a way to stop VB displaying large numbers in scientific notation (eg 1.2322343242E+15)?
I've got the caption of a label set to a value in an excel sheet which happens to be a 16 digit number.
How do i force it to show the full number normally?
Random Numbers And Scientific Notation
Hey all, another quirk that creates a problem for me . . . seeding random numbers.
Here's a bit of example code:
iSeed = "11111111111111111111111111"
The problem is, Randomize rounds off iSeed to 1.111111E+25, so that
would do exactly the same as
Randomize (iSeed + 1)
Any way to fix or get around this?
Another thing (pales in importance to the above though), I've noticed that VB's semi-random numbers generated by Rnd -1 and Randomize iSeed repeat after about 12,287,057. This means that there will be only that many different seeds Is this a limitation of VB (probably), is there a way around it?
Floating Point Scientific Notation
I'm designing a function shich returns a floating point value "single". how can I forca Visualbasic to print it normally without converting to the scientific notation.
Formatting Scientific Notation Numbers
I have a couple of text box controls which can accommodate numbers up to 15 digits in size. When large numbers are entered into these fields and the data is saved, the numbers are displayed in scientific notation when the record is displayed at a later date. Is there an easy way to have the data display in normal format when populating the text boxes? I have tried setting the DataFormat property for the text box to use the Number format, but it doesn't seem to have any effect.
Any help would be appreciated.
Prevent Conversion To Scientific Notation
I have function that excepts a double as the passed in parameter.
When I call this procedure and pass in a number great that 14 digits, the number is rounded and set in scientific notation. Ex:
Set rtn_Value = FunctionA(10000000002162501)
After moving the cursor to the next line, my call changes to
Set rtn_Value = FunctionA(1.00000000021625E+16)
Is there a way to stop this rounding and conversion from taking place? I'm dealing with numbers typically E20 in length.
[Solved] UPDATE And Scientific Notation
VB and MS Access here.
Ok I have a Update sequence that was failing sometimes and I've found out what the problem is but dunno how to solve it.
The Update statement updates a numeric field in the DB, problem is that with high values VB formats them as 2,324173E+07 f. ex. and the "UPDATE Table1 SET field1=2.324173E+07" sentence I send to execute obviously fails. (Field in DB is Single Type so that's not the problem)
Should I format the number before adding it to the UPDATE statement or are there simpler solutions?
Ty guys in advance
Edited by - jpp1jpp1 on 7/26/2005 7:21:22 AM
MSChart Y-Axis Values In Scientific Notation
I'm developing a program for water systems that allows them to graph their water production and usage. However, once the y-axis value in MSChart reaches 1million it turns to scientific notation.
Does anyone have any work arounds for this? Any help would be appreciated!
RESOLVED : Display A Number Without Scientific Notation
I have some numbers that I'm tracking through code and after running some formula's, I display the results to the user in a checkbox. Because these values can get large, I'm using a data type of Single for the variable. However, when I goto display the value in the textbox, it formats it to scientific notation. Is there anyway to avoid this. Its probably something simple but I cant figure it out.
Thanks for your help.
"If at first you don't succeed, try, try again. Then quit. No use being a damn fool about it." --W.C. Fields
Edited by - bruha on 1/18/2006 6:56:44 AM
I am taking my 1st course involving VB & am utterly clueless.
while writting a program that outputs the product of exponential equations, I receive overflow errors at higher values. What do I dim my variables as to prevent this?
Also, my code looks pathetic, I have been told there are programs to help tidy the code, but have been entirely unsuccesfull in locating any of them.
Any help w/ either of these scenarios is greatly appreciated.
I have a program that retrieves values from an excel spread sheet. My problem is when I get the values from my recordset 'myValue = oRS.Fields(i).value', I need to know how to get the actual value! In this case, Excel shows 8383838383838383, but my variable (which is a string) obtains 8.38383838383838E+15. Any ideas how I can fix this? Thanks
Exponential Problem (I Think)
I am using this equasion in my program and it is giving me an error if the value of Y is less than the value of Best_H0
X = Best_A * (Y - Best_H0) ^ Best_B
Best_A = 22.16
Best_B = 2.842
Best_H0 = 1.00816
Does anyone have any ideas on how to get around this???
Got a problem in my loop and I'm not certain how to code it.
I am not supposed to use x ^ y and I have to use multiplication in a loop to
Here's what I have...
If rdoExp.Checked = True Then
If num2 = 0 Then
lblResult2.Text = "Cannot Raise to the power of Zero!"
Dim x As Integer
Dim old_ans As Double
' Loop the Multiplication x Times
If Val(txtNum2.Text) = 2 Then
lblResult2.Text = Str(num1) + " ^" + Str(num2) + " =" + Str(num1 *
For x = 1 To num2
result = (result * num2) + old_ans
'Dump The Result into the Result Area of the Form
lblResult2.Text = Str(num1) + " ^" + Str(num2) + " =" + Str(result)
'Reset result amount
result = 0
old_ans = 0
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.576 / Virus Database: 365 - Release Date: 1/30/2004
.Find For The Exponential Number
I am trying to work with the cell containing the minimum value from a range. I have the code working fine except for when I try to deal with transendental numbers (such as pi), which it cant register exactly (Stupid floating points!)
I've got a way around it with the code below, but just wondering if someone can astound me yet again with a better method!
'Other Code Here
MinNum = Application.WorksheetFunction.Min(rngUse)
Set rngMin = rngUse.Find(what:=MinNum, lookat:=xlWhole)
If rngMin Is Nothing Then
Set rngMin = ClosestCell(MinNum, rngUse)
'Other Code Here
Function ClosestCell(MinNum As Double, rngTot As Range) As Range
Dim rng As Range
Dim Min As Double
Dim Diff As Double
Min = 1
For Each rng In rngTot
Diff = Abs(rng.Value - MinNum)
If Diff < Min Then
Min = Diff
Set ClosestCell = rng
Any help greatly appreciated!
Number To String Without Exponential
I'm trying to display very small numbers on screen wihout using the exponential form (1x10e-7 etc) Unfortunatly as it converts the number to a string it converts the exponential format with it
Dim longTime as Long
Dim strTime as String
longTime = 0.001
strTime = Str$(longTime)
The messagebox will display '1x10e-3' instead of '0.001' which I want
Any ideas how I can get around this? I can write a messy function to convert the string I get into the string I want, but I'm sure there is a more elegant solution out there!
How To Draw Exponential Gradient Between Two Colours ?
I would like to draw an exponential (as opposed to linear)
gradient between two colours, on a form or picturebox.
I tried adapting the line-drawing code given at
But couldn't achieve the result. Any suggestions on how to
do it ?
(new Angle) MsChart Y Axis Exponential Problem
A recent post and a few past ones have try to find a way to over come the MsChart control where once the Y axis is 1,000,000 or more it reverts to an exponential i.e 1,000,000 becomes 1e+006.
This is an annoying problem when your users are not scientifically minded.
In most cases you would want MsChart to automatically assign the minimum and maximum value ranges of the chart.
Is it possible to loop through the auto assigned Y Axis values and force changes were required.
All the best
Values In Y-axis R Shown In Exponential If It Exceeds 10,00,000
I am using chartype graph as "tchcharttype2darea"
on my x-axis i have dates and ob Y-axis i have amount.
i am using "ChartData" to plot my graph.
My graph is working fine if amount on y-axis is less than 10,00,000 if it exceed million mschart automatically converts it to exponential format.
I don't want my values to be in expnential format, if its million i want it to be shown in million. Pls help.
Write To File; Number In Exponential Format
What format mask will write a number in exponential format?
For example if dblNumber is 23.4432E+34
sStringToFile = format(dblNumber, "??????")
Thanks in advance for any help.
Reading Cartesian Coordinates In Exponential Form....
Here i am again, with a different problem this time. Any input would be highly appreciated... Please bear with me, first time with visual basic...
Ok my problem is thus, I have to read a STEP file (which is a data exchange format in CAD) and make sense of it all.
The problem I am facing is like thus... the file has the following format
Now somehow I have to make the program understand that 0.E0 and etc stands for 0 x 10 power 0, or 0 or -1.E0 standing for
-1x10^0 or 1.E2 standing for 100 ie 1x10^2. Is there a way to do this? I am stymied again, my knowledge of VB is really nto that deep at all... I would appreciate any feedback on how it can be done...
What is the syntax for NumberFormat property to make the column have "Scientific" format?
Thanks a lot!
Does anyone have any examples of a scientific calculator. I don't have any specific questions yet, but if anyone has made one before, I would like an example to get some ideas and a good starting point. Thanks!
What is the correct format for scientific notation
X = Format(X, "scientific" ) does not do it
X = Format(X, scientific )
Can I Don't Want To Use Scientific Number?
I would like to use a number which is more than 30 digits, but VB gives me scientific number, so it make me can't get the exactly calculation which I expected. So , it that any ways for me to skip this scientific numbers?
I am looking for a library or a class in which some scientifical function such as derived and integral, properties would be implemented.
Not Scientific Format
I have a variable of double type. I would like to display its contents in regular format, let's say its value is presented by 20 digits, so I would like to display it (in message box, text box) as 12345678900987654321 rather than as 1.23456789001236E+18. How can I do that?
Big Oh Notation
Sorry if this is in the wrong section. You guys don't have a general Computer Science forum, and since this has some VB code, I thought this would be a good place to put it
I have the following VB code:
For k = 1 To 4*n Step 2
iSum = iSum +1
For i = 1 To 2*n
For j = 1 To 3*n Step 3
iSum = iSum +1
iSum = iSum + 1
For m = 1 To 2*n
iSum = iSum + 1
iSum = iSum + 1
What is the complexity of this code in terms of Big Oh notation? I'm getting confused on what to look at. Is the notation going to be:
Campbell Scientific CR10
I need to establish a connection with a CR10 datalogger. Does anyone ever attempt to do a similar thing.
I'am able to connect with the datalogger, but 25 seconds or so arfter the connection the link breaks. There's probably a connection timeout on the datalogger.
Any ideas on the subject are welcome
Array For A Scientific Problem-Help Please !
I am a newbie and writing a simulation programme for a scientif problem. The simulation generates number of data versus time. If time is X then Y1,Y2,Y3,Y4 is generated.I do around 3000 iteration(but sometime more..a dynamic array?). For each iteration I wanna store the generated data and at the end of the calculations I would like to access X-Y1, X-Y2 ...so on.. pairs for graphical display.(or X versus Y1,Y2,Y3,Y4). So the question is how can I keep/save all the calculated values without writing to a file ? Can I keep them in the memory ? What is the easiest way to do this? Sorry if this is a simple question.
(I am using VB 6.0)
Thank you very much,
Scientific Caculator Chars To Hex
ok i know im getting old now when i forget the basics :-(
I want to convert special chars to hex
useing the caculator.. but i forget how to do it.
can some one walk me thru the steps real quick.
i used to do this all the time.. i cannot belive i forget how to do it now.
I want to teach my son , so he doesnt have to rely on a chart that may or may not be avialble when he needs it. ( like his dad obviously does now :/ )
thnx guys -n- gals
Reading In Scientific Numbers
What would be the best way to get a scientific number that is currently a string read into a variable that can be used as a number?
Scientific Number Format
i have the follwing subroutine which formats a number into a scientific format:
Public Function Sci(number, DP) As String
Sci = Left$(Trim(Str(number)), 1) & "." & Mid$(Replace(Trim(Str(number)), ".", ""), 2, DP) & " E" & Str(InStr(1, Trim(Str(number)), ".") - 2)
However the ouput is 8.6100 E 5
i would like it to appear as 8.6100E+05
how do i do this, and ideas??? Also i thought that i could set the number format property of a text box to how i desire, as i tried to set the scientific number format here, but this did not appear to work!
Please help !!!
Very Basic VB-notation
This is my problem:
I want to create a form in Access with a combo-box that looks up values in a table. When I select a value in that combo-box, I want some text boxes to show some values from the table discussed above as well as corresponding values from another table. The value in the combo-box can be found in both the tables.
For example, if I select a product called XX in the combobox, then I want to see the product's releasedates from the table#2 as well as how much hours are put into the product from table#1 for that specific product.
How do I write the code?
Date Notation In Vba D-mm-yy
Private Sub CommandButton5_Click()
mydate = Date
klantexport = klantnaam.Value
gemeenteexport = Gemeente.Value
waarnaartoe = "c:PotierOffertes" & klantexport & ", " & gemeenteexport & " " & mydate & ".xls"
ActiveWorkbook.SaveAs Filename:=waarnaartoe, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
I would like to save everything made by vba as name, city date.xls
little problem: date is now 18/08/03 (so excel thinks it's a path)
it should be 18-08-03
Can it be done and how???
In VB you specify a hexadecimal number with the prefix "&H" and upper case letters for the digits above 9, so "&H15A8" for example.
What then are the numbers that I see specified in the form "0x12be3"? Is this simply a different notation style for hexadecimal numbers? Couldn't find the answer in the help files.
 Enum Notation
What does the square bracket [...] notation mean?
Private Enum Things [Thing] = 0 AnotherThing = 5
I've only seen it in enums.
Format To Notation
How can I format a number INTO notation?
I am working with very small numbers like 0.0000013
It would be a lot easier to be able to use natation, 1.3E-6.
Is there such a function? Can the format function do this somehow?
What am I doing wrong? This condition doesn't evaluate to true.
If Now >= #9:30:00 AM# And Now <= #4:00:00 PM# Then
If I change "Now" to "Time" it doesn't make a difference.
Postfix Notation Anyone
does any one know about Postfix Notation and how it can be made into a vb program for like adding numbers and subtracting, multipling, dividing etc...