Link to home
Start Free TrialLog in
Avatar of kwickway
kwickway

asked on

Richbox Controls - Apending color text...

Hello, can someone give me an example of how to append color text in a richbox control?  I am using one as a text box, and when opening a file and copying whats in the file into the richtext if there is a specfic word or somthing i would like to make that word a diffrent color.

Thanks

simple Example of what i want done:

dim tempdata
open "myrFile.txt" for input as #1
do
   line input #1, tempdata
   tempdata=replace(tempdata, "RED","makemered")  ' change "makemered" to what ever it takes to make it red
   richtextbox1=richtextbox1 + tempdata
loop until eof(1)
Avatar of Richie_Simonetti
Richie_Simonetti
Flag of Argentina image

with that kind of code you couldn't get it. Load the text first, do a search (don't use replace function, it doesn't works that way) and use .seltext, .sellength anmd so for properties/methods to change the color.
Avatar of kwickway
kwickway

ASKER

can you show me an example of how i could get it?  I just want to replace every word "RED" to have the color red.
Data provided accordingly to points offered.
:)
im sitting at 0 points left. :(  Is there anything else i can do for you instead?
That's not the only problem, i haven't vb isntalled so i cannot test it or wrote sme example code...let me see if i coul dfind any resource...
ASKER CERTIFIED SOLUTION
Avatar of Richie_Simonetti
Richie_Simonetti
Flag of Argentina image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Hi All,

I need to append data from One excel file to another.

I have Supplier Master data base as given below:

Supplier No. Supplier Name Invoice No.  Amount
12345          ABCD
Hi All,

I need to append data from One excel file to another.

I have Supplier Master data base as given below:

Supplier No. Supplier Name Invoice No.  Amount
12345          ABCD                12A           400
12346          BCDE                 13A          700
12345          ABCD                 13            800
12346          BCDE                  14A         890
12347          CDEF                  11           90
12347          BBBB                  12            80

I need to copy the data of 12345 to 12345.xls as given below
Supplier No. Supplier Name Invoice No.  Amount
12345          ABCD                12A           400
12345          ABCD                 13            800

Likewise, I need to do for 1000 Suppliers..Please help me...