Ragazzi ho un problema di traduzione di una classe dalla quale tiro fuori una dll
questa dll è usata da un programmino, con la dll creata da vb funzia da vb.net no. e la cosa mi sembra assurda.
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "SerialCheck"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Public Function GetDllVersion() As Integer
GetDllVersion = 1
End Function
Public Function GetSerialOK(Wnd As Long, Serial As String, User As String, Company As String) As Integer
If (Serial = "1234") Then
GetSerialOK = 1
Else
GetSerialOK = 0
End If
End Function
Questa è il codice vb, la classe è banale e la traduco senza problemi ma non funziona, quindi ho il dubbio sul codice in testa
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "SerialCheck"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Non ho idea del significato e di come possa tradurlo in vb.net soprattutto gli attribute
Grazie a chi mi risponderà
