Enable JavaScript in the browser to display LibreOffice Help pages.
FindPropertyObject Function
α’αΆα
βα²ααβαααααΎαβααααα»βαα½αβαα
βαααβααα ααΆβαααΆαααΆααααααβααααβα’ααααβαα½αβαααβααααΎβαααααβααααα»Β α
α§ααΆα ααα ααΆαααβαααααΆβααΌα
βααΆαβααααα α
ααααΌαβααααΆβαα
βααΉαβααααα»αβααΆαααβαααααΆ α
Dim ObjVar as Object
Dim ObjProp as Object
ObjName As String = "MyObj"
ObjVar = FindObject( ObjName As String )
PropName As String = "Prop1"
ObjProp = FindPropertyObject( ObjVar, PropName As String )
ObjProp.Command = 5
αααβα’αα»ααααΆαβα²ααβαααααΎαββαααααβββαααβααΆαααααβαα
βαααβαααΒ α α§ααΆα ααα α
"TextEdit1" to "TextEdit5" in a loop to create five control names.
ααΎαβααβααα α ααβααααα»
ααΆαααβααααααα α
FindPropertyObject( ObjVar, PropName As String )
αααΆαααΆαααααα α
ObjVar α α’αααβααααα»βαααβα’αααβα
ααβαααααβαααβααΆαααααβαα
βαααβαααΒ α
PropName α ααααβα’ααααβαααβαααααΆααβα’αααΈβαααααβααβααααααααααααα· αααβα’αααβα
ααβαααααβαα
βαααβαααΒ α
5 ααΆαβα α
βαααααβαα·αβααααΉαααααΌα
12 α’αααβαα·αβααααΌαβααΆαβααααα
14 αααΆαααΆααααααβαα·αβααααΉαααααΌα
52 ααααα α¬βαααβα―αααΆαβαα·αβααααΉαααααΌα
57 ααα α»αβα§ααααα I/O