Questione : ASP.Net Using un aiuto di Libarary del codice categoria di 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:

 ' movimento di liberazione del codice categoria
Namespace ActiveXDotNet

    Interfaccia pubblica AxMyControl
        Proprietà UserText () come stringa

    Interfaccia 'AxMyControl dell'estremità

Namespace dell'estremità

Codice categoria pubblico UserControl1

    mStr_UserText riservato come [stringa]

    Proprietà pubblica UserText () come stringa
        Ottenere
            Restituire il mStr_UserText
        L'estremità ottiene
        Regolar (valore di ByVal come stringa)
            mStr_UserText = valore
            'Aggiornare il valore di controllo della casella di testo inoltre.
            txtUserText.Text = valore
        Insieme dell'estremità
    Proprietà dell'estremità

myControl del codice categoria dell'estremità '


'Codice di App di fotoricettore





 
  
  
      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 tasto " del type= di/>
    doscript di funzione () {
        UserControl1.UserText = frm.txt .value;
    }