Таблица символов Visual Basic 2008

[Nirmaww]

Здравствуйте.

Мне нужно написать к понедельнику программу на Visual Basic 2008.
Программа это таблица символов из windows которая находится в пуск...служебные-таблица символов.

Проблем несколько:

1) Я не знаю как сделать такую таблицу в vb. Нельзя использовать Grid, Imagelist. Что конкретно использовать listbox в нем 232 label но это маленько абсурдно...

2) Как сделать чтоб при выборе шрифта загружались только символы этого шрифта и не было лишних ячеек в таблице, отображаться должны символы >32 до 255

3) И самая главная задача ) как сделать чтоб когда нажимаешь на символ он увеличивался точно так же как в windows??? Есть идея использовать zoom, но так как я не знаю как и чем заполнить таблицу прогресс встал.

Вот что я уже имею:

Imports System.Drawing
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
        Dim fonts As FontFamily
        
        For Each fonts In System.Drawing.FontFamily.Families
            
            cmbfonts.Items.Add(fonts.Name)
        Next
        
        cmbfonts.SelectedIndex = 0
    End Sub

    Private Sub btclose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btsalir.Click
        Me.Close()
    End Sub
End Class

Помогите плз разобраться, идеи какие-то предложить я уже просто не знаю как это чудо изобразить можно было бы использовать Grid проблем не было бы ((( Большое спасибо...

 

[Nirmaww]

Почти доделал, осталось сделать увел по клику.
Может кто-то скажет как сделать zoom на label?

---------- Post added at 23:21 ---------- Previous post was at 21:32 ----------

Все сделал сам. Тему можно закрывать. Кому интересно label можно увеличить таким способом. Создать новый нужных вам размеров и по клику перемещать его.

        Dim coord As Point

        lbzoom.Text = sender.Text
        coord = sender.location
        lbzoom.Location = New Point(coord)