Vb.net中打印文档的文本对齐

我尝试了下面的代码，但它对我不起作用

Dim pen1 As New Pen(Color.Black, 1)
Dim point1 As New Point(230, 420) 
Dim point2 As New Point(800, 420) 

e.Graphics.DrawString("This is to certify that", New Font("Arial", 8, FontStyle.Regular), Brushes.Black, 120, 405)
e.Graphics.DrawString(TextBox33.Text + " " + TextBox39.Text + " " + TextBox38.Text + " " + TextBox37.Text, New Font("Arial", 10, FontStyle.Bold), Brushes.Black, 350, 400)
e.Graphics.DrawLine(pen1, point1, point2)

---

没有什么不起作用的。在任何情况下，你都有一个期望和一个实际的结果。您需要向我们解释您的期望是什么，以及实际结果与期望有何不同。期望我们从实际无法实现的代码中了解您想要实现的是什么，这真的合理吗？简言之，始终对问题提供完整、清晰的解释，而不是尽可能少的文字。如果您的应用程序带有名为

TextBox39

的控件，则说明您的应用程序不好。始终为所有内容提供描述性名称，除非它在上下文中的作用非常明显，例如循环计数器的

i

。您应该始终使用

&

而不是

+

来连接字符串，并且您也不应该连接两个或三个以上的字符串。您应该熟悉

String.Format

方法，以及在VB 2015和更高版本中的字符串插值，例如

$“{TextBox33.Text}{TextBox39.Text}{TextBox38.Text}{TextBox37.Text}”

。