Оставшийся текст, по-видимому, не является частью формулы ?

---

Dim inputData As String = "www.google.com"

получение ошибки в этой строке

Dim inputData As String = "www.google.com"
    Dim ecl As String = "L"
    Dim mask As Integer = 8

   ConnectCodeClassQRCodeEncode(inputData,ecl ,mask )
    Dim x As Number
	Dim Result As String
	For x = 1 To ConnectCodeClassQRCodeNumBlocks() 
        	Result=Result + ConnectCodeClassQRCodeGetBlocks(x)		
	Next x
	formula = Result

Что я уже пробовал:

Я использовал эту строку кода в полях формул Crystal reports, но не смог ее запустить.

---