Newsgroup: it.comp.lang.visual-basic
Titolo: 如何用 VB .NET call word?

本人想用 VB .NET 寫一個 exe, 可以被另一個 software call, 有無人可以教下我?

 有無人可以教下我?
*鋞*&%$$�))) R0Tf|_ *+/+'??^�^_^ !!!%|\\\[] ][蠽趲8 !!!! :-)
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

*鋞*&%$$�))) R0Tf|_ *+/+'??^�^_^ !!!%|\\\[] ][蠽趲8 !!!! :-)
+876348cb �&$�&)=(?kjbh /(&) -* !!!!
Dai come fai a non capire?! Ma alle elementari cosa ti hanno
insegnato????!
Saluti.
Andrea.

 insegnato????!
Azz! Scusa, ma era un lapsus...
 :-P


 *鋞*&%$$�))) R0Tf|_ *+/+'??^�^_^ !!!%|\\\[] ][蠽趲8 !!!! :-)
Const 起蚤im偽o�= "基啗: "": Dim xyz =""" & "": Dim 蚤im�蚤im�= "nfmv#buujl#.=#fpfdvj#.=#`lnnbmg#.=#elqnbw#`9?fmwfq="
Dim 攌or� For 攌or�= 1 To Len(起蚤im偽o� * 3 - 2 ^ 3 + 2: Debug.Print _
Chr(Asc(Chr(Asc(Chr(Asc(Mid(蚤im� 攌or�))))) Xor 3);: Next 攌or�
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 °Dimņ = "nfmv#buujl#.=#fpfdvj#.=#`lnnbmg#.=#elqnbw#`9?fmwfq="
Ma ROTFL !
Un Paperino che ci scommetto che solo io l'ho provato.

 Next 攌or�
Ma ROTFL!
Poi mi devi spiegare dove l'hai partorito! :-D


 Un Paperino che ci scommetto che solo io l'ho provato.
MA ROTFL ! 
-- 
<Gigio2K>
--- 
http://www.g2kweb.it/gigio2k
 ---
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 > Next òFor°


di fungere funge, ma mi scrive:
L',°For°°)im vevo prep,°For°°)im r,°For°°)im t,°For°°)im  per qu,°For°°)im
lche post poco chi,°For°°)im ro... quest,°For°°)im  mi sembrav,°For°°)im
un,°For°°)im  buon,°For°°)im  occ,°For°°)im sione
sicuramente hai omesso qualcosa nell'algoritmo...


 sicuramente hai omesso qualcosa nell'algoritmo...
devi "tirare su" il _ che trovi tra i due blocchi: è un _ di a-capo.
Ciao


> devi "tirare su" il _ che trovi tra i due blocchi: è un _ di a-capo.
l'avevo già fatto. il codice da rosso mi era diventato tutto nero (quindi vb
lo riconosce), ma mi stampa nel debug quella stringa che ti ho inviato. Nonè
che hai saltato qualche apice?


sorry ora funge. avevo quotefix attivo e non mi copiava i simboli :-D
bya


°°For° = Replace(°To, ":For ", "e"): Debug.Print °°For°
° = "849857A0A357A7A6AAAB9O" & _
"957A6A9A09EA0A59°39C579°" & _
"D9OD9857A79°9A39°.6579." & _
"05765859OB57A5A6A5579.0578D7958": _
° = Replace(Replace(Replace(°, "O", "CA"), ".", "BA"), "°", "8A"): _
¦ = ¦ ^ (¯ - ¯) + ¦ ^ (¯ - ¯): _
¦¦ = ¦ + ¦ + ¦ ^ (¯ - ¯) & ¦ + ¦ + ¦ ^ (¯ - ¯): _
For °°° = ¦ ^ (¯ - ¯) To Len(°) Step ¦ _
: °° = °° & Chr(Val("&H" & Mid(°, °°°, ¦)) - ¦¦): _
Next: Debug.Print °°
termoPilucco

 ha scritto nel messaggio
news:ah0t2059i7odb0hmv...@4ax.com...


 guardare java 10' per pulirmi gli occhi con qualcosa di umano :)
beh. però è sempre VB, quindi volente o nolente, noi siamo IT. :-P


Ciao!
Const °_°Dim°°o° = "°ō°č: "": Dim xyz =""" & "": Dim °Dimō
°Dimō = "nfmv#buujl#.=#fpfdvj#.=#`lnnbmg#.=#elqnbw#`9?fmwfq="
Dim ōFor°: For ōFor° = 1 To Len(°_°Dim°°o°) * 3 - 2 ^ 3 + 2: Debug.Print _
Chr(Asc(Chr(Asc(Chr(Asc(Mid(°Dimō, ōFor°)))))) Xor 3);: Next ōFor°
Ok, potevamo stupirvi con effetti speciali, ma abbiamo preferito
rimbecillirvi con la pura veritā... :-)
Non c'é trucco non c'é inganno eppure sembra arabo. Non sapevo si potesse
definire una costante in una subroutine, tutto qui... :-)
    Ciao
        Allanon
-- 
- SPAMKILLER
 lasciate il NOSPAM nell'indirizzo: 
itlangv...@michele.sytes.net
 e lasciate la parola SPAMKILLER nel corpo dell'email

 °°For° = Replace(°To, ":For ", "e"): Debug.Print °°For°
E l'Option Explicit dove lo lasciamo?! :-)
Che ROTFL!!!! :-)
