Допоможіть будь ласка прописати відкриття готового файлу з папки. Розумію що код написаний криво, але потім я його виправлю. 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 35 36 37 38 Dim oExcel As Object Dim oBook As Object Dim oSheet As Object Dim SaveAs As Object Dim klient As Object oExcel = CreateObject ( "Excel.Application") oBook = oExcel.Workbooks.Add 'Додати дані в осередку першого аркуша нової книги oSheet = oBook.Worksheets (1) oSheet.Range ( "A1 : B1 "). Merge () oSheet.Range (" A2: B2 "). Merge () oSheet.Range (" C2: D2 "). Merge () oSheet.Range (" C3: D3 "). Merge () oSheet.Range ( "C4: D4"). Merge () oSheet.Range ( "C5: D5"). Merge () oSheet.Range ( "A1: D1"). Font.Bold = True oSheet.Range ( "A1 ") .HorizontalAlignment = -4152 oSheet.Range (" C1 "). HorizontalAlignment = -4131 oSheet.Range (" A1 "). Value =" Договір № "oSheet.Range (" C1 "). Value = KartaDataGridView.CurrentRow. Cells (0) .Value oSheet.Range ( "A2"). Value = "Вид договору:" oSheet.Range ( "A5"). Value = "Дата укладення:" oSheet.Range ( "C5"). Value = KartaDataGridVie w.CurrentRow.Cells (5) .Value 'Зберегти книгу і закрити Excel oBook.SaveAs ( "D: \ T2" KartaDataGridView.CurrentRow.Cells (0) .Value ".xlsx") oExcel.Quit () Process.Start ( "D: \ T2" KartaDataGridView.CurrentRow.Cells (0) .Value ".xlsx")
Всім привіт. Необхідно зберегти всі картинки з файлу презентації в якусь папку. Хто-небудь таке робив. Підкажіть з кодом плиз. Спасибі заздалегідь.
Привіт форумчани! Підкажіть будь ласка правильний метод отримання текстових даних у вигляді таблиці з текстового файлу, де розмір може варіюватися від 200 до 400 мегабайт. У текстовому файлі крім хтмл розміток і тегів присутні таблиці виду: Пробував регулярними виразами отримати дані, але не зміг через символу розриву рядків. Якщо хто підкаже патерн, буду щиро вдячний. Я зазвичай обходжуся replace, щоб з'єднати в один рядок і витягаю дані регулярки, а тут заміна не виходить, видає - OutOfMemory. Вивантажують в змінну масиву стрінгів наступним кодом: vb.net1 Dim txt () As String = File.ReadAllLines (path) потім крок за кроком сплитами / реплейсамі шукаю необхідні дані і записую в лістбокс, але на певних рядків (
1000000) отримую той же OutOfMemory.
Зробити це з файлу легко: vb.net1 Cursor.Current = New Cursor ( "plus.ico") Але тоді потрібно тягати за exe-шником файли з іконками (а їх кілька десятків). Хотілося б мати все всередині самого exe-файлу. У файл ресурсів проекту іконки завантажуються як значки. Їм дається ім'я. Після компіляції все, що напхано в файл ресурсів виявляється всередині exe-шника. Це мені і треба. Але як цими значками скористатися? Oдин з конструкторів класу Cursor за описом повинен підходити для такого завдання: Cursor (Type, String) - Ініціалізує новий екземпляр класу Cursor із зазначеного ресурсу, використовуючи зазначений тип ресурсу. Але приклад його використання з msdn нічого толком не пояснює.
Всім здрастуйте. Є текстовий файл cо рядками однакового формату. Використовується він для читання в такий спосіб: vb.net1 2 3 4 5 6 7 8 Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser (sFName) MyReader.TextFieldType = FileIO.FieldType.Delimited MyReader.SetDelimiters ( ",") While Not MyReader.EndOfData currentRow = MyReader.ReadFields () 'читаємо рядок з даними, що вказані через кому (порожні рядки автоматично ігноруються)'. End While End UsingКак вказати, що до файлу sFName дозволений доступ на запис і читання інших додатків (процесів). Тобто як вказати. що FileShared.ReadWrite?