ＡＣＣＥＳＳ ＶＢＡ ＴＩＦＦ形式のファイルの解像度を取得したいです。 - OKWAVE

大げさな方法。なんとか2K文字をクリア。ご参考まで。 Private Type GdiplusStartupInput GdiplusVersion As Long DebugEventCallback As Long SuppressBackgroundThread As Long SuppressExternalCodecs As Long End Type Private Declare Function GdipCreateBitmapFromFile Lib "Gdiplus" (FileName As Any, bitmap As Long) As Long Private Declare Function GdipDisposeImage Lib "Gdiplus" (ByVal Image As Long) As Long Private Declare Function