OpenOffice.info

Funktioniert. ich wende es wie bei definition für CH1 an.

Danke

Hi
if CH2.state=1 then '(true)
if CH2.state=0 then ' (false)
if CH2.state=2 then ' (Dreifachstatus, indifferent)

Gruß R

	Dim oForm As object
	Dim CH0, CH1, CH2, CH3, CH4, CH5, keyForm As String
		connection = GetConnection()
		oForm = ThisComponent.drawpage.forms.GetByName("MainForm")
		...
	                CH1  = oForm.GetByName("CH1")
		'	CH2  = oForm.GetByName("CH2").Text	
	If CH0=True Then  	......

gleich noch ein Problem,

Möchte den wert aus einem Makierfeld auslesen. Derzeit habe ich das drinnen stehen bei Referenzwert ein =True, Referenzwert aus =False
[code]
Dim oForm As object
Dim CH0, CH1, CH2, CH3, CH4, CH5, keyForm As String
connection = GetConnection()
oForm = ThisComponent.drawpage.forms.GetByName("MainForm")
...
CH1 = oForm.GetByName("CH1")
' CH2 = oForm.GetByName("CH2").Text
If CH0=True Then ......
[/code]

egal ob Ch1 oder Ch2 beide varianten funktionieren nicht :?

Wie gehts richtig?
danke mfg