温馨提示×

如何使用VB语言制作一个简单的调查表

发布时间:2022-01-14 18:02:49 来源:亿速云 阅读:84 作者:小新 栏目:大数据

小编给大家分享一下如何使用VB语言制作一个简单的调查表,希望大家阅读完这篇文章之后都有所收获,下面让我们一起去探讨吧!

一、案例要求

我们需要制作一个简单的调查表,要求如下:

1.form1窗体为启动窗体,通过窗体初始化时间将标题初始化为"调查表"。

2.制作窗体界面。

3.点击“上传”按钮,将把输入的“姓名”从form2窗体输出。将其它选中的控件文本输出到form2窗体。

界面如下:

如何使用VB语言制作一个简单的调查表

界面1

如何使用VB语言制作一个简单的调查表

界面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.CaptionEnd If

If Check2.Value = 1 Then    Form2.Print "梦想:" & Check2.CaptionEnd If
If Check3.Value = 1 Then    Form2.Print "梦想:" & Text1.TextEnd 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语言制作一个简单的调查表”有了一定的了解,如果想了解更多相关知识,欢迎关注亿速云行业资讯频道,感谢各位的阅读!

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

免费拨打  400 100 2938 免费拨打 400 100 2938
24小时售后技术支持 24小时售后技术支持
返回顶部 返回顶部