Когато работите с низове във VBA, използвайте vbNewLine, vbCrLf или vbCR, за да вмъкнете прекъсване на ред / нов параграф.
Тази статия също ще обсъди как да използвате използването на символа за продължаване на ред, за да продължите изявление във вашия действителен VBA код на нов ред.
Използване на vbNewLine
Следният код ви показва как бихте използвали vbNewLine, за да поставите втория текстов низ на нов ред в прозореца Непосредствен:
| 1234567891011 | Под използване на vbNewLine ()Dim StringOne As StringDim StringTwo As StringStringOne = "Това е String One"StringTwo = "Това е втори низ"Debug.Print StringOne & vbNewLine & StringTwoEnd Sub |
Резултатът е:
Използване на vbCrLf
Следният код ви показва как бихте използвали vbCrLf, за да поставите втория текстов низ на нов ред във форма:
| 123456789101112131415 | Под използване на vbCrLf ()Dim StringOne As StringDim StringTwo As StringStringOne = "Това е String One"StringTwo = "Това е втори низ"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50). ИзберетеС избор.Characters.Text = StringOne & vbCrLf & StringTwoКрай сEnd Sub |
Резултатът е:
Използване на vbCR
Следният код ви показва как бихте използвали vbCR, за да поставите втория текстов низ на нов ред в полето за съобщение:
| 1234567891011 | Sub Използване vbCR ()Dim StringOne As StringDim StringTwo As StringStringOne = "Това е String One"StringTwo = "Това е втори низ"MsgBox StringOne & vbCr & StringTwoEnd Sub |
Резултатът е:
Продължаване на изявление във VBA
Можете да използвате знака за продължаване на реда („_“, известен още като долната черта), за да продължите изявление от един ред на следващ във вашия VBA код. Следният код ви показва как да използвате знака за продължаване на реда:
| 12345 | Sub LineContinuation ()Ако Range ("b1"). Стойност> 0 Тогава _Range ("c1"). Value = "Greater Than Zero"End Sub |
