Сохранить картинки из файла презентации - Visual Basic .NET

  1. Всем привет!!! Необходимо сохранить все картинки из файла презентации в какую-нибудь папку. Кто-нибудь такое делал??? Подскажите с кодом плиз!!! Спасибо заранее!!!


textual

Код к задаче: «Сохранить картинки из файла презентации - Visual Basic .NET»

pPrs.SaveAs("c:\06\45", PowerPoint.PpSaveAsFileType.ppSaveAsBMP)

СДЕЛАЙТЕ РЕПОСТ

8   голосов, оценка 4.000 из 5



Похожие ответы
  1. НА форме listview и кнопка. listview состоит из 2х столбцов как сохранить данные в текстовое поле из listview с разделителем | между ячейками? заранее спасибо!

  1. Элемент управления PicterBox как задать программно сохранение картинки с параметрами яркость, контрастность и другие характеристики при редактировании изображения? Спасибо.

  1. Всем доброго времени суток! Не знаю, как решить проблему. На форме Listview с несколькими колонками. НУЖНО в первую колонку поместить картинку из файла или иконку, а в остальные - текст. Пока у меня получается так (см. миниатюру 1), а нужно чтобы было как на 2-й миниатюре. Вот кодvb.net1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 Public Class Form1       Dim listviewitem As ListViewItem     'Create a new ImageList with the size you want the icons to be     Private ImgList As New ImageList With {.ImageSize = New Size(24, 24)}       Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         ListView1.View = View.Details         ListView1.FullRowSelect = True         ListView1.SmallImageList = ImgList               With ListView1.Columns             .Add("Icon", 60, HorizontalAlignment.Center)             .Add("   Имя События.", 150, HorizontalAlignment.Left)             .Add("Дата события", 200, HorizontalAlignment.Center)             .Add("Дата напоминания", 200, HorizontalAlignment.Center)           End With            End Sub       Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click           ImgList.Images.Add(My.Resources.Books)         ImgList.Images.Add(My.Resources.Chrome)         ImgList.Images.Add(My.Resources.Dreamviewer)         Dim lvi As New ListViewItem("", ImgList.Images.Count - 1) 'set the icon for the ListViewItem with an empty string for its Text           ListViewItem = New ListViewItem()         listviewitem.SubItems.Add(InputBox("Вписать новое событие", "Добавление события.", ""))         listviewitem.SubItems.Add(DateTimePicker1.Value)         listviewitem.SubItems.Add(DateTimePicker2.Value)         Me.ListView1.Items.Add(listviewitem)              For i = 0 To ImgList.Images.Count - 1                     ListView1.Items.Add("", i)         Next        End Sub End ClassСпасибо за помощь и понимание.

  1. Задача стоит такая: При нажатии на кнопку необходимо выбранную перед этим запись в ComboBox сохранить в текстовый файл. При выборе последующих записей текстовый файл дописывать. Заранее спасибо!

  1. Процедура для изменения прозрачности - VB.netvb.net1 2 3 4 5 6 7 8 9 10 11 12 13 14 Private Sub prozr(ByVal sen As PictureBox, ByVal pr As Integer)         Dim OPA As Double = pr / 100         Dim img As Image = sen.Image         Dim copy As Bitmap = New Bitmap(img.Width, img.Height)         Dim ia As ImageAttributes = New ImageAttributes         Dim cm As ColorMatrix = New ColorMatrix(New Single()() {New Single() {1, 0, 0, 0, 0}, New Single() {0, 1, 0, 0, 0}, New Single() {0, 0, 1, 0, 0}, New Single() {0, 0, 0, OPA, 0}, New Single() {0, 0, 0, 0, 1}})         ia.SetColorMatrix(cm)         Dim g As Graphics         g = Graphics.FromImage(copy)         g.DrawImage(img, New Rectangle(0, 0, img.Width, img.Height), 0, 0, img.Width, img.Height, GraphicsUnit.Pixel, ia)         sen.Image = copy         g.Dispose()         img.Dispose()     End SubИсточник - Занимательное программирование на Visual Basic .NET А.Климов

  1. Здравствуйте, не подскажите: как рисунок расположенный на диске считать в набор байтов. Наверно это не сложно))). Спасибо.

  1. Всем Добрый день. У меня в проекте реализовано следующее: имеется несколько отчетов (Report1.rdlc) и несколько форм. В зависимости от выбранных значений на форме заполняется свой отчет:vb.net1 2 3 4 5 Dim Text As String Text = TextBox1.Text ' и т.д. Form2.ReportViewer1.LocalReport.SetParameters(New Microsoft.Reporting.WinForms.ReportParameter("Parameter1", Text)) Form2.ReportViewer1.RefreshReport() Form2.Show()' показываем форму с отчетомкаждый отчет физически привязан к ReportViewer1 (на своей форме ReportViewer - задачи - выбрать отчет). То есть получается целая куча форм. Все отлажено и все работает (никаких БД нет - все заполняется в зависимости от введенных значений, просматривается и печатается) Вопрос: можно ли сами отчеты (Report1.rdlc) сохранить отдельно от проекта, в какой-нибудь папке на диске. Будет одна форма с ReportViewer1, одна форма с вводом данных, и папка, скажем с 10 отчетами. Возможно ли это и как подключаться к этим отчетам?Добавлено через 4 часа 30 минут Возможно, я как-то не правильно объяснил суть. Сейчас у меня 8 Форм с ReportViewer - каждая привязана на свой отчет. Начиналось все с 2-х, хотел сразу сделать как-то "по-нормальному", но выхода тогда не нашел. Решил временно пользоваться так. Сейчас количество отчетов возросло, и беда в том, что нужно добавить еще 8. Плюс ко всему понадобилась возможность пользоваться этим приложением с двух компьютеров. Вот я и подумал - открыть доступ к какой-нибудь папке. В моем представлении - это должно работать так: 1. Есть установленная программа, в которой пользователь выбирает тип отчета (например ОТЧЕТ №1) 2. Программа связывается с формой этого отчета (его параметрами) и происходит заполнение в один и тот же ReportViewer Вот здесь возникает проблема - как связаться с отчетом и при помощи чего Ведь каждый отчет заполняется своими данными и они в большинстве не одинаковы. Получается нужно как-то выносить за пределы программы еще и модуль с кодом Если все это осуществить - тогда можно было бы добавить (или изменить) отчет №10 и модуль №10, отчет №11 и модуль №11 и т.д., а саму программу переписывать не надо. Если можете, помогите, ведь весь код уже написан - осталось только его как-то правильно "растусовать"...

  1. Я в textbox пишу данные, они добавляются в combobox, но если перезапустить форму, то все записи исчезают, т.е. не сохраняются. Какой код нужно написать, чтобы данные закинутые из textbox в combobox сохранялись? Код добавления, который я использую:vb.net1 Combobox1.Items.Add(Textbox1.Text)

  1. сохранить состояние checkbox'ов в текстовый файл при нажатии на кнопку "Сохранить", и при старте программы загружать последнее состояние CheckBox'ов. заранее благодарен любой помощи.