[Windows Mobile] 调用摄像头的代码

最新推荐文章于 2010-09-21 09:52:00 发布

subzero

最新推荐文章于 2010-09-21 09:52:00 发布

阅读量750

点赞数

分类专栏： Visual Basic.Net 文章标签： windows mobile exception

本文链接：https://blog.csdn.net/subzero/article/details/2449131

版权

Visual Basic.Net 专栏收录该内容

1 篇文章 0 订阅

订阅专栏

只有代码

        Try
            Dim ccd As CameraCaptureDialog
            ccd = New CameraCaptureDialog
            ccd.Title = "Capture Demo"
            ccd.Mode = CameraCaptureMode.Still
            ccd.Owner = Me
            ccd.Resolution = New Size(640, 480)
            ccd.StillQuality = CameraCaptureStillQuality.High
            ccd.InitialDirectory = "/My Documents"
            If ccd.ShowDialog() = Windows.Forms.DialogResult.OK And ccd.FileName <> "" Then
                picCapture.Image = New Bitmap(ccd.FileName)
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try