- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第03章VB窗体和简单输入输出
第三章 窗体和简单的输入输出;VB的窗体类型;VB的窗体(Form);常量名
;常量名
;常量名
;窗体上的所有控件都是窗体对象的属性元素
引用其它窗体控件(如果是当前窗体,则可省略窗体名)
FormMain.txtName.Text = “Tom”
txtName = “Tom”
窗体和控件坐标
Height,Width计量单位为缇Twip 1英寸=1440Twip
改变窗体的ScaleMode属性可设置为其它计量单位
控件的Top, Left属性是相对窗体的坐标来定义,不是屏幕坐标;窗体的生命周期和事件;创建
Initialize事件;窗体的创建;加载方法: 使用Load命令或自动加载
加载事件: Load事件
此种状态下:
窗体的所有控件都装入内存,但窗体仍未显示;【例】设计程序,使窗体一打开就在屏幕的右下角。
除Left和Top属性以外,窗体没有其它属性来指定窗体位置,虽然“窗体布局”窗口可以设置窗体的启动位置,但为了精确可以用代码来完成 (可以响应Load事件,因为此时界面还未显示):
Private Sub Form_Load ()
Form1.Top = Screen.Height – Form1.Height
Form1.Left = Screen.Width – Form1.Width
End Sub
【提示】Screen是一个全局的系统对象,对应于计算机屏幕,可以直接使用。;可见状态;可见状态的事件;卸载窗体;卸载事件;鼠标事件;键盘事件;窗体的KeyPreview属性;Resize事件;设计多个窗体的应用程序;设置启动窗体;结束应用程序;消息框MsgBox;消息框之消息正文;buttons 指定显示按钮的数目和形式,图标样式,默认按钮等,有以下四组取值:
vbOKOnly, vbOKCancel, vbYesNo, vbRetryCancel….按钮样式
vbCritical,vbQuestion,vbInformation….图标样式
vbDefaultButton1, vbDefaultButton2…..默认按钮
vbApplicationModal, vbSystemModal 强制返回性
Buttons的取值是由每组类型的参数中取一个值,
然后相加;title :可选,对话框的标题,如省略标题则为应用程序名
返回值
vbOK, vbCancel, vbAbort, vbRetry, vbIgnore, vbYes, vbNo
;囤儡劫冬敖南塔窥础萄赖珠俱歉亏栗特颧啡军炳污湍狙园绿吁销绍慧磅酮第03章VB窗体和简单输入输出第03章VB窗体和简单输入输出;BackString=InputBox( prompt [,title] [,default] [,xpos][,ypos][,helpfile, context] )
BackString 对话框中的返回值
prompt 对话框中显示的提示信息,必选项
title 可选,对话框的标题,缺省标题为应用程序名
default 可选,输入文本框中的缺省值
xpos,ypos 对话框与屏幕左边和上边的距离
如:
Dim strName As String
strName = InputBox(“请输入用户名:”, “用户登录”, “manager”, 800, 800); 【例】输入任意一个数字,输出其二次方结果。
Private Sub Form_Click()
Dim num As Integer
num = InputBox(“请输入数字)
Print num * num
End Sub
提示:虽然Print方法是窗体的方法,但在当前窗体下,可以省略窗体名。此外使用Cls方法可以清除窗体;书写代码的规则 ;使用编辑工具栏
您可能关注的文档
最近下载
- 大学东南大学vlsi设计基础数字集成电路_2016vlsi1-课程介绍for mooc.pdf VIP
- 医美网络咨询与沟通(医美咨询师课件).pptx
- 2025中国华电集团有限公司校招+社招笔试参考题库附带答案详解.docx
- 【打印】人教版小学3-6年级英语词汇表.pdf VIP
- 液化气体钢瓶充装前后检查及充装记录.docx VIP
- 2025年高考数学新定义题型:集合下的新定义(四大题型)学生版+解析.pdf VIP
- 科室医疗质量自查工作制度.docx VIP
- 江苏省2017届九年级化学下学期第二次模拟试题.pdf VIP
- 广州市公务车维修项目工时费明细表.pdf VIP
- 内蒙古自治区点石联考2026届高三上学期9月份联合考试政治试卷(含答案).docx VIP
文档评论(0)