2013-07-29 24 views

回答

1

創建類庫 轉到文件菜單 - >新建 - >項目。 選擇項目類型「Visual Basic」和模板「類庫」。 將項目名稱命名爲「EmailValidation」,然後單擊確定。

Public Class Class1 

    Public Function email(ByVal str As String) As Boolean 
     Dim str1 As String 
     str1 = str 
     If InStr(str1, "@") > 0 Then 
      If InStr(str1, ".") > 0 Then 
       Return True 
      Else 
       Return False 
      End If 
     Else 
      Return False 
     End If 
    End Function 

End Class 

選擇Build - > Build Solution或按ctrl + shift + B.創建dll文件