O.Stream
'Процедура при виборі елемента (bmp) і його відображення
Private Sub ListBox1_SelectedIndexChanged (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChangedstf As IO.Stream=New IO.FileStream (ListBox1.SelectedItem, IO.FileMode.Open) buf (stf.Length) As Byte.Read (buf, 0, stf.Length). Close (). Text=ListBox1.SelectedItem=New IO.MemoryStream (). Write (buf, 0, buf.Length). Image= Image.FromStream (z). Close (). Text=«Виберіть об'єкт» TrySubClass
Додаток Г
Лістинг модуля «MyClass.vb» Class RecSizeX As IntegerY As IntegerClass