Cuestión : ASP.Net usar una ayuda de Libarary de la clase de 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:

 ' liberación de la clase
Namespace ActiveXDotNet

    Interfaz público AxMyControl
        Característica UserText () como secuencia

    Interfaz 'AxMyControl del extremo

Namespace del extremo

Clase pública UserControl1

    mStr_UserText privado como [secuencia]

    Característica pública UserText () como secuencia
        Conseguir
            Volver el mStr_UserText
        El extremo consigue
        Fijar (valor de ByVal como secuencia)
            mStr_UserText = valor
            'Poner al día el valor del control de la caja de texto también.
            txtUserText.Text = valor
        Sistema del extremo
    Característica del extremo

myControl de la clase del extremo '


'Código del App del Web





 
  
  
      size= arial " 1 " del face= " del 
       classid= " ClassLibrary2.dll#ActiveXDotNet.UserControl1 " " del name= " myControl1 " del id= " myControl1 del 
         
     id= " frm " del " frm " del name= del 
       doscript del onclick= " del " botón " del type= " de/>
    doscript de la función () {
        UserControl1.UserText = frm.txt .value;
    }