Ajuda com código VB 6.0

Pessoal vcs podem me ajudar a converter este código para java.


Public Declare Function ICU_Mifare_GetCardNo Lib "ICUAPI215" (ByVal hICR As Long, _
						  ByRef cardNo As ICUCardNo) As Long

Public Type ICUCardNo
    Data(0 To 3) As Byte
End Type

E no click de um botão é chamado esta função;


    Dim ret As Long
    Dim card As ICUCardNo

    ret = ICU_Mifare_GetCardNo(hICR, card)
    If ret <> ICU_SUCCESS Then Err.Raise vbObjectError + 1, , Hex(ret)
    lblCardNo.Caption = ByteArrayToHex(card.Data)

Detalhe essa “ICUAPI215” é uma dll que no java estou chamando atráves de JNA.

Pessoal agradeço qualquer ajuda.

JNA ou JNI?

JNA.
http://www.urubatan.com.br/chamando-metodos-nativos-dllso-em-java-sem-jni

Pelo que eu entendi, eu tenho que criar uma classe, aonde eu passaria a instância dela como parâmetro e seria preenchido os valores, mas será que isso é possível utilizando JNA ou JNI ?

Alguém já fez isso ? ou sabe se é possível ? :cry:

Talvez eu possa passar meu objeto serializado, mas eu teria que mexer na dll … Esta certo ?

[quote=zezinho]Alguém já fez isso ? ou sabe se é possível ? :cry:

Talvez eu possa passar meu objeto serializado, mas eu teria que mexer na dll … Esta certo ?[/quote]

Será que é impossível mudar este código VB para Java?