" width="663" height="382"> 
</p>
<p>Add code to fill in the time-of-day when the form displays</p>
<ul>
  <li>Right click 
    on the form name in the Project Explorer</li>
  <li>Select &quot;View 
    After Code&quot;</li>
  <li>Enter the 
    following code after the SUB line</li>
</ul>
<pre>
	dim wk as string
	dim t as time
	t = now()
	wk = str(t)
	fldTime.text = wk</pre>
<p align="center">&nbsp;<img border="0" src="images/TT01.11.gif" width="506" height="212"> 
</p>
<ul>
  <li>Close