Теперь добавим метод. Мы с Вами добавим метод для перевода строки в верхний регистр. Данный метод есть в классе CString и называется MakeUpper. Вот его мы и реализуем.

Запускайте VC и открывайте наш проект. Открывайте окно ClassView и правой кнопкой на _DDMyActive1. В меню выберите AddMetod. Заполните его так и нажмите OK.

В результате у Вас в классе CDMyActive1Ctrl появится метод MakeUpper. Найдите его и измените.

void CDMyActive1Ctrl::MakeUpper() 
{
	m_string.MakeUpper(); 
	InvalidateControl();
}

Всё, компилируйте. Теперь его надо испытать. А вот с этим могут возникнуть проблемы. Уж это желание ускорить работу.

Для того, чтобы новый метод появился Вам необходимо убрать все ссылки в Excel из дополнительных компонент. Закрыть Excel. Убрать файлы EXD. VBA для ускорения работы создает эти файлы. А вам нужно, чтобы он создал их заново иначе нового метода вы не увидите.

Windows NT на диске D !!!
D:\TEMP\Excel8.0\DMYACTIVE1Lib.EXD
D:\WINNT\MSApps\MSForms\DMYACTIVE1Lib.EXD
D:\TEMP\VBE\DMYACTIVE1Lib.EXD

И после этого Вы можете в Excel написать следующий код.

Sub MyTest()
	UserForm1.DMyActive11.MyText = "This is Test"
	UserForm1.DMyActive11.MakeUpper
	MsgBox UserForm1.DMyActive11.MyText
End Sub

Итак, создать метод очень просто. Добавляете метод. Код. Перекомпилируете. Удаляете временные файлы и можно использовать.