Microsoft KB Archive/137730

= PRB: Cannot Pass Parameters as Float ByVal to VB 4.0 Events =

Article ID: 137730

Article Last Modified on 11/18/2003

-

APPLIES TO


 * Microsoft Visual Basic 4.0 Standard Edition
 * Microsoft Visual Basic 4.0 Professional Edition
 * Microsoft Visual Basic 4.0 32-Bit Enterprise Edition

-



This article was previously published under Q137730



SYMPTOMS
OLE Custom Controls cannot pass parameters as Float ByVal to Visual Basic version 4.0 events.



RESOLUTION
Change the ByVal float param to a float*.



STATUS
This behavior is by design.



Sample Code in the Bind OLE Custom Control
void CBindCtrl::OnLButtonUp(UINT nFlags, CPoint point) { // TODO: Add your message handler code here and/or call default

float fHH = 100.9f ;

// Floatbug is an event in the OCX FireFloatbug(&fHH) ;

COleControl::OnLButtonUp(nFlags, point); }

Sample Code in the Bind OLE Custom Control Event in Visual Basic 4.0
Private Sub Bind1_Floatbug(fTmp As Single) MsgBox CStr(fTmp) End Sub

Additional query words: 4.00 vb4win vb432

Keywords: kbprb KB137730

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.