设计下列程序：

来源：百度知道 编辑：UC知道 时间：2024/06/19 05:21:49
在窗体上设置两个文本框，分别显示当前时间和问候语，0～12时问候语为“早上好！”，12～18时问候语为“下午好！”，18～0时问候语为“晚上好！”。要求写出控件的主要属性和所需事件的代码。
用VB程序编写！

<SCRIPT>
function loaded(){
var dateTime = new Date();
var showDate = dateTime.getYear() + "/" + (dateTime.getMonth() + 1) + "/" + dateTime.getDate() ;

var showTime = "";
var c = ":";

showTime += (dateTime.getUTCHours() + 8) + c;
showTime += dateTime.getUTCMinutes() ;

document.getElementById("showTime").innerText = showDate + " " + showTime;

var wenhou = "早上好";
if((dateTime.getUTCHours() + 8) < 12 ){
wenhou = "早上好"
}
else if((dateTime.getUTCHours() + 8) < 18 ){
wenhou = "下午好"
}else if((dateTime.getUTCHours() + 8) < 24 ){
wenhou = "晚上好"
}
document.getElementById("wenhou").innerText = wenhou;
}
</SCRIPT>
<body onload="loaded()">
<h2>现在时间:<label id="showTime"><