《VISUAL BASIC 2010入门经典》例题出现编译错误如何解决?
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控件。