有關下拉選單(Combobox)以及資料庫圖片顯示問題 15

Question

各位大大安!
小弟有兩個問題想請教~
一、
下拉式選單選取後如何連結另一個vb程式呢？就像ie瀏覽器那樣。
小弟的問題是我在程式a裡面做了一個下拉式選單（combobox)，裡面有兩個選項。
要如何才能讓我點取選項之後，可以連結並開啟我的做的另一個程式ｂ？

二、
小弟目前是做資料庫連結的程式。想要直接在vb主程式上面直接秀出圖片。
目前我在access裡面有做一個產品簡介，其中包含產品圖片。
我用了image紐或是picturebox紐連結到access後，
會發生”顯示的圖片不正確”的警告。
現在用OLE的方法來做，不會發生錯誤，但是圖片卻不行直接顯示出來。
就像這樣 http://web.thu.edu.tw/s913367/www/error.jpg
要如何設定才可以讓圖片直接顯示出來呢?

麻煩各位大大了~謝謝您^^

Answer 1

(1)
Private Sub Combo1_Click()
If Combo1.Text = "A" Then
Shell "C:\A.exe", vbNormalFocus
Else
Shell "C:\B.exe", vbNormalFocus
End If
End Sub
(2)
會發生”顯示的圖片不正確”的原因應該是您直接以Access去儲存圖片,而不是以將圖片轉成2進制資料再儲存吧?建議您用以下方法儲存應該就能在image或是Picturebox秀圖了.

Private Sub Command1_Click()
Data1.Recordset.AddNew
Image1.Picture = LoadPicture("C:\Test.bmp")
Data1.Recordset.Update
End Sub

Answer 2

最近發現一家很不錯的a片專賣店唷,

網址先貼給你 http://xor.tw/4z9kn

它出的新片速度很快喔~每個禮拜都有很多新片

新片價格一片是30元而已,我看過還很清晰的,

有瑕疵片可以跟客服反應,他們會協助處理唷

如果你要畫質更好的,也有藍光dvd,超*的

不知道怎麼挑片的話,也有站長推薦的精選套餐

http://xor.tw/4nqjk

自己買很多了才推薦給你唷!!看看吧


#@#

推薦你這間線上A片即時觀看喔!!

A片種類超多的,我常去光顧呢
保證你不會後悔的啦~
號稱業界最強,怎麼可以錯過呢
30點現上儲值可以馬上觀看,省去等宅配時間

http://xor.tw/4nz0x

Answer 3

最近發現一家很不錯的a片專賣店唷,

網址先貼給你 http://xor.tw/4nz0h

它出的新片速度很快喔~每個禮拜都有很多新片

新片價格一片是30元而已,我看過還很清晰的,

有瑕疵片可以跟客服反應,他們會協助處理唷

如果你要畫質更好的,也有藍光dvd,超*的

不知道怎麼挑片的話,也有站長推薦的精選套餐

http://xor.tw/4nqjk

自己買很多了才推薦給你唷!!看看吧


#@#

推薦你這間線上A片即時觀看喔!!

A片種類超多的,我常去光顧呢
保證你不會後悔的啦~
號稱業界最強,怎麼可以錯過呢
30點現上儲值可以馬上觀看,省去等宅配時間

http://xor.tw/4nz0i