Store the class name

  With wc
    .cbSize = Len(wc)                                     'Size of the window
     class type
    .cbClsExtra = cbClassExtra                            'Number of class
     extra bytes
    .cbWndExtra = cbWndExtra                              'Number of window
     extra bytes
    .hbrBackground = CreateSolidBrush(colBackground)      'Class background
    .hCursor = hCursor                                    'Class cursor
    .hIcon = hIcon                                   