一个用vb解答的问题,求高人啊! 10
综合作业名称:控件综合实习完成的内容:一、实习目的1、进一步掌握各个控件的属性应用。2、进一步掌握各个控件的事件、方法的使用。3、进行简单的程序设计,加强程序设计能力。二...
综合作业名称: 控件综合实习
完成的内容:
一、实习目的
1、 进一步掌握各个控件的属性应用。
2、 进一步掌握各个控件的事件、方法的使用。
3、 进行简单的程序设计,加强程序设计能力。
二、实习内容
1、 程序设计
设计一个信息注册的程序,形如网上申请邮箱时需要做的内容。具体画面运行后如图10-1所示。
设计要求:
a、 用到的控件有:标签、文本框、框架、单选按钮、复选框、命令按钮、组合框、图片框、图像框等。
b、 将图片框作为父对象,其它控件作为子对象,如图10-1(运行后的画面)中的标签、文本框等是子对象,对图片框的属性BorderStyle进行设定。
c、 密码的显示使用星号(*)。
d、 ‘学历’采用组合框,其内容在设计间段添加,也可在运行时利用窗体的Load加载,内容有:‘小学、中学、大学、硕士、博士’等。
图 10-1
e、 ‘职业’的做法同上,内容有:‘计算机业、金融业、商业、服务业、教育业、工程师、政府机关、经理、主管、个体业’等。
f、 点击‘取消’按钮使画面内的所有选择、输入的信息都清空。
g、 点击标签‘代表作品’后,在其下面的图像框内按照图像框设定的大小填充一幅图,此时注意属性设置。
h、 点击‘确定’按钮显示如图10-2的画面,将你输入的、选择的信息显示在文本框中。
图 10-2
i、 点击‘返回’又回到图10-1的画面。
j、 程序的实现采用单窗体,实现时首先建立如图10-3的画面,然后将其控件属性进行设置,建立如图10-4的画面。
图10-3
图 10-4
三.实验代码
用到的部分代码如下:
Private Sub Command1_Click()
……
Text3.Text = Label1.Caption + " :" + Text1.Text + Chr(13) + Chr(10)
Text3.Text = Text3.Text + Label2.Caption + " :" + Text2.Text + Chr(13) + Chr(10)
If Option1.Value Then Text3.Text = Text3.Text + Label3.Caption + " :" + Option1.Caption + Chr(13) + Chr(10)
If Option2.Value Then Text3.Text = Text3.Text + Label3.Caption + " :" + Option2.Caption + Chr(13) + Chr(10)
If Not (Option1.Value Or Option2.Value) Then Text3.Text = Text3.Text + Label3.Caption + " :" + Chr(13) + Chr(10)
If Combo1.ListIndex <> -1 Then
Text3.Text = Text3.Text + Label6.Caption + " :" + Combo1.Text + Chr(13) + Chr(10)
Else
Text3.Text = Text3.Text + Label6.Caption + " :" + Chr(13) + Chr(10)
End If
If Combo2.ListIndex <> -1 Then
Text3.Text = Text3.Text + Label4.Caption + " :" + Combo2.Text + Chr(13) + Chr(10)
Else
Text3.Text = Text3.Text + Label4.Caption + " :" + Chr(13) + Chr(10)
End If
Text3.Text = Text3.Text + Label5.Caption + " :" + Chr(13) + Chr(10)
If Check1.Value Then Text3.Text = Text3.Text + " " + Check1.Caption + Chr(13) + Chr(10)
If Check2.Value Then Text3.Text = Text3.Text + " " + Check2.Caption + Chr(13) + Chr(10)
……
End Sub
上面省略号表示需要你补充的代码位置。
解决的问题:
1.巩固命令按钮等标准控件的应用。
2.巩固输入框和消息框的应用。
3.理解并掌握各种标准化方法的算法。
4.理解并掌握了程序结构的格式、功能及应用。
思考与讨论:
1.
2.
3. 展开
完成的内容:
一、实习目的
1、 进一步掌握各个控件的属性应用。
2、 进一步掌握各个控件的事件、方法的使用。
3、 进行简单的程序设计,加强程序设计能力。
二、实习内容
1、 程序设计
设计一个信息注册的程序,形如网上申请邮箱时需要做的内容。具体画面运行后如图10-1所示。
设计要求:
a、 用到的控件有:标签、文本框、框架、单选按钮、复选框、命令按钮、组合框、图片框、图像框等。
b、 将图片框作为父对象,其它控件作为子对象,如图10-1(运行后的画面)中的标签、文本框等是子对象,对图片框的属性BorderStyle进行设定。
c、 密码的显示使用星号(*)。
d、 ‘学历’采用组合框,其内容在设计间段添加,也可在运行时利用窗体的Load加载,内容有:‘小学、中学、大学、硕士、博士’等。
图 10-1
e、 ‘职业’的做法同上,内容有:‘计算机业、金融业、商业、服务业、教育业、工程师、政府机关、经理、主管、个体业’等。
f、 点击‘取消’按钮使画面内的所有选择、输入的信息都清空。
g、 点击标签‘代表作品’后,在其下面的图像框内按照图像框设定的大小填充一幅图,此时注意属性设置。
h、 点击‘确定’按钮显示如图10-2的画面,将你输入的、选择的信息显示在文本框中。
图 10-2
i、 点击‘返回’又回到图10-1的画面。
j、 程序的实现采用单窗体,实现时首先建立如图10-3的画面,然后将其控件属性进行设置,建立如图10-4的画面。
图10-3
图 10-4
三.实验代码
用到的部分代码如下:
Private Sub Command1_Click()
……
Text3.Text = Label1.Caption + " :" + Text1.Text + Chr(13) + Chr(10)
Text3.Text = Text3.Text + Label2.Caption + " :" + Text2.Text + Chr(13) + Chr(10)
If Option1.Value Then Text3.Text = Text3.Text + Label3.Caption + " :" + Option1.Caption + Chr(13) + Chr(10)
If Option2.Value Then Text3.Text = Text3.Text + Label3.Caption + " :" + Option2.Caption + Chr(13) + Chr(10)
If Not (Option1.Value Or Option2.Value) Then Text3.Text = Text3.Text + Label3.Caption + " :" + Chr(13) + Chr(10)
If Combo1.ListIndex <> -1 Then
Text3.Text = Text3.Text + Label6.Caption + " :" + Combo1.Text + Chr(13) + Chr(10)
Else
Text3.Text = Text3.Text + Label6.Caption + " :" + Chr(13) + Chr(10)
End If
If Combo2.ListIndex <> -1 Then
Text3.Text = Text3.Text + Label4.Caption + " :" + Combo2.Text + Chr(13) + Chr(10)
Else
Text3.Text = Text3.Text + Label4.Caption + " :" + Chr(13) + Chr(10)
End If
Text3.Text = Text3.Text + Label5.Caption + " :" + Chr(13) + Chr(10)
If Check1.Value Then Text3.Text = Text3.Text + " " + Check1.Caption + Chr(13) + Chr(10)
If Check2.Value Then Text3.Text = Text3.Text + " " + Check2.Caption + Chr(13) + Chr(10)
……
End Sub
上面省略号表示需要你补充的代码位置。
解决的问题:
1.巩固命令按钮等标准控件的应用。
2.巩固输入框和消息框的应用。
3.理解并掌握各种标准化方法的算法。
4.理解并掌握了程序结构的格式、功能及应用。
思考与讨论:
1.
2.
3. 展开
3个回答
展开全部
看着感觉难度不大,不过木有时间一个一个搞哦,最近手头上活很多啊。还有,能否告知每个text、caption、label、option控件对应的内容,要不怎么增加啊?
追问
本来有图的,找不到了,不过最终抄同学的了。。。已经做完了,谢谢你
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
好多问题,慢慢来
更多追问追答
追问
额,那你能做出来吗?一个一个的,谢谢了
追答
就是做一个录入人员简历的界面而以?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
速度回答 你VB水平 是一点也不会 还是……
追问
上课没听过,啥都不会
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询