Как преобразовать файл изображения BMP в текстовый файл в VB

Imports System.Drawing.Imaging
Imports System.Runtime.InteropServices
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    ' Dim OpenFileDialog1 As OpenFileDialog
    'If OpenFileDialog1.ShowDialog <> Windows.Forms.DialogResult.Cancel Then
    'PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
    'End If
 Dim openFileDialog1 As OpenFileDialog = New OpenFileDialog

    ' Set filter options and filter index.
 openFileDialog1.Filter = "BMP Files (*.bmp)|*.bmp|All Files (*.*)|*.*"
 openFileDialog1.FilterIndex = 1

 openFileDialog1.Multiselect = True

    ' Call the ShowDialog method to show the dialogbox.
 Dim UserClickedOK As Boolean = openFileDialog1.ShowDialog
 PictureBox1.Image = Image.FromFile(openFileDialog1.FileName)
 End Sub
 End Class

С помощью этого куска кода я могу отслеживать и открывать изображение. Теперь я хочу получить доступ к данным изображения и хочу отобразить. Для этого я должен преобразовать изображение в текстовый файл. Как это возможно?. В C# есть функция называется Readimage, Какая функция поможет мне прочитать изображение в VB?

1 ответ

Решение

Я думаю, что вам нужно использовать File.ReadAllBytes это открывает двоичный файл, читает содержимое файла в байтовый массив, а затем закрывает файл.

Dim data() as Byte = File.ReadAllBytes(path)
Другие вопросы по тегам