convert Text to Macro

You can talk about VB programming here

convert Text to Macro

Postby namsir » Fri Dec 02, 2005 9:27 am


does anyone know how to do this? i used to do it long time ago, now i totally forgot how....cause i used to program something for aol users ;] those lame scroller and color fader stuff like that.
namsir
imFiles Newbie
imFiles Newbie
 
Posts: 18
Joined: Mon Nov 28, 2005 1:06 pm

Postby locohacker » Fri Dec 02, 2005 2:15 pm

Ah umm I think this what you mean
firs I made a sub like this

Code: Select all
Sub Asc()
Text1.Text = Replace(Text1.Text, "a", "â")
Text1.Text = Replace(Text1.Text, "b", "ß")
Text1.Text = Replace(Text1.Text, "c", "Ç")
Text1.Text = Replace(Text1.Text, "d", "Ð")
Text1.Text = Replace(Text1.Text, "e", "ë")
Text1.Text = Replace(Text1.Text, "f", "F")
Text1.Text = Replace(Text1.Text, "g", "G")
Text1.Text = Replace(Text1.Text, "h", "H")
Text1.Text = Replace(Text1.Text, "i", "í")
Text1.Text = Replace(Text1.Text, "j", "J")
Text1.Text = Replace(Text1.Text, "k", "K")
Text1.Text = Replace(Text1.Text, "l", "£")
Text1.Text = Replace(Text1.Text, "m", "M")
Text1.Text = Replace(Text1.Text, "n", "Ñ")
Text1.Text = Replace(Text1.Text, "o", "0")
Text1.Text = Replace(Text1.Text, "p", "þ")
Text1.Text = Replace(Text1.Text, "q", "Q")
Text1.Text = Replace(Text1.Text, "r", "R")
Text1.Text = Replace(Text1.Text, "s", "§")
Text1.Text = Replace(Text1.Text, "t", "T")
Text1.Text = Replace(Text1.Text, "u", "ú")
Text1.Text = Replace(Text1.Text, "v", "V")
Text1.Text = Replace(Text1.Text, "w", "W")
Text1.Text = Replace(Text1.Text, "x", "×")
Text1.Text = Replace(Text1.Text, "y", "Ý")
Text1.Text = Replace(Text1.Text, "z", "Z")
End Sub


Then I call it with this command

Code: Select all
Call Asc


:)
User avatar
locohacker
Site Admin
Site Admin
 
Posts: 4361
Joined: Fri Dec 31, 2004 6:59 pm

Postby namsir » Fri Dec 02, 2005 10:55 pm

nah, i mean i have 1 textbox to enter the text that i want, and another textbox gonna display the text like:

if i have "N" in the first textbox
the second textbox gonna look like this


:::: :::
::: :: :::
::: :: :::
::: :: :::
::: :: :::
::: ::::
namsir
imFiles Newbie
imFiles Newbie
 
Posts: 18
Joined: Mon Nov 28, 2005 1:06 pm

Postby locohacker » Sat Dec 03, 2005 11:12 am

Oh, :) that look cool is like a triggerbot rdbot made, but he never releases his codes I wonder if someone knows him lol, he got the bestest of paltlk programs, but he never shared ah :(
User avatar
locohacker
Site Admin
Site Admin
 
Posts: 4361
Joined: Fri Dec 31, 2004 6:59 pm

Postby namsir » Sun Dec 04, 2005 2:11 am

hehehhe, he ever release his programs?
namsir
imFiles Newbie
imFiles Newbie
 
Posts: 18
Joined: Mon Nov 28, 2005 1:06 pm

Postby locohacker » Sun Dec 04, 2005 10:39 am

his programs yes although I think he stop doing it for paltalk havent sein his programs for a long time. and his codes are great super great but I dont he ever gave them away ):
User avatar
locohacker
Site Admin
Site Admin
 
Posts: 4361
Joined: Fri Dec 31, 2004 6:59 pm

Postby Guest » Sun Dec 04, 2005 1:51 pm

Rdbot hangs out in 18+ his name is Ryan-D
Guest
 

Postby locohacker » Sun Dec 04, 2005 8:57 pm

man, can u ask him to hook us up lol joke just dreaming lol
User avatar
locohacker
Site Admin
Site Admin
 
Posts: 4361
Joined: Fri Dec 31, 2004 6:59 pm

Postby Guest » Sun Dec 04, 2005 11:54 pm

i dont like him... ryan is a loser
Guest
 

Postby locohacker » Mon Dec 05, 2005 11:19 am

lol oh damn, too bad his programs where cool he just stop updating them :(
User avatar
locohacker
Site Admin
Site Admin
 
Posts: 4361
Joined: Fri Dec 31, 2004 6:59 pm


Return to Visual Basic Programming

 


  • Related topics
    Replies
    Views
    Last post

Who is online

Users browsing this forum: No registered users and 0 guests