Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  HOME    TRACKER    Visual Basic

Fancy Text

I have been experimenting with different stles of text to use as buttons in my program - As shown in the example.

The first is difficult to create - not from vb using psp, but looks best, the second was made from vb and isn't as good.

Can people post sample code they may have of creating "fancy text", anything that looks good.



View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Need Help With Keyascii In A Textbox Fancy Text
i want to type in a text box and the text displayed as FANCYE TEXT YA KNOW ascii

but after a few sec's typing into the text boxes it starts going crazy

Private Sub Text1_KeyPress(keyascii As Integer) 'Detects Keyascii entered and replaces it With a different character
If keyascii = 63 Then SendKeys "{BS}"
If keyascii = 65 Then SendKeys "{BS}A"
If keyascii = 66 Then SendKeys "{BS}"
If keyascii = 67 Then SendKeys "{BS}"
If keyascii = 68 Then SendKeys "{BS}D"
If keyascii = 69 Then SendKeys "{BS}"
If keyascii = 78 Then SendKeys "{BS}"
If keyascii = 79 Then SendKeys "{BS}O"
If keyascii = 80 Then SendKeys "{BS}"
If keyascii = 82 Then SendKeys "{BS}r"
If keyascii = 83 Then SendKeys "{BS}"
If keyascii = 84 Then SendKeys "{BS}"
If keyascii = 85 Then SendKeys "{BS}U"
If keyascii = 89 Then SendKeys "{BS}"
If keyascii = 97 Then SendKeys "{BS}"
If keyascii = 99 Then SendKeys "{BS}"
If keyascii = 101 Then SendKeys "{BS}"
If keyascii = 102 Then SendKeys "{BS}"
If keyascii = 105 Then SendKeys "{BS}"
If keyascii = 108 Then SendKeys "{BS}|"
If keyascii = 110 Then SendKeys "{BS}"
If keyascii = 111 Then SendKeys "{BS}o"
If keyascii = 114 Then SendKeys "{BS}r"
If keyascii = 115 Then SendKeys "{BS}"
If keyascii = 117 Then SendKeys "{BS}"
If keyascii = 120 Then SendKeys "{BS}x"
If keyascii = 121 Then SendKeys "{BS}"
End Sub

Fancy Buttons
hey, i would like to know how i can make fancy command buttons and looks in vb like the ones you have in windowns Xp skins. however i do not want to have to put graphics as buttons.

for example i have a button and usually i will need to have a picture for the up look and another differnet picture when the mouse cursor is howering over it and finally a last one for when it is pressed. is there a way is which i can impliment that into all the command buttons in a form, without tying out the code for each command button individually.


MDI Area / Fancy MDI Gui ???
is there a way to make a MDI area ?
i don't want to use a MDI form, but, i must have a MDI, so my MDIChilds don't stay behind the main form, and don't stay in front of the SmartMenuXP (thanx to SmartVB...)...

the Red area in the picture is where i wnat to set the MDI area...

dunno if i am explaining that correct... but thanx for all the help...

or maybe if you know a way to make a fancy gui like this with a MDI form...

thanx anyway

Have No Exp W/ Fancy Listboxes
I would like to use a much more robust control like MSFlexGrid or VSFlexGrid but i have only experience with the measly Listbox control in vb. Do I have enough knowledge to mess with these fancy controls?

I've tried but to no avail.

How do i train myself with these controls or others?

How do i figure out what list control is best for my application?

Your oppinions would be greatly appreciated.



Fancy Printing
Ive searched the forums but i cant come up with anything helpful enough to solve my problem.

Ive got a program that does all kinds of things, but now i gotta take all the options and values and everything and make one nice big fancy report for my program to print out. But the thing is, most of what i find is just printing your VB Form or a text file.. This form i print will have lines, boxes, pictures, different size text, colors, all kinds of things, and i wanna be able to print draft, normal, and high quality.

I cant seem to find something suitable for this, i guess mostly because my first problem is i dont know if i need to have my program create an HTML file, or a word document or just create it the way its gonna look on a form.. Im just so lost! Ahh!!!

Any ideas for either problem here?

Do You Fancy A Challenge?
I've decided my strengths are in organisation, design and creativity, so thought I'd share the design of an app I was creating - nothing too difficult, but a few areas got me stumped being a newbie at vb and my MSDN part of vb6 won't nstall" (it contains the help files!), so I've put everything on the back burner for the moment. Maybe you're up for a challenge?

I thought that maybe the app (myContcts) could still see the light of day if one or more people would like to complete or add a section to it and share the results with us all.

Anyway attached are the forms and blank .mdb file. I'd love somepone write the code, and we could call it a joint effort and release it as such. I'm not looking for fame or money, just a useful app.

The app is a personal Contact Manager with fields for Name, Addresses, Email, Telephone etc. in and a grid view as well as a single record view. It also includes a drag n drop picture box (this already works as it uses the OLE in Access and no programming just menu / proprties options).

I've cleared out 99% of my code so it won't clutter or confuse you as most didn't work as I wanted it to or it wasn't commented, and someone else would probably do it differently...

The zip below includes a blank MSAccess database with all fileds linked to fields in the vb form.

The form has the usual buttons etc... Add, Delete, Data Control, plus Sort, Find and a List menu option (for a DBGrid).

Those are the basics I'd like to see implemented as I'd like to use such an app. Other ideas for later additions would be alarms for birthdays, and it would be great if someone could implement a dialer too, and maybe add the funtionallity so that it could link to a central database on a server somewhere online. Oh and how about a Help.hlp file. I haven't got a clue how they are created. :-)

If you do contribute in part or otherwise, please comment your code (I'll be interested to see and learn how things are done correctly), and then please send it all back to the forum (in this thread) for someone else to contribute etc. Maybe it would be a good idea to register interest in adding certain parts then duplicates won't happen. Just post what you you intend to do then then its up to others should they also repeat the same thing. Assuming anyone responds at all.

I'm looking forward to seeing what happens next. Over to you people.

PM_86 15-Jan-2006

Fancy Pop-out Button
I want to make a fancy pop-out button. When your cursor gets over a button i want it to make the button change colors or something. Kinda like a hyperlink how it underlines but better. Like a picture pops up when your cursor is in a certain area.

Anyone Fancy A Collaboration?
I was thinking of writing a program that converts Fixed width files into delimited files (and vice versa) with the capability to change the field order to the user's specification.

Also the program will be able to de-duplicate the files before or after conversion, sending duplicates to a separate file.

Sorting features will also be provided.

Seems like a big project for little old me on my lonesome so I was just wondering if a few others were interested.

email me:

Fancy Icons
As I see in Delphi, their buttons, icons are always very colorful and fancy. (like the tick and cross in the buttons).

Do anybody has link whether we can find similar bitmaps to put into VB?

Fancy Forms
<html><div style='background-color:'><DIV>
<P><FONT face="Verdana, Geneva, Arial, Sans-serif" color=#0033cc size=2>hi</FONT></P>
<P><FONT face="Verdana, Geneva, Arial, Sans-serif" color=#0033cc size=2>i need to know if i can make my form look like some fancy shape instead of typical rectangular one in VB.  </FONT></P>
<P><FONT face="Verdana, Geneva, Arial, Sans-serif" color=#0033cc size=2>For example, i want an old man appear on the screen when the form is loaded, with some text beside him</FONT><FONT face="Verdana, Geneva, Arial, Sans-serif" color=#0033cc size=2>.</FONT></P>
<P><FONT face="Verdana, Geneva, Arial, Sans-serif" color=#0033cc size=2>haroon</FONT></P></DIV></div><br clear=all><hr>Chat with friends online, try MSN Messenger: <a href=''>Click Here</a><br></html>

Getting Fancy With The Command Line...

Thanks for everyone's help. One more question and then I'm a full VB Jedi Warrior...

I'm shelling out some commands to use a dos program that takes an input file and then I'm piping it to an output file name:

Dim q As String
q = Chr(34)

ExecCmd q & strExe & q & " " & q & strSource & q & " " & ">" & " " & q & strDest & q

//strExe, strSource and strDest are all full path and file names.
//ExecCmd is a fancy version of the shell that waits for the process to //end. It came from here.

The problem is that I am not getting the output file. It does however work from the command line.

Anybody? Bueller? Bueller? Beuller?

Making Frame Appear In A Fancy Way
Hi i was wondering how i could make the following:

i have a list with values, when i doubleclick one of em, a frame appears with a context belonging to the doubleclicked listitem.

Anyway, what i want is that the frame 'drops down'

As in: it has a fixed .top value and goes from height=1 to the desired height.
It would be cool if it went a bit in a smooth way, accelerating at first and then decellerating at the end.

Any ideas how to do that? i was thinking of a loop that does that or with a timerstep, but it would be cool if it went same speed on different pc's too.

Anyone Fancy Helping A Newbie?
I started a computing course and was introduced to vb6 for the first time in my life.i have now been given 10 questions to complete for 2marro. all i want to know is how to do basic algorithms such as

convert pounds into dollars
calcuate percentage rises (alctually percentage every thing such as adding and minus percentage)

i am really new to this so any help at all appreiciated....a list of basic algorithms would be gold. thanks

Fancy File Stuff
Any one know how to read a file as input and how to store the contents of the file.

does each line get stored as a string in an array of strings??

Fancy String Replace
Say I have a file that I'd like to replace anything between "<" and ">" with uppercase.

Not sure how I would do something like that.

string=replace(string,"<*>","<" & ucase(*) & ">")

Fancy Right Click Menu
How would i go about making a right click menu?
I know how to make menus in the menu editor (like file, edit that kind of stuff),
but how would i make a right click menu?
thanks a bunch

Fancy GUIs (like Office XP)??
Anyone know where I can find a good tutorial on customizing my program's GUI to look something like an Office XP program?
Or maybe a software tool that does it for you?
Thanks... Ryan

Design Interfaces And Fancy Buttons
Hello Folks,

I am moving along quite well in my program's functionality. However, I don't have the asthetic level of success that I so desire. There are some limitations with the available backgrounds, and button styles in VB6.

My question to you is how do I get that really professional look to my interface. I recently saw a program which incorporated a very intuitive form, which allows the user to choose from a wide variety of chapters of study. It had a textured background and textured buttons with cool shapes and lights(color enhanced buttons using - got focus). I guess there must be some custom ocx buttons available elsewhere.

I have a big list of items that I don't want to just put in a simple listbox, I want it to look professional and be intuitive, and be high on the cool factor scale. The list consist of about 25 chapters.

Do you folks have any suggestions or ideas/design concepts.

Thanks a bunch,

Any1 Fancy This Load Of Code
Something I started work on a couple of months back... but can't be chewed to finish it as I have too much on at the moment....

Its sort of an OCX, but I have created an example form with it...

A lot of help has been obtained from this site, and various others so I'm opening up all that I've pulled together so far... Feel Free to complete it if you so wish..

An MP3/Wav player with both pitch and volume control, plus tagging ability..

Let me know what you think of it aswell..

Fancy Buttons For User Interface
I would like to make buttons that respond to the following:

When the button is clicked ("depressed" button look)
When the button has the mouse moved over it ("raised" button look)
All other times (flat look)

I have used picturebox controls for the buttons, and have programmed the images to respond to MouseMove and MouseDown events. The problem is that when a button is clicked, even if the mouse is held down, the moment the mouse moves the "depressed" image is replaced by a "raised" image as the MouseMove event 'overrides' the MouseDown event.

Can anyone suggest a way I can ensure that if the mouse button is held down, the "depressed" image will remain?



Fancy Becomming A Staff Member?...........(Game)
hi, im bring a RPG game to life that im creating in process but could do with some help, so do you fancy becoming a staff member?

Can you eather.........
*Create Characters (Art Work)
*Create WebDesign (WebSite Layout/Graphics/Forum)
*Create A Online Server for the game (Technical)
*Come Up With New Ideas, Suggestions (You)

Credits Will Be Dedicated To You Who Help!
You Will Also Be In The Game As A Character Of Your Choice!

if so then if you want to become staff please leave a private message to me with who you are (nickname) and what you can do and ill get back to you with a reply.

*P.S. if you apply please present me with a sample of your work, no time wasters please.

Many Thanks

Error Message With Opening Of A Text File And Inputing The Text Into Text Boxes
Hey all:

Here is the problem at hand. I have a procedure that opens a recently saved file and when executed places the contents of that file in the designated text boxes I have coded. But the thing is I am getting this error message during the process...

Quote: (Subscript Out of Range)

What does this mean?

Here is the code that I have so far... any help would be greatly appreciated.

Code: Private Sub mnuOpen_Click()
'Open a Previously saved file. Search values are suffixed with .txt
Dim r_strFileName As String
CommonDialog1.CancelError = True 'Set CancelError is true
On Error GoTo ErrHandler
    CommonDialog1.Flags = cdlOFNHideReadOnly 'Hide Read Only Files
    CommonDialog1.Filter = "*.txt" 'Set Filters
    CommonDialog1.DialogTitle = "Opening Saved Search - Locate Text File"
    CommonDialog1.ShowOpen 'Display the Open dialog box
    r_strFileName = CommonDialog1.FileName
'Existence Test
If Dir(r_strFileName) = "" Then
    MsgBox r_strFileName & "File Does Not Exist!", vbCritical
End If

'Read File
On Error GoTo Tag800_error
Dim intFreeFile: intFreeFile = FreeFile()
Open r_strFileName For Binary As intFreeFile
Dim strData As String: strData = Space$(LOF(intFreeFile))
Get intFreeFile, , strData

'Remove Ending vbCrLf
strData = Left$(strData, Len(strData) - 2)

'Format Data
Dim strText() As String: strText() = Split(strData, vbTab)
lblAI.Caption = strText(2)
txtDataString.Text = strText(3)
Linear.Text = strText(4)

GoTo Tag900_Exit

'Error Trapping
    MsgBox "File Read Error" & r_strFileName & vbCrLf & "(" + Err.Description + ")", vbCritical
Tag900_Exit: ' Housecleaning
    On Error GoTo 0
    Close intFreeFile
    Exit Sub
End Sub


Create A Text File From A Mulitline Text Bo In The Same Line Order Of The Text Box.x
I read a mulitline text file to a text box via:
(txtCurrentINI.Text = Input$(LOF(15), #15)

I would like to be able to change lines in the text box-- then
write to a new file.

What would be the proper instruction and syntax to use?

Adding Text1.Text, Text2.Text&&Text3.text!
Hello, i have my Configuration file which is pretty simple file, openable with notepad, like txt.

I want to add text1.text in new line, text2.text in new line and text3.text in new line too. notice: in my attrib.cfg there alot of text, so i basically want to add all this at the end of file


Insert Text Into A Word Document Text Box From A Vb Form Text Box
Can anyone help me???? im trying to insert text into a word document text box (not one from the control toolbox but the one u get from the insert menu in word) and the source for the text comes from a text box on a vb form.
Ive inserted a document variable field called "joe" into the text box in the document called "doc1.doc" and opening it using a command button using the code below but it wont show the text.

Private Sub Command1_Click()
Dim MyApp1 As Object
Dim MyDoc1 As Object
Set MyApp1 = CreateObject("Word.Application")
Set MyDoc1 = MyApp1.Documents.Open(App.Path & "doc1.doc")
MyDoc1.Variables("joe").Value = Text1.Text
MyApp1.Visible = True
End Sub

this works anywhere else on the document except in the text box.......any ideas??????
doc1.doc is in the same directory as the project.

Rtf Text Box - How To Avoid Text Color Change On Text Selection
I am using an rtf text box because i am using colored text.
The text uses more then one color.
My problem is, after a selection is made and the selected text highlighted, after the next click, (the highlighting is gone) the colored text will turn to black.
How can i avoid this "decoloring" after a selection, but still enable the user to select text?
Since the selected text is colored in more then one color - i cant just recolor it back again...
or can i?


Putting The Text Of Two Text Boxes Into One Multiline Text Box
Well I Got a Text1.Text and a Text2.Text
What I Am trying to accomplish is the following:

When I Press Command1, Text1 and Text2 both get put in one line on Text3.

Text3.Text = Text1.Text + " - " + Text2.Text
That does the Job, And thats where I Am so far.
However, I Need it so that if I Press Command1 Twice, then it goes to a new line
Meaning if Text1 and text2 both say ''test''
Text3 will be


Test - Test

I Need it so when I press Command1 again it puts it in Text3 in a new line, and to keep the past one
So in the end it will be


Test - Test
Test - Test
Test - Test

Etc depending on how many times I Click it.

Clearing Text In Memory (text Keeps Reappearing On Text Box)
Hello, I've written a basic text editor that is specific to certain filetypes.

When I load a file and it appears in the text area, then click on the clear menu item, it clears the text area properly.

But, if I go to open a new document using common dialog's "ShowOpen", then click the cancel button (or press the ESC key) then all the text from the file I cleared reappears in the text area again.

Is there a way to clear the contents of memory for this situation?

I thank you in advance.

Save Text From Two Text Boxes Into 1 Text File?
I have two text boxes. Is it possible to save Text1 and Text2 into the same file, so that the new text file containing both Text1 and Text2's text will be like:

This is the text from Text1's text box

And this is Text2's text

Making a new line to seperate them, if you know what i mean?

Use A Text Box Or Rich Text Box To Make Text Bold?
I want to make some text in a text box bold, other text red, and some other text blue. Does anyone know if I can do this with a textbox, or do I need to use the Rich Text box?


How Do I Make A Text Box Send Text To A Text File?
I need to know what command i would use to send text entered in a text box to a text file using a command buttton.
Your advice would again be very appreciated!

[VB6] Writing Text Into One Text Box Writes The Text Into Another!
In the title it sounds rather easy but bein quite new to VB6 it seems a little complicated for me.

Navigate to this page:

It's the MSN wierd maker where you type in say:

Normal Text: Hello

Weird: нєℓℓσ

I would like this in my VB app so that when something is typed in the Normal text box the same text will be displayed in the Wierd text box only in that font above. Also the wierd text box must have write disabled so you cannot write anything in the text box, just highlight and copy the result. Help is more than appreciated

Text Box Exception For No Text Entered In Text Box
Hello All.

Here is my problem. I am doing an assignment for school and as you can see below I have most all of my coding done. Sorry that I don't have any explanation tags. I haven't got to that yet. I am now trying to make an Exception for my Customer Text Box and Customer Phone Number Text Box. I want the user to enter their name and phone number before the program calculates the total for their pizza. I hope I have explained myself.


VB Code:
Private Sub calculateButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles calculateButton.Click        'Calculate and display the current amounts and determine Amount Due.                        Dim pizzasizeDecimal, toppingsDecimal, discountDecimal, discountcomputeDecimal, salestaxDecimal, subtotalDecimal, amountdueDecimal As Decimal         'Compute total for a pizza size        'Use individual Block if statements with no else branch                   If Me.smallRadioButton.Checked Then            pizzasizeDecimal += SMALL_PIZZA_Decimal        End If        If Me.mediumRadioButton.Checked Then            pizzasizeDecimal += MEDIUM_PIZZA_Decimal        End If        If Me.largeRadioButton.Checked Then            pizzasizeDecimal += LARGE_PIZZA_Decimal        End If        If Me.monsterRadioButton.Checked Then            pizzasizeDecimal += MONSTER_PIZZA_Decimal        End If          'Compute the toppings selected        If Me.peppersCheckBox.Checked Then            toppingsDecimal += PEPPERS_Decimal        End If        If Me.onionsCheckBox.Checked Then            toppingsDecimal += ONIONS_Decimal        End If        If Me.ecCheckBox.Checked Then            toppingsDecimal += CHEESE_Decimal        End If         'Computes discount chosen by customer        If Me.noneRadioButton.Checked Then            discountDecimal += NO_DISCOUNT_Decimal        End If        If Me.tenRadioButton.Checked Then            discountDecimal += COUPON_Decimal        End If        If Me.preferredRadioButton.Checked Then            discountDecimal += PREFERRED_CUSTOMER_Decimal        End If                 'Computes subtotal        discountcomputeDecimal = (pizzasizeDecimal + toppingsDecimal) * discountDecimal         subtotalDecimal = (pizzasizeDecimal + toppingsDecimal) - discountcomputeDecimal         salestaxDecimal = Decimal.Round(Convert.ToDecimal(subtotalDecimal * salesTaxRateSingle), 2)         amountdueDecimal = subtotalDecimal + salestaxDecimal                Me.subtotalTextBox.Text = subtotalDecimal.ToString("C")        Me.discountTextBox.Text = discountcomputeDecimal.ToString("C")        Me.salestaxTextBox.Text = salestaxDecimal.ToString("C")        Me.amountdueTextBox.Text = amountdueDecimal.ToString("C")     End Sub

Adding Text To Original Text In A Text Box?
Hello there everyone!

I have a program and it has some textboxes on the main form..

It also has a checkbox.

Now when this checkbox is selected I want it to add and edit the current text in textbox1.text.

The current text in the txt box would be I want it to change this whole line to ""

So it would change the current email address, by adding a + sign in place of the @ symbol. And then it would add to the end. And if the user 'deselectes' the checkbox it would change the "+" back to "@" and remove ""

Does anyone know if this is posible in VB 6.0?

If you need more info let me know
Thank you and have a great day!

You Can Align Text In A Text Box But Not Rich Text Box????
I dont see a way to centre or align text to the rigth in a rich text box, which such features are there in a normal basic text box.

thats very odd..... Rich text box is ment to be advance with stuff like that no???

or am i missing something here?

can it be done programmicaly maybe?


Pasting Text Into A Rich Text Box Containing Text
I have set up a popup menu for cut copy paste within a rich text box. The scenario I have is that users may already have text in the rich text box which they wish to append pasted text to, ie when they paste the text it needs to be inserted into the location of the cursor within the rich text box, ie at the beginning, middle or end WITHOUT trashing the existing text.

any ideas??




I would appreciate if some one help me out in finding an answer to this.

I am a new user of visual basic and have been stuck in writing a code / project for finding and replacing a data from a text file ( input file to an application).

The part of file sample which need to be replaced is below


For example I need to replace 61.0 to 91.0 and 26.0 to 43.0.

The data in file is random and can come at any line number, one of my other concern is how to locate the line number, I have no clue for that.

Please help me in working this out.

Best Regards


Parsing Specific Text Pattern From A Text File And Save It On Excel Format
I just registered as a new member for this forum....i'm only starting to learn VB and hope i can get more information and tips from you guys. Anyone here can help me how to parse specific text pattern and save it on an Excel file?....


My text file would look like this:

Device_name : W8510HA7-BAN-C
Lot No. :14023562.1-Q45218.1
TestProgram :W8510A7_REV06_100C

 FAIL 12 25 12 10.00% Leakage Fail
 FAIL 13 26 42 42.02% bandgap Test Fail
 FAIL 14 27 100 70.11% scan_core Fail

I want to parse the value for the Device_name, Lot No., TestProgram and all others
like QTY and TEST ITEM into an predefined excel format( ex.A1evice_Name, A2:Lot No., ......etc).

I hope you can help....thanks!



Looping Through Text File To Import Fields To Multi Line Text Box
I am opening and checking through line by line of the text in a text file for attr, with their values and description.

Some attributes have more than one value and description.

I have found the way of looping through and finding all instances of the values and descriptions but I now need to find out how to put one attribute on one line with its relevant value and description. (These are all being imported from a web page so each attr, value and description are on different lines.

Attribute Value Description
1 1 minimum no
1 2 middle number
1 3 maximum number

Any help would be great

Out Of Stack Space Error Sending List1 Text To List2 Text.
I seem to be running into a problem perhaps I should explain a little what im trying to do so I wont need to keep on making all theses topics.

Im trying to use Text1.Text to add to the list of names that are in List1 then I send all the names in list1 to list2 however im getting a Out of Stack space error

Code To Read Two Text Files, Concatenate One After The Other, Output To New Text File
what would be the code that would allow me to read in two text files, concatenate the second one to the end of the first one, then output the file as a new third text file?
thanks in advance,

Taking Data In A Text File From A Form And Putting It In A Label/text

I am attempting to take the information from a text box and a label from one form an put it into a blank form if thats possible. i.e

label1.caption and text1.text from form1.frm gets transfered into a blank


Dispalying Text In Rich Text Box Control In A Long Single Line
In my application I have a rich text box.

But when i do
text1.text = a string of length 500. the string is divided into the width of the text box and is shown in multiple lines.

I want this to be shown in a single line.

Currently it is displayed as:
| |
| |

I want this to be displayed in a single line ....but the multiline property should be enabled that i can add more lines to it.
I have already put scrollbars= "rtfBoth" and disablenoscroll = true.
Please help me with this. It would be great help.


Adding Text To Rich Textbox Without Changing Format Of Existing Text?
Hello all. This is my first time working with RTB's, and I'm having a little trouble getting started. I'm sure it's some little problem of syntax/semantics, but I can't figure it out. A little help would be greatly appreciated!

I have a RTB to which I am trying to add texts of different formats. When I add each string, the entire box text takes the most current format. This makes perfect sense to me, as I am essentially rewriting the ENTIRE textbox (I am using the ".Text = .Text & "NEWTEXT" format that I am accustomed to using for textboxes.

What am I doing wrong? Thanks!

VB Code:
'1.  Create a new form.'2.  Add a button named butGo.'3.  Add a RTB named rtbText.'4.  Cut & Paste the procedure below. Private Sub butGo_Click()Static Counter As IntegerCounter = Counter + 1With rtbText    Select Case Counter        Case 1: .Font.Size = 16                .Font.Bold = True                .Text = .Text & "This is a test..."        Case 2: .Font.Size = 12                .Font.Bold = False                .Text = .Text & "This is only a test!"        Case 3: .Font.Size = 6                .Font.Italic = True                .Text = .Text & "  Can you see me?"    End SelectEnd WithEnd Sub

*RESOLVED* Using Text File As String Input For Opening Other Text Files
OK, I've been banging my head trying to get this one little piece to work (that I had working prior to a loss of power on Friday) but I cant remember the syntax I used to get it right.

What I'm doing is opening 1 text file and using it as the input in a loop to open and parse mutiple text files to a text box.
Heres the part that doesn't work;

Open "rbt.txt" For Input As 1

Do Until EOF(1)
Open " " & rbt.txt & ".txt" For Input As 2 'THIS IS THE PART THATS not working !

Line Input #2, slist
s = s & slist & vbCrLf

Upt_log_txt.Text = s


I know its a syntax (read as placement) issue but I cant get the right combo down.

RESOLVED-Setting The Backcolor Of Selected Text In Richtextbox-highlight Text
Does anybody know how to change the backcolor of selected
text in a richtextbox. Not the background color of the whole richtextbox only the selected word-lines !

I use a richtextbox which uses some validation and if there is an error in the text i want to display the word in red backcolor.

do you have any tips of alternatives if i cant do this?
Moreover how do you underline the selected text.
i use rtf.selunderline but it does not work.


p.s. i search the forum and did not find any solution.

Rich Text Box - Scrolling To Line Where Text Was Found With The Find Method
When I use the Find method of the rich-text box, the rtb automatically positions the line where the text was found at the bottom of the control. Is there a way I can make the found line automatically scroll to the top of the control?

Changing Font Colour On Every Line Of Text Taken From A Text File Onto A Label
When my ticker reads info from every line from a text file. I want it to change the colour on every line for display on a form label label. Any ideas how I could do this? I've spent a whole day trying to figure this out, still no joy.

Sorting Data From An ASCII Text String And Saving It As Text File
I'd first like to copy paste a section of my ASCII text string over here and then ask the question.Given below is the ASCII text string:


=ontrol Mode ON LOCAL STAT
Occupied YES OCC
Alarm State Normal ALM
Active Demand Limit 100 % DEM_LIM
Override Modes in Effect YES MODE

Percent Total Capacity 100 % CAPA_T
Percent Available Cap. 100 % CAPA_A
Circuit Running Current 185 AMPS A_CURR
Discharge Gas Temp - A2 122.9 dF DISTMPA2
Saturated Condensing Tmp 97.5 dF TMP_SCTA
Saturated Suction Temp 41.5 dF TMP_SSTA
EXV % Open 43 % EXV_A
Variable Head Press Pct. 0 % VHPA

Given above is a portion of my ASCII text string.I'd like to know how to sort out the data from this file and copy it in the same format as given above into a new Text File,using the delimiting characters like the white space and the "?".The "?" indicates the end of the file and the following ASCII text string after every "?" indicates the start of a new text file.

I'd be very very grateful to the person who'd give me the solution to this.Thanking you in anticipation.

Copyright 2005-08, All rights reserved