Results 1 to 7 of 7

Thread: [RESOLVED] Stack

  1. Jan 29th, 2007, 03:16 PM #1
    Jazza
    Jazza is offline

    Thread Starter
    Junior Member
    Join Date
    Jan 2007
    Posts
    25

    Resolved [RESOLVED] Stack

    Hi All,

    I was wondering how i could get the text to stack on top of each other like seen after end select
    The text is getting sent to a rich text box

    VB Code:
    1. Case "test"

    2.        If coding.SelLength > 0 Then

    3.           coding.SelText = "<html>"

    4.           coding.SelText = "<head>"

    5.        coding.SelText = "<TITLE>" & coding.SelText & "</TITLE>"

    6.        Else

    7.           coding.SelText = "<html>"

    8.           coding.SelText = "<head>"

    9.           coding.SelText = "<TITLE>TITLE</TITLE>"

    10.        End If

    11.  
    12. End Select

    13.  
    14. '<head>

    15. '<title></title>

    16. '</head>

    17. '<body bgcolor="#FFFFFF">

    18. '</body>

    19. '</html>

    20. 'Its coming out in a like like this

    21. '<head><title></title></head><body bgcolor="#FFFFFF"></body></html>

    22. 'Its coming out like this

    23. '<head><title></title></head><body bgcolor="#FFFFFF"></body></html>
    Last edited by Jazza; Jan 29th, 2007 at 03:20 PM.
    Reply With Quote Reply With Quote
  2. Jan 29th, 2007, 03:27 PM #2
    davidbishton
    davidbishton is offline
    Addicted Member
    Join Date
    Mar 2006
    Posts
    178

    Re: Stack

    add 'vbCRLF' after each line of text i.e.
    VB Code:
    1. coding.SelText = "<html>" & vbcrlf
    Reply With Quote Reply With Quote
  3. Jan 29th, 2007, 03:34 PM #3
    Jazza
    Jazza is offline

    Thread Starter
    Junior Member
    Join Date
    Jan 2007
    Posts
    25

    Re: Stack

    Perfect!
    Thanks
    Reply With Quote Reply With Quote
  4. Jan 29th, 2007, 03:41 PM #4
    Jazza
    Jazza is offline

    Thread Starter
    Junior Member
    Join Date
    Jan 2007
    Posts
    25

    Re: Stack

    VB Code:
    1. coding.SelText = "<body bgcolor="#FFFFFF">"

    Any idea on how to avoid the syntax error caused by # ?


    Thanks
    Reply With Quote Reply With Quote
  6. Jan 29th, 2007, 04:00 PM #5
    si_the_geek
    si_the_geek is offline
    Super Moderator si_the_geek's Avatar
    Join Date
    Jul 2002
    Location
    Bristol, UK
    Posts
    41,974

    Re: Stack

    It's not caused by the #, it is caused by " (which marks the end of a string)

    The simplest way to put the " character into a string is to double-up like this:
    VB Code:
    1. coding.SelText = "<body bgcolor=[u]""[/u]#FFFFFF[u]""[/u]>"
    (Microsoft MVP from July 2007 to June 2017) . . . . . . . . . . Hitchhiker's Guide to Getting Help at VBForums

    Database Development FAQs/Tutorials (updated May 2011) (includes fixing common DB related errors, and [VB.Net] ADO.Net Tutorial, and [Classic VB] ADO tutorial /further steps)
    other useful DB bits: . Connection strings (alternative copy).•. MDAC/Jet/ACE downloads .•. SQL Server downloads .

    Classic VB FAQs (updated Oct 2010) (includes fixing common VB errors)
    some of my Classic VB bits: . Tutorial: How to automate Excel from VB6 (or VB5/VBA) .•. SQL 'Select' statement formatter/checker .•. Convert colour number to colour name .•. FlexGrid: fill from recordset .•. FlexGrid: AutoSize columns .•. DB Reserved Words checker .
    Reply With Quote Reply With Quote
  7. Jan 29th, 2007, 04:04 PM #6
    Jazza
    Jazza is offline

    Thread Starter
    Junior Member
    Join Date
    Jan 2007
    Posts
    25

    Re: Stack

    OH I see what you are saying

    Thanks that did the trick
    Reply With Quote Reply With Quote
  8. Jan 29th, 2007, 04:35 PM #7
    MartinLiss
    MartinLiss is offline
    Former Admin/Moderator MartinLiss's Avatar
    Join Date
    Sep 1999
    Location
    San Jose, CA
    Posts
    33,431

    Re: Stack

    Everybody has their own style but I think that it's easier to understand (later) what's going on if you do

    VB Code:
    1. Const QUOTE As String = """"

    2.  
    3. MsgBox "<body bgcolor=" & QUOTE & "#FFFFFF" & QUOTE & ">"
    Tips, Examples & Tutorials:
    A valuable forum tool • Generate unique TreeView keys • TreeView with "open" and "closed folder" icons • Time code using GetTickCount • How to trap the Tab key • Scroll a form • NumberBox ActiveX control • Color a ListView row • An InputBox form • How to use SaveSetting and GetSetting • A program registration scheme • Spellcheck a Textbox • Resize controls • Open Windows Explorer at Last Visited Path • A Blackjack Game • Count lines of code • Private Message Viewer • Copy/Paste VB Code • Paste VB Code Add-In • Insert Procedure Names Add-In • A calculator for the game of Spider • My review of REALbasic 2008 • VB6 Debug Tutorial • Picture/Video Viewer • VBF Photo Contest Winners


    2009 - 2016
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width