Sorry, repaired macro added
"Heikki Tuhkanen" <[email protected]>
| Newsgroups | gmane.comp.openoffice.dba.user |
|---|---|
| Message-ID | <[email protected]> |
Sub d100
Dim vField, vForm as object
vForm = DataBaseForm.getByName("Character")
'Form is open and there is textfield named txtSex which is aiming to
tablecolumn 'Sex'
vField = vForm.getByName("txtSex")
Randomize
iVar = Int((100*Rnd)+1)
' number from 1 to 100
vField.value = iVar
'I'm trying to add value to field and to table without success:)