Question

vb改print后的字体

Print Text1 + "：欢迎使用我的第一个vb程序"

我想改变打印出字体的大小，并且居中

Answer 1

Private Sub Form_Load()
Dim s As String
s = Text1.Text & "：欢迎使用我的第一个vb程序"
Me.Font.Size = 12 '任意你想要的字体大小
Me.CurrentX = (Me.ScaleWidth - Me.TextWidth(s)) / 2 '居中显示
Me.CurrentY = 200 '任意你想设置的离窗口顶部的距离，不要这一句代码就是默认为0
Me.Print s
End Sub

追问

厉害，可以加下qq吗

追答

我只会简单的，高级的就不会拉。你留下你Q我加你吧

追问

752959166