如何使用VB语言制作一个简单的调查表
发表于:2026-11-03 作者:千家信息网编辑
千家信息网最后更新 2026年11月03日,小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!一、案例要求我们需要制作一个简单的调查表,要求如下:1.form1窗体为启动窗体,
千家信息网最后更新 2026年11月03日如何使用VB语言制作一个简单的调查表
小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!
一、案例要求
我们需要制作一个简单的调查表,要求如下:
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.ShowForm2.Caption = Text2.Text & "的调查表"Form2.Print "姓名:" & Text2.Text'梦想If Check1.Value = 1 ThenForm2.Print "梦想:" & Check1.CaptionEnd IfIf Check2.Value = 1 ThenForm2.Print "梦想:" & Check2.CaptionEnd IfIf Check3.Value = 1 ThenForm2.Print "梦想:" & Text1.TextEnd If'性别If Option1.Value = True ThenForm2.Print "性别:" & Option1.CaptionEnd IfIf Option2.Value = True ThenForm2.Print "性别:" & Option2.CaptionEnd IfEnd SubPrivate Sub Form_Load()'作者:刘金玉'初始化form1窗体标题Form1.Caption = "调查表"End Sub
看完了这篇文章,相信你对"如何使用VB语言制作一个简单的调查表"有了一定的了解,如果想了解更多相关知识,欢迎关注行业资讯频道,感谢各位的阅读!
窗体
属性
调查表
调查
制作
梦想
界面
代表
性别
文本
标题
知识
符号
输出
语言
作用
内容
姓名
字符
字符串
数据库的安全要保护哪些东西
数据库安全各自的含义是什么
生产安全数据库录入
数据库的安全性及管理
数据库安全策略包含哪些
海淀数据库安全审计系统
建立农村房屋安全信息数据库
易用的数据库客户端支持安全管理
连接数据库失败ssl安全错误
数据库的锁怎样保障安全
互联网络科技
博彦科技互联网金融
北京路客互联网科技有限公司
互联网科技会
金融科技还是互联网
互联网 科技公司
互联网科技作文
互联网科技的英文
壕鑫互联网络科技
西安互联网科技公司
互联网科技宣传片
成都互联网科技公司100强
互联网企业和科技型企业
茂名市互联网科技产业园
国大互联网教育科技有限公司工作
翼展科技 首家互联网医院
伍佰万互联网科技怎么赚钱
互联网科技实习生岗位
西安有哪些互联网高科技企业
长沙易易互联网科技有限公司
互联网科技股
互联网的科技
互联网科技卖菜
奇酷互联网科技
互联网未来科技
互联网金融科技创新
2021互联网科技公司排名
福仕德教育科技互联网
如何强化互联网金融科技
株洲百竞科技的互联网营销顾问