语句不能出现在方法体内.假定为方法末尾?

编译错误 
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 

编译器错误信息: BC30289: 语句不能出现在方法体内。假定为方法末尾。

源错误:

 

行 49: %>
行 50: <%
行 51:  Public Sub ChkLogin()
行 52:   number
行 53:   pwd
 

源文件: C:\Documents and Settings\Administrator\桌面\02\02\Default.aspx    行: 51 


请教是什么问题呢??




--------------------------------------------------------------------------------
版本信息: Microsoft .NET Framework 版本:2.0.50727.832; ASP.NET 版本:2.0.50727.832  --------------------编程问答-------------------- up --------------------编程问答-------------------- Public Sub ChkLogin() 
这个方法有问题
里面输出了字符串
或者包含一些字符串
仔细检查下 --------------------编程问答-------------------- 支持一下 --------------------编程问答--------------------     语句不能出现在方法体内。假定为方法末尾

Sub Startread(ByVal byteval As Byte)
        Dim D0 As Byte
        Dim D1 As Byte
        Dim D2 As Byte
        Dim value As Byte
        If (value = 1) Then
            SetBit(D0, 0)
            SetBit(D1, 1)
            SetBit(D2, 1)
        Else
            SetBit(D0, 1)
            SetBit(D1, 1)
            SetBit(D2, 0)
        End If

    End Sub

出现错误 

补充：.NET技术 ,  ASP.NET