VBプログラマ質問スレ(6.0以前) Part34
レス数が950を超えています。1000を超えると書き込みができなくなります。
0981デフォルトの名無しさん
NGNG>>975は論外として、VBの機能だけでやるとしたらこんな感じか？
If B(0) And &H80 = 0 Then
I = B(0) * 256 + B(1)
Else
I = ((B(0) And &H7F) * 256 + B(1)) Or &H8000
End If
レス数が950を超えています。1000を超えると書き込みができなくなります。