VB.NET

Implement Preprocessor #include with StringBuilder

Demonstrates how to implement #include with a Chilkat StringBuilder. VB.NET

' First build a string that has a preprocessor include
Dim sbSrc As New Chilkat.StringBuilder
sbSrc.Append("1" & vbCrLf & "2" & vbCrLf & "3" & vbCrLf)
sbSrc.Append("#include <qa_data/txt/helloWorld.txt>" & vbCrLf)
sbSrc.Append("4" & vbCrLf & "5" & vbCrLf)

Debug.WriteLine(sbSrc.GetAsString())

' sbSrc contains:
' 	1
' 	2
' 	3
' 	#include <qa_data/txt/helloWorld.txt>
' 	4
' 	5


' The qa_data/txt/helloWorld.txt file contains "Hello World!"


Dim filePath As String = sbSrc.GetAfterBetween("#include","<",">")
If (sbSrc.LastMethodSuccess <> True) Then
    Debug.WriteLine("No #include's found.")
    Exit Sub
End If


Debug.WriteLine("filePath: " & filePath)

' Load the contents of the filePath
Dim sbIncludeFile As New Chilkat.StringBuilder
sbIncludeFile.LoadFile(filePath,"utf-8")

' Replace the first occurrence of #include <...> line with the contents of the include file.
sbSrc.ReplaceAllBetween("#include",">",sbIncludeFile.GetAsString(),True)

Debug.WriteLine(sbSrc.GetAsString())

' sbSrce now contains:
' 	1
' 	2
' 	3
' 	Hello World!
' 	4
' 	5