调用动态连接库，这样写对吗？请大侠帮忙看看！

Question

我这里有个API，接口文档中是这样定义其中的一个函数的：
 int enter_station(char* sn,char* station)方法一：
  VB中声明：
        Declare Function enter_station Lib "ateonline.dll" (ByVal sn As String, ByVal station As String) As Long  调用：
        Dim sn As String * 50
        Dim station As String * 50
        sn = "111111111"
        station = "22222222222"
        Text1.Text = enter_station(sn, station)方法二：
  VB中声明：
        Declare Function enter_station Lib "ateonline.dll" (ByVal sn As Long, ByVal station As Long) As Long  调用过程：
     Function EnterStation(sn As String, station As String) As Integer
          EnterStation = ConvertLongToInt(enter_station(StrPtr(sn), StrPtr(station)))
     End Function     
        Dim sn As String * 50
        Dim station As String * 50
        sn = "111111111"
        station = "22222222222"
        Text1.Text = EnterStation (sn, station)