《VISUAL BASIC 2010入门经典》例题出现编译错误如何解决？

[qingchenggongfu]

Public Class DateDemo

Private Sub btnShowDate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnShowDate.Click

'
Dim dteResults As Date

'
dteResults = Now

'
MessageBox.Show(dteResults.ToString, "Date Demo")

'运行提示错误，目前不知道问题出在哪里？
'无法为字符“'”找到匹配的引号字符。
MessageBox.Show(dteResults.ToLongDateString, "Date Demo")
MessageBox.Show(dteResults.ToShortDateString, "Date Demo")

'
MessageBox.Show(dteResults.ToLongTimeString, "Date Demo")
MessageBox.Show(dteResults.ToShortTimeString, "Date Demo")
End Sub
End Class
-----------------------------------------
红字以下就编译错误，系统用win7-64中文版，vb2010中文旗舰版，问题出在哪里。
窗体上只有一个名为“btnShowDate”的Button控件。

[水哥阿乐]

你这个代码完全没有问题，确实还有问题，你得看一下你的VS和系统

[qingchenggongfu]

这是我系统时间格式，不知是不是这里的问题。

[qingchenggongfu]

谢谢版主的回答，我自己调整了一下系统时间格式就可以编译了。

[VB.Net]

引用 3 楼 qingchenggongfu 的回复:

谢谢版主的回答，我自己调整了一下系统时间格式就可以编译了。

可以使用format。 我的vb.net教程中有讲到，请参看： http://blog.csdn.net/uruseibest/article/details/63266525

[threenewbee]

你要用英文半角的引号。