- 1、本文档共16页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Vb常用控件-课件
Vb6.0常用控件
教学目标:
知识与技能:VB中三个常用控件—命令按钮、标签、文本框的基本属性,和属性的设置方法
过程与方法:演示法,提问法,操作实践,合作学习
情感态度与价值观:培养学生的审美能力,自主学习的能力,合作学习的能力
教学的重点和难点:
重点与难点:命令按钮、标签、文本框的基本属性及设置方法。
提问:请找出其中两幅图片上的不同点,应用了哪些控件?
常用控件
CommandButton命令按钮
Label标签
TextBox文本框
控件的基本属性
(1) ◆Name(名称)属性
Name是所创建控件的名称。VB在创建控件时自动提供一个缺省名称,如Form1、Command1等。
练习:修改窗体的名称为frmSwap。
设置方法:在属性窗口的“名称”栏设置Name属性。
控件的基本属性
(2) Height、Width、Top、Left属性
Height、Width属性决定控件的宽度和高度。
Top、Left属性决定控件在窗体中的位置。其中Top表示控件距窗体顶部的距离,Left表示控件距窗体左边的距离。
设置方法:在属性窗口的Height、Width 、Top、Left 栏可以设置相应的属性。
练习:修改左边两个标签的大小为500*1200,左边靠近窗体顶部的标签距离顶部2520,距离窗体左边1440,两个标签之间间隔960,计算下面一个标签的left和top分别应该为多少。
控件的基本属性
(3) ◆Font属性
设置控件所显示文字的字体、字型和字号。
设置方法:单击Font属性右侧带有省略号的按钮,可打开一个字体设置对话框,进行相应的设置。
练习:修改左边两个标签显示文字为楷体,斜体,四号
控件的基本属性
(4)◆ BackColor、ForeColor属性
BackColor属性用来设置控件的背景颜色,ForeColor属性用来设置控件的前景颜色,即控件中文字的显示颜色。
设置方法:在属性窗口的BackColor、ForeColor栏可以设置相应的属性。
练习:修改上面两个标签的背景色为浅蓝色,文字颜色为紫色
控件的基本属性
(5) BorderStyle属性
该属性用来设置控件的边框风格。
设置方法:在属性窗口的BorderStyle栏可以设置相应的属性。
练习:修改所有标签的边框风格。
三个常用控件的重要的属性
⑴命令按钮
Caption属性:用于设置命令按钮上显示的文字,如“确定”“结束”等。
练习:修改两个命令按钮的现实文字分别为“交换”,“结束”
三个常用控件的重要的属性
⑵标签
标签控件(Label)通常用来在窗体中显示一些提示信息和注释。标签控件只能显示静态文本,其中的文字内容只能用属性值设置和修改,不能直接在窗体上编辑。
Caption属性:设置标签控件中显示的文本。
Alignment 属性:即对齐属性。缺省值为Left Justify (0),Caption中的文本左对齐;设置为Right Justify (1)时,文本右对齐;设置为Center (2)时,文本居中。
练习:修改窗体的上部两个标签显示文本为x,y,窗体左边两个标签显示文本为“交换前”,“交换后”
三个常用控件的重要的属性
⑶文本框
文本框(TextBox)控件的作用是建立一个文本编辑区域,可在该区域输入、编辑及显示一些信息。
Text 属性:程序执行时,通过键盘在文本框内输入的信息存放在Text 属性中,初始设置一般为空白,以使文本框不显示任何信息。
练习:文本框的初始内容为空白
完善程序
(1)单击“退出”按钮,退出其应用程序
对命令按钮来说,最基本、最重要的事件是Click事件,即鼠标器单击。单击命令按钮时将触发按钮的 Click 事件并调用已写入 Click 事件过程中的代码。
方法:
双击“退出”按钮,打开代码窗口,在其中输入:(红色)
Private Sub cmdtc_Click()
End
End Sub
(2)单击“交换”按钮,在文本框中出现两数交换显示
双击“交换”按钮,打开代码窗口,在其中输入:(红色)
Private Sub Command1_Click()
Dim x As Integer, y As Integer, m As Integer
x = Val(txtsx.Text)
y = Val(txtsy.Text)
m = x: x = y: y = m
txtdx.Text = Str(x)
txtdy.Text = Str(y)
End Sub
完善程序
课后思考
VB程序要正常运行,
控件是设计外观,
程序是灵魂,
程序和控件如何产生关联??
谢谢!!
您可能关注的文档
- Unit4 Where’s my schoolbag Section B(2a-2c)课件.ppt
- Unit4.单元练习.ppt
- Unit4-Where-is-my-car?人教版三年级PEP英语下册第四单元·单元复习、知识梳理、强化练习.ppt
- unit5 text1吕倩 黄小倩 杨前路.ppt
- unit6 Will_people_have_robots赛课课件.ppt
- Unit6WhatDidYouDoLastWeekend教案.doc
- Unit5 There is a big bed(pep五年级上).ppt
- Unit8 If you want to talk, you can go online 第四课时Reading & writing.ppt
- Unit8 Boys like to play football(男生喜欢打球).pptx
- Unit8 The Dragon Boat Festival PPT课件.ppt
文档评论(0)