Calculation Problem

[exjames]

Hi guys,

I have some problem with the calculation.

When I press "0.01", it came out
0.0(When I press 0.0)
1(When I press 1)

What happen to my calculation?

Private Sub Command0_Click()

If (text1.Text = 0) Then
    If (Shift = True) Then
        text1.Text = "0.0"
        Shift = False
    Else
        text1.Text = "0"
    End If

Else
text1.Text = text1.Text & "0"
End If

End Sub

If u guys dont understand, it cannot have 0.01, 0.02....etc..

only 0.0
and then go back to 1.

Help!

[cheesebrother]

What's the code inside your "Command1_Click" event?

[exjames]

Here's my command 1 click

Private Sub Command1_Click()



If (text1.Text = 0) Then
    If (Shift = True) Then
        text1.Text = "0.1"
        Shift = False
    Else
        text1.Text = "1"
    End If
Else
text1.Text = text1.Text & "1"
End If

End Sub

and my decimal event

Private Sub cmdDot_Click()

Me.shiftPos

End Sub

[S!dox]

Hi,

I can't figure out what you are trying to do , so pleaze try to explain so we can help you .

Cordially

[exjames]

Hi,

I can't figure out what you are trying to do , so pleaze try to explain so we can help you .

Cordially

I am trying to output 0.01 to the textbox but it cannot. It goes up to 0.0 and when I press 1 it became 1, not 0.01

so its like
0
0.
0.0
1

You get it now?

[cheesebrother]

In your code for cmdDot_click, what on earth is "Me.shiftPos"? Is it from some library?

[exjames]

It's a way to display the dot.

What am I going to do now?

Help!

[Hack]

What is Shift and what is ShiftPos?

They must be functions/subs that you wrote.

Why don't you zip up your project and attach it so we can see the same things that you are seeing?

[lone_REBEL]

Try changing

If text1.Text = 0 Then

with

If text1.Text = "0" Then

and see if it works for you.

Also tell us if you have any code in your text1_Change() or text1_KeyPress() events.

[exjames]

Try changing

If text1.Text = 0 Then

with

If text1.Text = "0" Then

and see if it works for you.

Also tell us if you have any code in your text1_Change() or text1_KeyPress() events.

You solved my problem. You're genius. + REP!