der Aufruf der Property Flat erzeugt in einer ComboBox und in einer TextBox einen syntax error. Ist in der Syntax noch ein Fehler?
- Code: Select all
sCtlName = "cmb" & iSP
sCtlType = "ComboBox"
ControlAppend(sCtlName, sCtlType, sCtlGroup, _
iOffsetX + iLabLen + iOffsetX, iPosH, iFldLen, vField[iSP,5], True)
cmb = Control(sCtlName)
cmb.FontName = sFont
cmb.FontSize = iFontSize
cmb.Flat = True
cmb.RemoveAll
cmb.Append("Ja")
cmb.Append("Nein")
/PMan