I really don't know why you are having to declare the DocumentProperty variable. Are you sure that this doesn't work:

ThisDocument.CustomDocumentProperties("Inskrivning_fastighetsbeteckning").V alue = TextBox1.Value