But it replaces all abc to google. But I need to change first abc to google and second abc to yahoo and so on.also tried this one
Quote:
Dim m14 As MatchCollection = Regex.Matches(TextBox1.Text, "abc", RegexOptions.Singleline + RegexOptions.IgnoreCase)
For Each n1 As Match In m14
Dim value As String = n1.Groups(0).Value
'MsgBox(value)
I have a tab delimited .txt file, I am reading successfully. Reading first line and split into array. Through the loop I am checking the duplicate column name.
Now I want, if duplicated word found, how can I replace the second one. Suppose my file contains Cell Site Cell ID Cell ID Site Detail 1 A 1 A1 ABC 2 B 2 B2 XYZ
I want to replace second Cell ID to Cell ID_2. Cell Site Cell ID Cell ID_2 Site Detail 1 A 1 A1 ABC 2 B 2 B2 XYZ
have a list of 84000 words , and have some articles in these articles i want to replace first occurrence of each word i have in listbox e.g [code]but it used to replace the whole mytext i want to replace words in mytext and also it hang the system and very very slow and replace all occurrences.
Code: Public Function convert(ByVal sentence As String) As String Dim conv As String = sentence conv = Replace(conv, "I am ", "you are") conv = Replace(conv, "I'm", "you are")
[code]....
This works to some degree but a word like "Mommy" becomes "Momyour". Or "mean" becomes "youan" How can I do this with full words only? I've tried putting spaces before and after within the quotes, but then any of the words that need changed at the beginning of a paragraph, don't change because there is no space at the beginning.
I have a program to rewrite articles.I have a xml file with Synonyms with this format[code]...
For example when I select a word the program display the list of Synonyms in a listbox so I select a Synonym then the program replace the word selected in the article.
The code below replaces if it finds a given string from the list of contractions with its equivelant from the list of word-contractions. E.g., if it finds 'll it will replace it with Will. The code words but whtn it comes to let's it will replace it with let is.
'remove panctuation and contractions first Dim contractions As List(Of String) = New List(Of String)(New String() _ {"'ll", "'re", "'ve", "'m", "'d", "'s", "n't", "won't", "lets", "let's", "ikon of elkomenos", "ikon of crucifixion", "ikon of crist elkomenos", "Part A", "Part B", "renaissance style", "hagios nikolaos", "full wall fortification"})
program description:its a research paper editor and report builder program. i need to replace desired words with all blank spaces in the program
[Code]...
When i executed this program everything works fine.but all the blankspaces are replaced by only one word.
how should i get every individual blank space replaced by individual words.i mean i need to get every blank space in my research paper is replaced by different words
I have the following macro that will find a word in a document, then 'bold and cap' it. If I want to find 50 words in the document and do the same thing, I can just copy the macro 50 times. Is there an easer way to do this?
Set SearchRange = ActiveDocument.Range With SearchRange.Find .Text = "My Word"
make a program to replace the word followed by the selected. But I got stuck at the start..An Example:"My name is Dunley Mike and my father, Dunley Robin are on a holiday at the mountain. There they will meet the uncle Dunley Harry." So what I want to do is to loop through the text for the word Dunley (Underlined) and replace the First name (Bolded) (Mike, Robin, & Harry) to 'family'.
I've managed to become semi-literate in regex's, I'm stuck on this one though. I need to capture up to 5 words before and after a given word (not necessarily in the same sentence). So, for example, if the target word is AARDVARK in the following text:
AND A TRIP TO THE ZOO. THE AARDVARK WAS THE MOST INTERESTING CREATURE HE HAD EVER ...
I would like to capture {A, TRIP, TO, THE, ZOO} & {WAS, THE, MOST, INTERESTING CREATURE}. Obviously, if I could simply capture the whole string "A TRIP ... INTERESTING CREATURE", I can parse out the words.
Is there a simple way to insert a specific word between 2 or more words that of course have spaces?I'm doing if and next and if and next.I have 200 columns of programming for something that it may be simpler to make.So, p.e with the word "and", "Hello world" will be "Hello and world" or p.e. "Hello nice world" would be "Hello and nice and world".Words can also be like "Hello nice world"(doesn't show here,the spaces are "hello nice world" .I don't mind the spaces between to be only one but the words must be separated with the key word and space before and after.
complete coding newbie, but I'm trying to make a program that displays how many people are in a telephone queue by reading from a log file. and havign a timer update the number every 3rd second.
I'm writing a text adventure that takes place in the World of Snorf.Console.WriteLine("You are in the world of Snorf. The sky is pink. A gentle breeze blows across your naked skin.") When I debug this, the line gets cut through the word "your".How can I have the words automatically wrapped between the words?
It has been a while since I have used regular expressions and I'm hoping what I'm trying to do is possible. I have a program that sends automated response regarding a particular file and I'd like to grab the text between two words I know will never change. In this example those words are "regarding" and "sent"
Dim subject As String = "Information regarding John Doe sent." Dim name As String = Regex.IsMatch(subject, "")
So in this case I'd like to be able to get just "John Doe". Every regexp I'm coming up with includes the words "regarding" and "sent". How can I use those words as the boundaries but not include them in the match?
attached is my project on making multiple words from 1 word
This solves the word and has an option to save. Or it solves and saves all words in a list. I tried to do it with jokers using the jokers as every letter but it slows the program down drastically.
I need my VBA Macro to locate text throughout a document and move it. The information that needs moved can easily be detected by the font colors. For example:
"Celica Toyota": Toyota would always be a specific Green font and Celica would always be a specific blue. There can be more than one word in the range that needs swapped (ie: "Monte Carlo Chevrolet").
I have some really long drawn out code, but there's got to be something more efficiant.
Im making a spambot at the moment and i need to know how to make it were when i put like +ENTER+ into the Textbox, it replaces it with ("{ENTER"}) So when its spamming its actually pressing the enter button.
I recently had some problems with the performance of the Word object model. In an add-in that I wrote for Word I need to parse through all the words of a document and replace some of them or ask the user for the ones that have multiple replacements. I know that it is faster to ask Word for all of the document text content at once and then process it and put it back all at once again, but this is not suitable for my add-in because I need to have access to the range objects that represent the words that have multiple replacements so that I can somehow mark them in the document and present the user with a tool tip from which he can select the replacement he wants.
So for the moment the single great speed improvement that came in my head was multithreading since most people already have dual core or better. The problem is that all the things you find on Google say that multithreading in Office is a very bad thing to do.
So is there any one who managed to do this in a manner that worked in most of its usage? By this I mean if it also worked on other PCs then the development one?
for example. String= "Hi VBFriends, I am learning VB 2010."
i need to replace only VB as C#.
if i put String.Replace, its changing as "Hi C#Friends,I am learning C# 2010."
i used regex, Word boundary but not worked, below my code.
Dim sHTMLStream As String = "Hi VBFriends, I am learning VB 2010." Dim oColl As MatchCollection = Regex.Matches("sHTMLStream", "\bvb", RegexOptions.IgnoreCase) For Each sTemp As Match In oColl MessageBox.Show(sTemp.Value) Next
I wana ask you if you think that's the best and the fastest way to replace <<words>> into a .doc file? I don't know other way and i think mine is too slow for doing this kind of job.[code]