新建表单myform001，在表单上添加四个标签（Label1、Label2、Label3、Label4）

第三个标签按照你的意思应该是“周长”吧

Private

Sub

Command1_Click()

Text3.Text

=

(Val(Text1.Text)

+

Val(Text2.Text))

*

2

End

Sub

Private

Sub

Form_Load()

Me.Caption

=

"计算四边形周长"

Label1.Caption

=

"长"

Label2.Caption

=

"宽"

Label3.Caption

=

"周长"

End

Sub

HTML <form>标签

定义和用法

<form>标签用于为用户输入创建 HTML 表单。

表单能够包含 input 元素，比如文本字段、复选框、单选框、提交按钮等等。

表单还可以包含 menus、textarea、fieldset、legend 和 label 元素。

表单用于向服务器传输数据。

提示和注释

注释：form 元素是块级元素，其前后会产生折行。

例子

<form action="form_action.asp" method="get">

<p>First name: <input type="text" name="fname" /></p>

<p>Last name: <input type="text" name="lname" /></p>

<input type="submit" value="Submit" />

</form>

TIY

HTML 与 XHTML 之间的差异

NONE

必需的属性

属性 值 描述 DTD

action URL 规定当提交表单时，向何处发送表单数据。 STF

可选的属性

属性 值 描述 DTD

accept MIME_type 规定通过文件上传来提交的文件的类型。 STF

accept-charset charset 服务器处理表单数据所接受的字符集。 STF

enctype MIME_type 规定表单数据在发送到服务器之前应该如何编码。 STF

method get

post

规定如何发送表单数据。 STF

name name 规定表单的名称。 TF

target _blank

_parent

_self

_top

framename

规定在何处打开 action URL。 TF

标准属性

id, class, title, style, dir, lang, xml:lang如需完整的描述，请访问标准属性。

事件属性

onsubmit, onreset, onclick, ondblclick, onmousedown, onmouseup,

onmouseover, onmousemove, onmouseout, onkeypress, onkeydown, onkeyup如需完整的描述，请访问事件属性。

TIY 实例

文本域(Text fields)

本例演示如何在HTML页面创建文本域。用户可以在文本域写入文本。

密码域

本例演示如何创建HTML的密码域。

复选框

本例演示如何在HTML页中创建文本框。用户可以选中或取消选取复选框。

单选按钮

本例演示如何在HTML中创建单选按钮。

简单的下拉列表

本例演示如何在HTML页面中创建简单的下拉列表框。下拉列表框是一个可选列表。

另一个下拉列表

本例演示如何创建一个简单的带有预选值的下拉列表。（注：预选值指预先指定的首选项。）

文本域(Textarea)

本例演示如何创建一个文本域（多行文本输入控制）。用户可以在文本域中写入文本。在文本域中，可写入的字符字数不受限制。

创建按钮

本例演示如何创建按钮。你可以对按钮上的文字进行自定义。

围绕数据的Fieldset

本例演示如何在数据周围绘制一个带标题的框。

带有输入框和确认按钮的表单

本例演示如何向页面添加表单。此表单包含两个输入框和一个确认按钮。

带有复选框的表单

此表单包含两个复选框和一个确认按钮。

带有单选按钮的表单

此表单包含两个单选框和一个确认按钮。

从表单发送电子邮件

此例演示如何从表单发送电子邮件。

---