[求助]新手写ACTIVEX出错！

Question

原代码：
Option Explicit
Private ttian As String
Private i As Integer
Public Function doit(aa As String) As String
ttian = ""
For i = 0 To 9
    ttian = ttian & aa
Next
doit = ttian
End FunctionASP文件中的调用代码：
<%
set hitt=server.createobject("exa4.hinavy4")
c=hitt.doit("hello WORLD!<br>")
response.write c
%>出错提示：Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp，行242 Microsoft VBScript 运行时错误 错误 '800a01b6' 对象不支持此属性或方法: 'hitt.doit' /dlltest/hinavy.asp，行12 请大家帮我看看，这是什么问题啊？

Answer 1

是啊，我就是觉得没问题才奇怪啊，晕，我执行所有FUNCTION好像都这样，传进去的值要不就是没有了，要不就是不能调用方法或属性，真晕是不是VB还要配置什么啊？