一个整数n（n≥11）从左向右和从右向左读其结果相同，且是素数，则称n为回文素数，例如133 020 331是回文素数．小张设计一个VB程序用于找出1000以内的所有回文素数，程序运行界面如图所示．实现上述功能的VB程序如下，但加框处代码有误，请改正．

Private Sub Command1_Click（　　）
    Dim n As Interger,j As Integer,m As Integer
     '（1）
      Do While n＜1000'判断是否为素数
          m=Int（Sqr（n））
           For j=2  To m
               If  n  Mod j=0 Then Exit For
            Next  j
             If  j＞m  Then
                  If  hws（n）=Ture Then
                       List 1．AddItemStr（n）
                   EndIf
               EndIf
                n=n+2
      Loop
End   Sub
Function  hws（n  As  Integer）As　Boolean'判断所给n是不是回文数
     Dim　j,k　As　Integer 
     Dim　m　As  String
     Dim　a　As　Integer,b　As　Integer  
      hws=True
      m=Str（n）
      k=Len（m）
      For j=1 To  k\2
           a=Val（Mid（m,j,l）
           b='（2）
            If  a＜＞b  Then
                 hws=False
                  Exit  For 
            EndIf
       Next j
End  Function.