2009-12-15 53 views
0

我是VBA和html的新手,我越來越困惑。如何將html連接成VBA中的字符串?

我想設置一個字符串變量等於幾個連接的html字符串和控制值。我無法弄清楚我做錯了什麼。

這裏是我的代碼:

htmlText = "<HTML><BODY bgcolor=#0b3767> <img height=""71"" width=""500"" alt=""Central Analysis Bureau, Inc. - Know Your Insureds"" src=""http://cabfinancial.com/images/logoEmail.png"">"_ 
     & "<a href=" & txtLink.Value & ">Volume " & txtVolume.Value & " Edition " & txtEdition.Value _ 
     & "</a>" _ 
     & txtHtml.Value & "<a href=""txtLink.Value"">Click here to read the complete article</a>" _ 
     & "</BODY></HTML>" 

htmlText都將是一個字符串。 txtLink,txtVolume,txtEdition,txtHtml都是窗體上的文本框控件。

+0

你想達到什麼目的?什麼讓你感到困惑? – Oded 2009-12-15 15:49:06

+0

那你到底遇到了什麼問題?我在代碼中看到的唯一明顯問題是,在第一行末尾的下劃線之前沒有空格。 – JohnFx 2009-12-15 15:53:10

回答

2

行延續語法在下劃線之前需要一個空格。嘗試在第一行的結尾加上一個空格:

src=""http://cabfinancial.com/images/logoEmail.png"">"_ 

成爲

src=""http://cabfinancial.com/images/logoEmail.png"">" _ 
+0

@JohnFx你對雙引號完全正確。我從來不知道這一點。兩件事情:1)我應該在發佈之前測試代碼,2)當世界上的錯誤是平坦的時候,我在世界上是如何得到+3的?無論哪種方式,我刪除了我的帖子,以避免混淆和誤導。 – 2009-12-15 16:00:35

+0

不用擔心。我不得不收回我的答案。我個人討厭嵌入引號的語法,但它確實有效。 =) – JohnFx 2009-12-15 16:05:52

+0

非常感謝!我剛剛意識到那是我犯的錯誤,並且正要回答我自己的問題......但是你打敗了我吧= ^) – dmr 2009-12-15 16:10:27

0
htmlText = "<HTML><BODY bgcolor='#0b3767'> <img height='71' width='500' alt='Central Analysis Bureau, Inc. - Know Your Insureds' src='http://cabfinancial.com/images/logoEmail.png'>" _ & "<a href='" & txtLink.Value & "'>Volume " & txtVolume.Value & " Edition " & txtEdition.Value _ & "</a>" _ & txtHtml.Value & "<a href='" & txtLink.Value & "'>Click here to read the complete article</a>" _ & "</BODY></HTML>" 
0

我加在你的bgcolor參數雙引號,你的第一個續行字符前加一個空格,加入雙引號和&符號在你的< a href = txtLink.Value >

順便說一句:關於使用&符串連接的好處。有些人使用+的工作,但很混亂。

htmlText = "<HTML><BODY bgcolor=""#0b3767""><img height=""71"" width=""500"" alt=""Central Analysis Bureau, Inc. - Know Your Insureds"" src=""http://cabfinancial.com/images/logoEmail.png"">" _ 
    & "<a href=" & txtLink.Value & ">Volume " & txtVolume.Value & " Edition " & txtEdition.Value _ 
    & "</a>" _ 
    & txtHtml.Value & "<a href=""" & txtLink.Value & """>Click here to read the complete article</a>" _ 
    & "</BODY></HTML>"