whats wrong with this code

dear all

i have created this code

dim topvalue as string="20"

  Dim oTopvalue As SAPbouiCOM.EditText
                        oTopvalue.Value = topvalue

                        oForm.Items.Item("43").Specific.value = oTopvalue.Value.Trim

but its not working so can you help me