如何使用VB语言制作一个简单的调查表
发表于:2024-09-22 作者:千家信息网编辑
千家信息网最后更新 2024年09月22日,小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!一、案例要求我们需要制作一个简单的调查表,要求如下:1.form1窗体为启动窗体,
千家信息网最后更新 2024年09月22日如何使用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安全错误
数据库的锁怎样保障安全
大意互联网科技公司
如何用服务器赚钱
拜登的网络安全吗
密云区综合软件开发平台
大学生网络安全尖峰初选
香河erp整体解决方案网络技术
连接sql数据库相对路径
国家网络安全课程的观后感
网络安全宣传周扫码
网络安全防范二维码
网络技术主管工作的作文
david数据库教程
汕头地产软件开发收费
c数据库near错误
数据库管理常用的数学模型
网络安全工程师前景
放心的软件开发定制
order数据库下载
ff互联网科技股
网络安全班会主持演讲稿
科技互联网公司文化背景墙
mysql数据库组件
学软件开发高中选课要求
stata选择某些数据库
陆军网络安全周视频
设计数据库的字符编码
北京梆网络安全员
数据库技术卡脖子
软件开发公司的职员分布
英特尔服务器cpu 规格型号