استخدام المؤشرات مش سهلة فى VB وانا بستخدمها فى برمجة ActiveX - DLL
شوف المثال التالى
Dim strAnyString As String
Dim strPass() As Byte
Dim lRet As Long
" strAnyString =" String as argument
strPass = strAnyString
((lRet = ApiFunction(strPass(0
أو
Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _
Destination As Any, Source As Any, ByVal Length As Long)
Dim l_iNumber1 As Integer, l_iNumber2 As Integer
Randomize Timer
l_iNumber1 = Int(Rnd * 1000)
l_iNumber2 = Int(Rnd * 1000)
CopyMemory l_iNumber2, l_iNumber1, 2&
أو
Address = VarPtr(l_lMyLong)
ممكن يفيدك لكن انا مقدرش اديك الكود - متأسف