(Visual Basic 6.0) Markdown to HTML - Full Document, ChatGPT Theme with Code Syntax Highlighting

See more Markdown Examples

Note: This example requires Chilkat v11.2.0 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Dim success As Long
success = 0

success = 0

' Select the pre-defined "ChatGPT" style.
Dim options As New ChilkatJsonObject
success = options.UpdateString("theme","ChatGPT")

' We can also set an option for the max-width, which by default is "72ch".
success = options.UpdateString("ChatGPT.max-width","120ch")

' We can add extra content to the bottom of the HTML head and body sections like this:
' Here we are using the "tomorrow" theme.
success = options.UpdateString("extraHead","<link rel=""stylesheet"" href=""https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/themes/prism-tomorrow.min.css"" />")
success = options.UpdateString("extraBody","<script src=""https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/prism.min.js""></script><script src =""https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/plugins/autoloader/prism-autoloader.min.js""></script>")

Dim sbMarkdown As New ChilkatStringBuilder
Dim sbHtml As New ChilkatStringBuilder

success = sbMarkdown.LoadFile("qa_data/markdown/test1.md","utf-8")
If (success = 0) Then
    Debug.Print sbMarkdown.LastErrorText
    Exit Sub
End If

success = sbMarkdown.MarkdownToHtml(options,sbHtml)
success = sbHtml.ToCRLF()

Debug.Print sbHtml.GetAsString()

' The sample markdown input for this example is identical to the one at Markdown to HTML - Full Document, Raw, where you can view it.

' Sample HTML output as viewed in a browser:

'