VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >
  • vb.net 教程 5-7 Bitmap类 3 获得图片信息Exif 1

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
 
有些照片保存了拍摄时使用的的相机品牌、型号以及GPS、光圈、快门、白平衡、ISO、焦距、日期时间等信息,通常称为Exif信息,保存在Jpg文件头部,使用Bitmap类的PropertyItems属性很容易获得这些信息。
 
PropertyItems是PropertyItem对象数组,这些对象分别对应于此图像中存储的每个属性项。
PropertyItem有4个属性:
Id:某个图像信息的 ID。
Value:某个图像信息的值。
Len:Value 属性的长度(以字节为单位)。
Type:整数,它定义了Value 属性包含的数据类型。具体的数据类型如下(来自MSDN):
        
 
       我在查看其它资料的时候,发现除了MSDN指出的外,还有:
 
                    8  'SSHORT
                    9  'SLONG
                    11 'FLOAT
                    12 'DOUBLE
 
       但我暂时还没有遇到过。
 
 
 
 
 
 
 
了解了以上知识,下面看看具体使用的代码。
 
设计时窗体:
 
 
当按钮按下时候:
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim ofd As New OpenFileDialog()
        ofd.Filter = "JPG文件|*.jpg"
        ofd.FileName = ""
        If ofd.ShowDialog() <> DialogResult.OK Then
            Exit Sub
        End If
 
        Dim filename As String
        filename = ofd.FileName
 
        Label1.Text = filename
        TextBox1.Text = getPicInfo(filename)
    End Sub
getPicInfo的代码:
 
    Private Function getPicInfo(ByVal picFullPath As String) As String
        Dim bmp As New Bitmap(picFullPath)
        Dim strPro As String = ""
        For Each pro As Imaging.PropertyItem In bmp.PropertyItems
            Dim strTmp As String = ""
            Select Case pro.Type
                Case 2  '空终止 ASCII 字符串
                    strTmp = System.Text.Encoding.ASCII.GetString(pro.Value).Replace(Chr(0), "")
                Case Else
                    strTmp = "长度:" & pro.Len
            End Select
            strPro &= pro.Id.ToString & "----" & pro.Len & "----" & pro.Type & "----" & strTmp & ControlChars.CrLf
        Next
        Return strPro
    End Function
 
 
运行情况:
 
 
顺便附上使用的样本图片:
 
 
 
 
 
 
 
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
 
学习更多vb.net知识,请参看vb.net 教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/uruseibest/article/details/79511381

相关教程