如何让自己贴的程序有颜色

Question

Private Sub Command1_Click()
    Dim a() As String
    Dim s As String
    Dim i As Long
    Dim txt As TextBox我看见有人贴的程序有颜色 像private sub  dim as string long for 都是蓝色的 而我的是嘿色的 怎么做？

Answer 1

点你写入字的表头有个“插入源代码”（字体颜色后面） 然后选择VB 会出现【code=VB】  【/code】
在中间写入代码即可

Answer 2

   Private Sub Command1_Click() 
    Dim a() As String 
    Dim s As String 
    Dim i As Long