用HTML生成网页

本节内容适合已经掌握HTML的用户，其实不管你是否已经掌握HTML，建议都学习一下，因为：真的很简单！

现在我们将HttpRequest事件代码改为：

Dim sb As New StringBuilder
sb.AppendLine("<form enctype='multipart/form-data' method='post' id='form1' name='form1'>")
sb.AppendLine("产品: <input name='cp' id='cp'><br/><br/>")
sb.AppendLine("客户: <input name='kh' id='kh'><br/><br/>")
sb.AppendLine("雇员: <input name='gy' id='gy'><br/><br/>")
sb.AppendLine("单价: <input type='number' name='dj' id='dj'><br/><br/>")
sb.AppendLine("折扣: <input type='number' name='zk' id='zk' min='0' max='0.15' step='0.01'><br/><br/>")
sb.AppendLine("数量: <input type='number' name='sl' id='sl'><br/><br/>")
sb.AppendLine("日期: <input type='date' name='rq' id='rq'><br/><br/>")
sb.AppendLine("<input Type='submit' name='Sumbit' id='Sumbit' value='确定'>")
sb.AppendLine("</form>")
e.WriteString(sb.ToString)

我们用上面的代码生成了一个表单，在Chorme浏览器中的显示效果为：

即使你完全不懂HTML，看懂上面的代码也没有问题，以下面这一行代码为例：

sb.AppendLine("折扣: <input type='number' name='zk' id='zk' min='0' max='0.15' step='0.01'><br/><br/>")

表示增加一个输入框，输入类型为数字(type='number')，允许最小值为0(min='0')，允许最大值为0.15(max='0.15'),允许输入精度为0.01(step='0.01')，id为zk(id='zk')，name为zk(name='zk')。

在不同的浏览器，上述代码生成的页面会有不同的显示效果，例如对于日期输入框，Chorme可以显示一个下拉 日历供选择，而且你只能输入日期，对于IE来说，这个日期输入框和普通的文本输入框没有任何差别。

教会你HTML不是我的任务，有人干这个我们擅长很多，如果你有兴趣，可以访问：http://www.w3school.com.cn/html/index.asp，通常不会超过半天时间就能基本掌握。