Question

vb中用print 方法输出字符串，怎样用不同的颜色显示这些字符串？

Picture1.CurrentX = 150: Picture1.CurrentY = 480: Picture1.Print "红色曲线代表A物质浓度与时间的关系"
Picture1.CurrentX = 150: Picture1.CurrentY = 440: Picture1.Print "蓝色曲线代表B物质浓度与时间的关系"
Picture1.CurrentX = 150: Picture1.CurrentY = 400: Picture1.Print "绿色曲线代表C物质浓度与时间的关系"
我希望用相应的颜色显示出这三个字符串

Answer 1

Private Sub Command1_Click()
Picture1.CurrentX = 150
Picture1.CurrentY = 680
Picture1.ForeColor = vbRed
Picture1.Print "红色曲线代表A物质浓度与时间的关系"
Picture1.CurrentX = 150
Picture1.CurrentY = 440
Picture1.ForeColor = vbBlue
Picture1.Print "蓝色曲线代表B物质浓度与时间的关系"
Picture1.CurrentX = 150
Picture1.CurrentY = 200
Picture1.ForeColor = vbGreen
Picture1.Print "绿色曲线代表C物质浓度与时间的关系"
End Sub

Answer 2

可以尝试用 label 。。

也可以用api函数。。。