聽這個標題似乎很簡單，但是卻花了我不少精神才解決這個問題，
而且方法有點低級，我題供給各位參考，如果有高手有更好的方法
也請不吝告知。
form內放上imgscan 和 imgedit,imgscan的目標影像控制指定到imgedit
'這一行是KODAK建議加上
ImgScan.FileType = BMP '3
ImgScan1.ShowSelectScanner
ImgScan1.StartScan
ImgEdit1.SaveAs App.Path & "Hello.bmp", 1
Hello.bmp要應用至picture或image時就會發生錯誤，不管是在設計時加入
或是用loadpicture，我的解決方式是copy到剪貼簿後再貼到Picture上
ImgScan.FileType = BMP '3
ImgScan1.ShowSelectScanner
ImgScan1.StartScan
ImgEdit1.Display
'copy到剪貼簿
ImgEdit1.ClipboardCopy 0, 0, ImgEdit1.ImageWidth, ImgEdit1.ImageHeight
ImgEdit1.ClearDisplay
'從剪貼簿貼上
Picture1.Picture = Clipboard.GetData(bmp)
'清除剪貼簿內容
Clipboard.Clear
SavePicture Picture1.Picture, App.Path & "Hello.bmp"
這個方法的缺點是無法處理太大的圖形，速度會變很慢。
提供給大家分享