|
Any idea, what could be reason for the following effect.
Code developed in acc97 generates RunTime Error 2455 in Access 2000:
claiming the Name reference is wrong:
ctlLabel.Name
In the SUB:
Sub SymSizes(frm As Form, strSymbol As String, _
Optional intFontSize As Integer, Optional intFontName As String, _
Optional intFontweight As Integer)
Dim ctlLabel As Control
Set ctlLabel = CreateControl(frm.Name, acLabel, , "", _
String(10, strSymbol), _
100, 100)
If (intFontSize > 0) Then
ctlLabel.FontSize = intFontSize
ctlLabel.FontName = intFontName
ctlLabel.FontWeight = intFontweight
End If
ctlLabel.SizeToFit
intSymWi = ctlLabel.Width / 10
intSymHe = ctlLabel.Height
DeleteControl frm.Name, ctlLabel.Name
End Sub
Thanks
| 
