none
請問vb.net是否可以將某個擷取的圖形,存檔到excel的欄位中? RRS feed

  • 問題

  •  

    Private Sub 儲存SToolStripButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 儲存SToolStripButton.Click

            '儲存客戶資料
            If TextBox3.Text <> "" Then
                ChDir("C:\客戶資料") '資料夾路徑
                If Directory.Exists(TextBox3.Text) = False Then
                    MkDir(TextBox3.Text) '建立資料夾。TextBox3.Text是客戶姓名
                Else
                    MsgBox("檔案已存在,請更改姓名")
                    TextBox3.Focus()
                    Exit Sub
                End If
                'MkDir(TextBox3.Text) '建立資料夾。TextBox3.Text是客戶姓名
                Dim newExcel As New Microsoft.Office.Interop.Excel.Application
                With newExcel
                    '.Visible = True                          '若你想看到讀取、寫入的過程就加這行
                    .Workbooks.Open(Filename:="C:\Documents and Settings\Jobar\桌面\f-scan 眾家合作版Part1\客戶資料\存檔格式.xlsx") '讀取(開啟)C糟下的Book1檔案(須先有檔案)
                    '.Workbooks.Add()                         '若不是開啟現有檔案,可加這行新增
                    .Cells(2, 1) = TextBox3.Text                        '在A2寫入客戶姓名
                    .Cells(2, 2) = TextBox5.Text                        '在B2寫入電子郵件
                    .Cells(2, 4) = TextBox6.Text                        '在D2寫入出生日期
                    .Cells(2, 5) = ComboBox1.Text                       '在E2寫入職業類別

                    .Cells(5, 1) = PictureBox1.Image                    '在A5的照片

    -------------------------------------------------------------------------------------------------------------------------------------
    上面是我寫的程式部分

     

    可是在開啟EXCEL的時候 欄位A5 不會顯示擷取的圖片,反而是顯示字串 System.Drawing.Bitmap

    請問高手們如何解決?  謝謝
                  

     

    2007年12月17日 下午 12:21

解答

所有回覆