/li>
</ul>
<pre>
	Dim s as string
	Dim d as date
	d=today()
	s=str(d)</pre>
<ul>
  <li>Change the 
    MsgBox statement to be</li>
</ul>
<pre>
	MsgBox &quot;Today is &quot; + s </pre>
<p align="center">&nbsp;<img border="0" src="images/TT01.7.gif" width="413" height="209"> 
</p>
<ul>
  <li>Close the 
    code window.</li>
  <li>Compile.</li>
  <li>Test using 
    the POSE or download as done earlier in the tutorial.</li>
  <li>When you 
    run, the message displayed should be 
    <p