如何使用VB语言制作一个简单的调查表
发表于:2024-11-11 作者:千家信息网编辑
千家信息网最后更新 2024年11月11日,小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!一、案例要求我们需要制作一个简单的调查表,要求如下:1.form1窗体为启动窗体,
千家信息网最后更新 2024年11月11日如何使用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.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语言制作一个简单的调查表"有了一定的了解,如果想了解更多相关知识,欢迎关注行业资讯频道,感谢各位的阅读!
窗体
属性
调查表
调查
制作
梦想
界面
代表
性别
文本
标题
知识
符号
输出
语言
作用
内容
姓名
字符
字符串
数据库的安全要保护哪些东西
数据库安全各自的含义是什么
生产安全数据库录入
数据库的安全性及管理
数据库安全策略包含哪些
海淀数据库安全审计系统
建立农村房屋安全信息数据库
易用的数据库客户端支持安全管理
连接数据库失败ssl安全错误
数据库的锁怎样保障安全
滁州游戏服务器价格如何计算
汇丰软件开发值得去吗
供应链网络安全专项检查
某高校教室管理系统的数据库设计
服务器怎样封用户ip
如何定义数据库表修改数据库
大数据数据库查询
数据库在线管理
软件开发宋成董事长
逊克软件开发工具
服务器不花钱的图片存储方案
vfp数据库字段规则
成都哎媲媲网络技术
山西千汇网络技术有限公司
国际版应用用什么服务器
提升全民意识维护网络安全
知影服务器
和平精英苹果服务器是什么
液晶电视软件开发工具
通信软件可以不通过服务器吗
网络安全对安全感
网络安全法宣传周手抄报图片
储存数据库的简单命令
逊克软件开发工具
监听数据库启动
学校网络安全应急预案博客
PAG服务器
泰拉瑞亚能不能开服务器
如何在混乱服务器中生存下去
上海交通银行软件开发中心工资