Help Needed - Depperate!

Posted: Mon Nov 10, 2008 6:23 pm Post subject: Help Needed - Depperate!

Well I really need this code, I can't for the life of me work it out, neither can Jay (legend) or Brucey. Basically I have a text box and a button which will insert "<b></b>" tags around some text in a text box when its highlighted. So basically it would work like a BB code. I would highly appreciate it if some VB master could tell me. By the way, the code what I need has nothing to do with connection to the internet just a simple code where you highlight some text, click a button and it puts these around the said highlighted text "<b></b>". Cheers all.

Nemesis Owt! x

Author	Message
Nemesis The Bizzle Joined: Sat Aug 25, 2007 10:50 pm Posts: 1701 Location: Hull, North Lincolnshire	Posted: Mon Nov 10, 2008 6:23 pm Post subject: Help Needed - Depperate!
	Well I really need this code, I can't for the life of me work it out, neither can Jay (legend) or Brucey. Basically I have a text box and a button which will insert "<b></b>" tags around some text in a text box when its highlighted. So basically it would work like a BB code. I would highly appreciate it if some VB master could tell me. By the way, the code what I need has nothing to do with connection to the internet just a simple code where you highlight some text, click a button and it puts these around the said highlighted text "<b></b>". Cheers all. Nemesis Owt! x _________________ Ally, don't reply to my topics.
Top

Liam 1337 n00b!!!111!!one! Joined: Mon Feb 04, 2008 3:57 am Posts: 2504 Location: Wales	Posted: Mon Nov 10, 2008 6:43 pm Post subject: Re: Help Needed - Depperate!
	Code: Select all `Text1.SelText = "<b>" & Text1.SelText & "</b>"` There. As to your reply on msn. Code: Select all `Private Sub Command1_Click() If Text1.SelText = "" Then MsgBox "Nothing selected!", vbCritical, "Error!" Else Text1.SelText = "<b>" & Text1.SelText & "</b>" End If End Sub`
Top



Display posts from previous: Sort by