Select the product you need help with

VarCyFromStr() Returns an Incorrect Value in Windows XP

Article ID: 321395 - View products that this article applies to.

This article was previously published under Q321395

SYMPTOMS

If you pass a value directly to a function, the function may not work. The following sample code fragment demonstrates this issue:

Private Sub Command1_Click()
Debug.Print CCur("0.28042328042328") 'Does not work
End Sub

Back to the top | Give Feedback

RESOLUTION

To resolve this problem, obtain the latest service pack for Windows XP. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:

322389

(http://support.microsoft.com/kb/322389/EN-US/ )

How to Obtain the Latest Windows XP Service Pack

The English version of this fix should have the following file attributes or later:

   Date         Time   Version      Size     File name
   ------------------------------------------------------
   05-Jun-2002  11:26  3.50.5014.0   77,824  Asycfilt.dll
   05-Jun-2002  11:17  3.50.5016.0  569,344  Oleaut32.dll
   05-Jun-2002  11:26  5.0.5014.0   106,496  Olepro32.dll

Back to the top | Give Feedback

WORKAROUND

To work around this problem, pass the value to the function through a variable. The following sample code fragment demonstrates this method:

Private Sub Command1_Click()
Dim d As Double
d = CDbl("0.28042328042328")
Debug.Print CCur(d) 'Works correctly
End Sub

Back to the top | Give Feedback

STATUS

Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article. This problem was first corrected in Windows XP Service Pack 1.

Back to the top | Give Feedback