Skip to content

C
core
Kaydet (Commit) f69acf92 authored tarafından Noel Power's avatar Noel Power
Dosyalara gözat
Seçenekler

another variation of the localised Cdbl test 

Change-Id: Icf6dd7428cb88f1891c6d816a24a4126ea2cc135
üst 63dcca42
Hide whitespace changes
Inline Side-by-side
Showing with 14 additions and 0 deletions
basic/qa/basic_coverage/da-DK/cdbl-2.vb 0 → 100644
Dosyayı görüntüle @ f69acf92
Function doUnitTest() as Integer
Dim A As String
Dim B As Double
Dim Expected As Double
A = "222,222"
' in da-DK locale ',' is the decimal separator
Expected = 222.222
B = Cdbl(A)
If B <> Expected Then
doUnitTest = 0
Else
doUnitTest = 1
End If
End Function
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment