這個(gè)方法沒(méi)問(wèn)題。
創(chuàng)新互聯(lián)提供網(wǎng)站制作、成都網(wǎng)站制作、網(wǎng)頁(yè)設(shè)計(jì),品牌網(wǎng)站設(shè)計(jì),1元廣告等致力于企業(yè)網(wǎng)站建設(shè)與公司網(wǎng)站制作,10多年的網(wǎng)站開(kāi)發(fā)和建站經(jīng)驗(yàn),助力企業(yè)信息化建設(shè),成功案例突破上1000+,是您實(shí)現(xiàn)網(wǎng)站建設(shè)的好選擇.
win8.1,我用網(wǎng)上的方法,有時(shí)也有黑屏現(xiàn)象,但多試幾次就好了。有時(shí)還會(huì)彈出要選擇攝像頭,選擇確認(rèn)、取消、應(yīng)用都是黑屏。
1.點(diǎn)擊打開(kāi)開(kāi)始菜單 - 電腦設(shè)置,打開(kāi)電腦設(shè)置窗口。如下圖所示
2.在打開(kāi)的電腦設(shè)置窗口中,點(diǎn)擊打開(kāi)“隱私”項(xiàng)進(jìn)入下一步操作。如下圖所示
3.在隱私功能界面中,找到“攝像頭”點(diǎn)擊打開(kāi)。如下圖所示
4.點(diǎn)擊將允許應(yīng)用使用我的攝像頭開(kāi)啟,關(guān)閉電腦設(shè)置窗口完成操作。如下圖所示
Private Const WS_CHILD = H40000000
Private Const WS_VISIBLE = H10000000
Private Const WM_CAP_START = H400
Private Const WM_CAP_DRIVER_CONNECT = WM_CAP_START + 10
Private Const WM_CAP_SET_SCALE = WM_CAP_START + 53
Private Const WM_CAP_SET_PREVIEWRATE = WM_CAP_START + 52
Private Const WM_CAP_SET_PREVIEW = WM_CAP_START + 50
Private Declare Function capCreateCaptureWindowA Lib "avicap32.dll" ( _
ByVal lpszWindowName As String, _
ByVal dwStyle As Long, _
ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Integer, _
ByVal hWndParent As Long, ByVal nID As Long) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
Private Sub Form_Load()
'建立采集窗口(不顯示窗口,處理后顯示到PIC控件)
uwndc = capCreateCaptureWindowA("", WS_VISIBLE Or WS_CHILD, 0, 0, 320, 240, Me.hWnd, 0)
'連接
SendMessage uwndc, WM_CAP_DRIVER_CONNECT, 0, 0
'Scale開(kāi)
SendMessage uwndc, WM_CAP_SET_SCALE, True, 0
'顯示刷新MS
SendMessage uwndc, WM_CAP_SET_PREVIEWRATE, 40, 0
'用予覽方式顯示(特殊需要,不顯示予纜)
SendMessage uwndc, WM_CAP_SET_PREVIEW, True, 0
End Sub
上述代碼就可以實(shí)現(xiàn) 但是要注意相應(yīng)的控件是否存在 不存在的 你自己畫(huà)出來(lái)
這問(wèn)題有點(diǎn)籠統(tǒng),軟糖來(lái)說(shuō)說(shuō)把:
圖像處理由System.Drawing命名空間負(fù)責(zé)。
主要是Bitmap類(lèi)和Graphics類(lèi)。
Bitmap表示一個(gè)位圖,可以是BMP,JPG,PNG等文件。
裝載位圖
Dim?位圖?As?Bitmap?=?Bitmap.FromFile("C:\Image1.PNG")
Graphics表示一張畫(huà)紙,能夠進(jìn)行繪制操作。
它可以被窗體、控件、位圖調(diào)用CreateGraphics()方法來(lái)創(chuàng)建。
然后調(diào)用Graphics.Draw開(kāi)頭的一系列函數(shù)來(lái)繪制圖像和圖形,F(xiàn)ill開(kāi)頭的填充圖形。
創(chuàng)建畫(huà)紙并繪制位圖
Dim?畫(huà)紙?As?Graphics?=?Me.CreateGraphics()
畫(huà)紙.DrawImage(位圖,?100,?100,?256,?256)
可以將上面三行放到Form1_Load中測(cè)試,把路徑改一下,
還可以把Me改為能在上面繪圖的控件的名稱(chēng)。
更多內(nèi)容請(qǐng)看MSDN的System.Drawing命名空間。
如滿(mǎn)意,請(qǐng)采納,謝謝。
網(wǎng)站欄目:vb.net照相 vb的圖片
本文URL:http://aaarwkj.com/article20/hhhcco.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供電子商務(wù)、企業(yè)建站、網(wǎng)站內(nèi)鏈、虛擬主機(jī)、網(wǎng)站策劃、面包屑導(dǎo)航
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話(huà):028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)