0

我正在尝试将图片粘贴到应用程序中并立即从位图转换为 jpeg。我之前让它工作过,但是对于将要使用该应用程序的某些计算机,Microsoft Image Acquisition dll 是不可能的。我找到了修改它的代码来做到这一点:

If Clipboard.GetFormat(vbCFMetafile) or Clipboard.GetFormat(vbCFBitmap) Then strFileName = Format(Now, "ddhhmmss")

    If Clipboard.GetFormat(vbCFMetafile) Then
        SavePicture Clipboard.GetData(vbCFMetafile), strTemp & "\" & strFileName & ".bmp"
    Else
        Dim bm As Bitmap
        bm = Clipboard.GetData(vbCFBitmap)
        bm.Save strTemp & "\" & strFileName & ".jpg", System.Drawing.Imaging.ImageFormat.Jpg

    End If
    'UPLOAD to the DB

End If

但是,当我运行该应用程序时,它说变量未在“System.Drawing.Imaging.ImageFormat.Jpg 上定义,我尝试了 Imaging.ImageFormat.Jpg 和 Drawing.Imaging.ImageFormat.Jpg 的不同组合无济于事。我已经添加在 Project -> References "System.Drawing.dll" 下,但我不知道在这种情况下我是否必须导入它或在其他地方定义它。

有谁知道我怎样才能让这段代码工作,或者更好的方式让我进行这种转换?

4

0 回答 0