“Excel VBA przekonwertuje 2 krótkie liczby całkowite na długą liczbę całkowitą” Kod odpowiedzi

Excel VBA przekonwertuje 2 krótkie liczby całkowite na długą liczbę całkowitą

Public Function MakeLong&(ByVal LoWord%, ByVal HiWord%)
  MakeLong = (HiWord * &H10000) Or (LoWord And &HFFFF&)
End Function
Excel Hero

Excel vba niskie słowo z długiej liczby całkowitej

'If n is a 4-byte Long Integer, the Low (Left) Word is:
If n And &H8000& Then
  	LoWord = n Or &HFFFF0000
Else
    LoWord = n And &HFFFF&
End If

'If n is a 4-byte Long Integer, the High (Right) Word is:
HiWord = (n And &HFFFF0000) \ &H10000
Excel Hero

Odpowiedzi podobne do “Excel VBA przekonwertuje 2 krótkie liczby całkowite na długą liczbę całkowitą”

Pytania podobne do “Excel VBA przekonwertuje 2 krótkie liczby całkowite na długą liczbę całkowitą”

Więcej pokrewnych odpowiedzi na “Excel VBA przekonwertuje 2 krótkie liczby całkowite na długą liczbę całkowitą” w VBA

Przeglądaj popularne odpowiedzi na kod według języka

Przeglądaj inne języki kodu