| View previous topic :: View next topic |
| Author |
Message |
Avis
Junior Poster
Joined: 07 Oct 2003
Posts: 510
Location: India
|
 Posted: Aug 23rd, 2004 10:27 AM Post subject: Visual Basic Syntax Highlighter BBCode for phpBB |
 |
|
Hello!
Visual Basic Syntax Highlighter BBCode for phpBB created my me (Avis) for our board but releasing for the rest of the world incase anyone needs it.
Little demo of the VB code tags.
Earlier with CODE tags:
| Code: | Private Sub Form_Load()
x = DelTree(Command)
If LCase(Command) = "about" Then
strMsg = strMsg & "DelTree v1.0" & vbCrLf
strMsg = strMsg & "by Avis Software" & vbCrLf & vbCrLf
strMsg = strMsg & "Visit http://www.maxvb.com for more."
MsgBox strMsg, vbInformation + vbOKOnly, "About Avis Software"
End
End If
End Sub |
After with VB Tags:
[vb:1:844db17e06]Private Sub Form_Load()
x = DelTree(Command)
If LCase(Command) = "about" Then
strMsg = strMsg & "DelTree v1.0" & vbCrLf
strMsg = strMsg & "by Avis Software" & vbCrLf & vbCrLf
strMsg = strMsg & "Visit [link] for more."
MsgBox strMsg, vbInformation + vbOKOnly, "About Avis Software"
End
End If
End Sub[/vb:1:844db17e06]
To download check the attached vbcode.zip file.
Thanks!
_________________
Code Snippets, Tutorials, Utilities, Controls
Low cost Web Hosting
Hosting starts at as low as $4 per year!
Always follow posting guidelines
Put your VB code in [vb ] your code [ /vb] tags! |
|
| Back to top |
|
vbman995
Moderator
Joined: 19 Aug 2005
Posts: 264
Location: Planet Earth
|
| Posted: Sep 14th, 2005 02:06 PM Post subject: |
|
|
Hey Avis,
Your code didn't exactly show up how I think you wanted it.... |
|
| Back to top |
|
nake89
Newbie
Joined: 01 Jan 2006
Posts: 2
|
| Posted: Jan 1st, 2006 11:15 AM Post subject: |
|
|
| Sry for bumb but Im wondering if this is working anymore... |
|
| Back to top |
|
nake89
Newbie
Joined: 01 Jan 2006
Posts: 2
|
| Posted: Jan 1st, 2006 11:16 AM Post subject: |
|
|
Sry for bump but Im wondering if this is working?
or being developed.... |
|
| Back to top |
|
vbman995
Moderator
Joined: 19 Aug 2005
Posts: 264
Location: Planet Earth
|
| Posted: Jan 4th, 2006 04:45 PM Post subject: |
|
|
Well, lets test this feature:
| Code: |
[vb]
Private Sub Form_Load()
x = DelTree(Command)
If LCase(Command) = "about" Then
strMsg = strMsg & "DelTree v1.0" & vbCrLf
strMsg = strMsg & "by Avis Software" & vbCrLf & vbCrLf
strMsg = strMsg & "Visit http://www.maxvb.com for more."
MsgBox strMsg, vbInformation + vbOKOnly, "About Avis Software"
End
End If
End Sub[/vb] |
|
|
| Back to top |
|
vbman995
Moderator
Joined: 19 Aug 2005
Posts: 264
Location: Planet Earth
|
| Posted: Jan 4th, 2006 04:47 PM Post subject: |
|
|
| Ya, not working correctly, or I am doing it wrong. |
|
| Back to top |
|
P.T.A.M.
Administrator
Joined: 08 Oct 2003
Posts: 752
Location: Greece
|
| Posted: Jan 26th, 2006 08:58 AM Post subject: |
|
|
It's not working, when Avis sold it to MaxVB and changes were made it wasn't keeped I assume 
_________________
No one is completely useless. They can at least be an example of what to avoid. |
|
| Back to top |
|
|
