十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!
胶州网站制作公司哪家好,找创新互联建站!从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设等网站项目制作,到程序开发,运营维护。创新互联建站于2013年开始到现在10年的时间,我们拥有了丰富的建站经验和运维经验,来保证我们的工作的顺利进行。专注于网站建设就选创新互联建站。
一、案例要求
我们需要制作一个简单的调查表,要求如下:
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
看完了这篇文章,相信你对“如何使用VB语言制作一个简单的调查表”有了一定的了解,如果想了解更多相关知识,欢迎关注创新互联行业资讯频道,感谢各位的阅读!