在VB.net中如何將圖片轉換成二進制保存到Accees中

在access數(shù)據(jù)庫里將字段的類型設置為ole對象

成都創(chuàng)新互聯(lián)公司主要從事網(wǎng)站設計制作、成都網(wǎng)站建設、網(wǎng)頁設計、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務。立足成都服務北辰,十多年網(wǎng)站建設經(jīng)驗,價格優(yōu)惠、服務專業(yè),歡迎來電咨詢建站服務:028-86922220

Public img As Byte() '圖片處理用的字節(jié)數(shù)組

img=My.Computer.FileSystem.ReadAllBytes(filePath)'filePath是你圖片文件的路徑

剩下的就是數(shù)據(jù)庫插入操作了

Dim?cn?As?New?OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data?Source=Data.mdb")

Dim?comm?As?OleDb.OleDbCommand

comm?=?New?OleDb.OleDbCommand(?_

"INSERT?INTO?Photo(BuFan_F,PhotoNo,Photo)?Values('"??Me.CobBuFan.Text.Trim??"','"??Me.txtNo.Text.Trim??"',@image)",?cn)

'向數(shù)據(jù)庫添加存儲了圖片數(shù)據(jù)的二進制數(shù)組

comm.Parameters.Add("@image",?_

OleDb.OleDbType.Binary,?img.Length).Value?=?img

If?cn.State?=?ConnectionState.Closed?Then?cn.Open()?'打開數(shù)據(jù)庫連接

comm.ExecuteNonQuery()?'執(zhí)行數(shù)據(jù)庫命令

If?cn.State?=?ConnectionState.Open?Then?cn.Close()?'關閉數(shù)據(jù)庫連接

MessageBox.Show("圖片成功保存到數(shù)據(jù)庫",?"完成",?MessageBoxButtons.OK,?MessageBoxIcon.Information)

VB.net如何調(diào)用資源文件(resx)里的圖片？

放在解決方案資源管理器還沒完。進入項目屬性，資源，把解決方案資源管理器里的資源文件拖進來，改個便于調(diào)用的名稱，然后My.Resources里面就可以調(diào)用了。如果是VS可以識別的，那么就直接是Bitmap類型的，可以隱式轉換成Image類型。

VB.Net 如何用代碼為picturebox 打開一張圖片

Dim?fn?As?String?=?"D:\test.jpg"

'方法1

Me.PictureBox1.ImageLocation?=?fn

'方法2

Me.PictureBox1.Image?=?Image.FromFile(fn)

vb.net中，如何像下圖一樣，用很簡單的辦法，導入1000張圖片。

很簡單的方法，貌似沒有。這個需要自己寫很多代碼：

用一個ListView控件。

判斷滾動條當前所顯示的圖片集合，獲取它們的物理路徑。

用Bitmap.FromImage方法把這些圖片讀出來，

然后獲取縮略圖，

把縮略圖用Graphics.DrawImage()繪制出來。

我可以提供Bitmap如何獲取縮略圖的方法：

'''?summary必須創(chuàng)建一個委托并將對此委托的引用作為獲取縮略圖?callback?參數(shù)傳遞，但不使用此委托。/summary

Public?Function?ThumbnailCallback()?As?Boolean

Return?False

End?Function

'''?summary返回Image，表示圖像指定?寬?和?高?的縮略圖。/summary

Public?Function?獲取縮略圖(位圖?As?Bitmap,?寬?As?Integer,?高?As?Integer)?As?Image

Dim?myCallback?As?New?Image.GetThumbnailImageAbort(ThumbnailCallback)

Return?位圖.GetThumbnailImage(寬,?高,?myCallback,?IntPtr.Zero)

End?Function

vb.net中如何實現(xiàn)圖片切換效果？

試試這個圖片幻燈片

有12345數(shù)字一起切換

有小圖大圖一起切換

里面有教程和源碼

求大神指點vb.net 怎么以指定方式打開圖片呢?

Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button1.Click

'建立新的系統(tǒng)進程????

Dim?process?As?New?System.Diagnostics.Process()

If?RadioButton1.Checked?Then

'設置文件名，此處為圖片的真實路徑+文件名????

process.StartInfo.FileName?=?"c:\a.bmp"

'設置進程運行參數(shù)????

process.StartInfo.Arguments?=?"rundll32.exe?shimgvw.dll"

Else

process.StartInfo.FileName?=?"mspaint.exe"

process.StartInfo.Arguments?=?"c:\a.bmp"

End?If

'此項為是否使用Shell執(zhí)行程序，因系統(tǒng)默認為true，此項也可不設，但若設置必須為true????

'process.StartInfo.UseShellExecute?=?True

'此處可以更改進程所打開窗體的顯示樣式，可以不設????

'process.StartInfo.WindowStyle?=?System.Diagnostics.ProcessWindowStyle.Hidden

process.Start()

process.Close()

End?Sub