Excel VBA设置图表标题时换行出现多余空行的问题求助

我最近用VBA写了一段生成图表的代码，在设置图表标题的时候碰到了个棘手的问题，想请各位帮忙看看。

设置标题的代码我是这么写的：

.title = studentname & vbCrLf & "Grades on test X"

我原本想要的标题效果是这样的：

John Smith

Grades on test X

但实际运行后，标题中间多了一行空行，变成了这个样子：

John Smith

Grades on test X

我找ChatGPT问过，但没解决问题，现在实在不知道该怎么调整了，有没有朋友遇到过类似的情况，能给点思路吗？

备注：内容来源于stack exchange，提问作者hellofriends