本节我们通过一个案例进行学习。
一、案例要求
我们需要制作一个简单的调查表，要求如下：
1.form1窗体为启动窗体，通过窗体初始化时间将标题初始化为"调查表"。
2.制作窗体界面。
3.点击“上传”按钮，将把输入的“姓名”从form2窗体输出。将其它选中的控件文本输出到form2窗体。
界面如下：
界面1
界面2
二、知识要求
这里可能遇到的问题是不同窗体之间数据的传递问题。
那么，如何在form1中去改变form2的标题？
form2.caption="这里是要改变的内容"
需要补充的符号运用：
&符号的作用：将字符串类型的数据进行连接
;符号的作用：也是连接字符串，且会把下一行的print输出内容连接起来
提问：如何使得窗体居中显示？
1.选中form窗体
2.在属性中找到StartUpPosition属性选择2-屏幕中心
复选框checkbox
- 设置文本：caption属性
- 设置是否选中：value属性
value属性的值：0代表没有选中，1代表选中，2代表强制选中
单选框optionbutton
- 设置文本：caption属性
- 判断是否选中：value属性
value属性的值：true表示选中，false表示没有选中
本节知识form1窗体源代码：
Private Sub Command1_Click() Form2.Show Form2.Caption = Text2.Text & "的调查表" Form2.Print "姓名：" & Text2.Text '梦想 If Check1.Value = 1 Then Form2.Print "梦想：" & Check1.Caption End If If Check2.Value = 1 Then Form2.Print "梦想：" & Check2.Caption End If If Check3.Value = 1 Then Form2.Print "梦想：" & Text1.Text End If '性别 If Option1.Value = True Then Form2.Print "性别：" & Option1.Caption End If If Option2.Value = True Then Form2.Print "性别：" & Option2.Caption End If End Sub Private Sub Form_Load() '作者：刘金玉 '初始化form1窗体标题 Form1.Caption = "调查表" End Sub
