Question

VB中Print的内容怎样带格式？

Answer 1

不知道你所说的Print的内容是不是指用Print函数输出的内容，所谓的格式是不是输出内容的格式？

追问

每次输出的内容只能是宋体、字号是12左右、黑色、常规字体，可是能不能输出为黑体、字号是20、红色、加粗字体？多谢

追答

Option Explicit

Private Sub Command1_Click()
Print "这里输入输出的内容"
End Sub

Private Sub Form_Load()
With Me
.FontName = "黑体"
.FontSize = 20
.ForeColor = vbRed
.FontBold = True
End With
End Sub

在Vb中Print方法是输出在窗体上的。所以想要改变输出的字体之类的属性只需要更改窗体的字体属性就可以了。

追问

谢谢你，可是我怎么输出“123”为红色字体，“456”为绿色字体？多谢多谢！

追答

Private Sub Command1_Click()
Print "123"
Me.ForeColor = vbGreen
Print "456"
End Sub

Private Sub Form_Load()
With Me
.FontName = "黑体"
.FontSize = 20
.ForeColor = vbRed
.FontBold = True
End With
End Sub