|
|
|
| Интересное дело
создал переменную
Public GLB_PRICE As Currency
|
получаю из поля введённые данные
45
Private Sub IN_PRICE_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
If NZVB(Me!IN_PRICE) <> "" Then
Me!IN_PRICE = Format(Me!IN_PRICE, "#,##,0.00")
GLB_PRICE = Me!IN_PRICE
Unload FRM_IN_PRICE
End If
|
смотрю чему равна переменная
хотя Me!IN_PRICE = Format(Me!IN_PRICE, "#,##,0.00") = 45.00
не помогает даже GLB_PRICE = CDec(Me!IN_PRICE)
и CCur(Me!IN_PRICE)
а как жа тада быть с копейками....... | |
|
| |
|
|
|
| GLB_PRICE = CCur(Val(Me!IN_PRICE))
GLB_PRICE = CDec(Val(Me!IN_PRICE))
GLB_PRICE = CDec(GLB_PRICE)
GLB_PRICE = CCur(GLB_PRICE
никто не помогает..... | |
|
| |
|
|
|
| Форматировать там, где показываешь, а не при передаче значения в переменную. | |
|
| |
|
|
|
| а при подсчётах ...?
ну там умножить на количество.....? | |
|
| |
|
|
|
| А в каком виде хранить??? | |
|
| |
|
|
|
| >смотрю чему равна переменная
А чему же она должна быть равна?
Не путайте тип данных и формат.
Currency values and numeric data used in mathematical calculations involving data with one to four decimal places. Accurate to 15 digits on the left side of the decimal separator and to 4 digits on the right side. | |
|
| |
|
|
|
| Поле формы тоже должно иметь формат Currency!
Число десятичных знаков для цены д. быть 2. | |
|
| |
|