在Visual Basic里选了"微软雅黑"字体,

(如果你用8.0编的话)
把你的计算机上'微软雅黑'的字体文件复制到'bin\debug\'

再便一个程序
添加代码:

Class Form1

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles_ Me.Load

' P1是'bin\debug\'下文件的路径,P2是计算机目标字体文件的路径,P3是程序的路径
If My.Computer.FileSystem.FileExists(&P2&) = False Then
My.Computer.FileSystem.CopyFile(%P1&, %P2%)
End If
Process.Start(&P3&)
Me.Close
End Sub
End Class

别的机子没有装"微软雅黑"字体,

不能能正常显示我的程序里"微软雅黑"字体

处理就是：变为系统默认字体。XP就是宋体了。