Вопрос : ASP.Net Using помощь Libarary типа VB

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:

 ' свобода типа
Namespace ActiveXDotNet

    Общественная поверхность стыка AxMyControl
        Свойство UserText () как шнур

    Поверхность стыка 'AxMyControl конца

Namespace конца

Общественный тип UserControl1

    Приватное mStr_UserText как [шнур]

    Общественное имущество UserText () как шнур
        Получите
            Возвратите mStr_UserText
        Конец получает
        Установите (значение ByVal как шнур)
            mStr_UserText = значение
            'Уточните значение управлением коробки текста также.
            txtUserText.Text = значение
        Комплект конца
    Свойство конца

myControl типа конца '


'Кодий App стержня





 
  
  
      size= " 1 " face= " 
       classid= " ClassLibrary2.dll#ActiveXDotNet.UserControl1 " " name= " myControl1 " id= " myControl1 
         
     id= " frm " " frm " name= 
       doscript " onclick= " " кнопки " type=/>
    doscript функции () {
        UserControl1.UserText = frm.txt .value;
    }