RichTextBox with Bulleted List in VB6

[dezmond]

In this article, we will create a program that can open a RichTextBox and manipulate its Bulleted List. The BulletedList function creates a list in bullet format.
Now, let's start this tutorial!

1. Let's start this tutorial by following the following steps in Microsoft Visual Basic 6.0: Open Microsoft Visual Basic 6.0, click Choose Standard EXE, and click Open.

2.Go to Project Tab, and Click Components or Press Ctrl+T.

3.In the Controls Tab, find and check Microsoft Rich TextBox Control 6.0. Click apply and then click OK.

4. Next, insert Two Buttons for the Bulleting of the Text named Command1 labeled it as "Make it Bulleted", and Command2 labeled it as " Make it Not Bulleted . Add also RichTextBox namedRich TextBox1 from the component. You must design your interface like this:

5. Put this code in your code module.

1. Private
   
   Sub
   
   Command1_Click()
   
2. RichTextBox1.SelBullet = True
   
3. End
   
   Sub
   
4. 
   
5. Private
   
   Sub
   
   Command2_Click()
   
6. RichTextBox1.SelBullet = False
   
7. End
   
   Sub
   

Explanation:

Button1 is used for making the text in the RichTextBox in a Bulleted style. Otherwise, the second button is to negate the bulleted list of the texts in RichTextBox as it is equal to false in its SelBullet property. SelBullet property returns the RichTextBox of a Selected Bullet that is a Boolean Type. If the SelBullet property returns to True then the selected text will have a bullet. Otherwise if false, it does not return a bullet.

Output:

Download the source code below and try it! :)

For more inquiries just contact my number or e-mail below.

Best Regards,

Engr. Lyndon R. Bermoy
IT Instructor/System Developer/Android Developer
Mobile: 09488225971
Telephone: 826-9296
E-mail:[email protected]

Follow and add me in my Facebook Account: https://www.facebook.com/donzzsky

Visit and like my page on Facebook at: https://www.facebook.com/BermzISware

Download