VB变压器优化设计分析-2.pptVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VB变压器设计程序分析(2) 窗体与控件 目 录 一)VB的对象、属性、事件和方法   二)窗体 三)窗体常用方法 四)控件 五)常用控件——文本框 六)常用控件——组合框 七)常用控件——框架、选项按钮 八)常用控件——用列表框浏览数据 九)常用控件——文件列表框 VB变压器设计程序分析(2) 一)VB的对象、属性、事件和方法 1. 对象Object 如窗体(Form)、控件(Control)、菜单、屏幕(Scree)、立即窗口(Debug)、打印机、其他Windows应用程序(如:Word、Exced、AutoCAD)  2.属性 属性是对象的特征。设置属性的方法有两种: 直接在属性栏设置; 在程序中设置。其语法为: 对象 . 属性=属性值(或表达式) VB变压器设计程序分析(2) 例:在程序中设置文本框Text43的属性,在其后按下“.”后程序自动出现它的属性列表,供选择录入: VB变压器设计程序分析(2) 3.事件 事件是可被对象识别的动作,如单击鼠标、加载或卸载窗体等。控件的事件过程的语法为: 控件名_事件名 如:Command1_Click VB变压器设计程序分析(2) 4.方法 对象可调用的过程称为方法,对象用方法来执行动作。其语法为: 对象 . 方法 如果要保存方法的返回值,则需将参数括起来, 如:Picture=Clipboard.GetDATA(vbCFBitmap) 如果没有返回值,则参数不需括起来, 如:List1.AddItem“姓名” VB变压器设计程序分析(2) 二)窗体 VB变压器设计程序分析(2) 1.设置启动窗体 点击“工程”,打开“project属性”,在“通用”栏“启动对象”中选中所需窗体名。本例中启动窗体为Form1。 VB变压器设计程序分析(2) 2.装载窗体 在窗体(Form)的Load过程中,将初始内容载入窗体。当打开此窗体时,程序首先运行Load事件,显示初始载入的内容。 VB变压器设计程序分析(2) 3.窗体转换 例如将窗体转换到Form3,使用下列语句: Form3.Show 4.隐藏窗体 Form3. Hide 5.关闭窗体 Unload Me VB变压器设计程序分析(2) 三)窗体常用方法 Show 显示一个窗体 Hide 隐藏窗体,但不卸载 Refresh 重绘窗体 Print Line Circle 直接在窗体上写文字和画图形 Unload Me ——关闭窗体( Me 指当前窗体) VB变压器设计程序分析(2) 四)控件 VB中的控件很多,如右图所示。还可以通过单击[工程]→[部件]获得外部控件。 VB变压器设计程序分析(2) VB变压器设计程序分析(2) 1.控件的属性设置 a.在属性栏中设置: VB变压器设计程序分析(2) b.在程序中设置: 例:当PO大于标准值时数据显示为红色。 If PO POT Then Text35.ForeColor = HFF 数据显示为红色 Else Text35.ForeColor = H4000 数据显示为黑色 End If VB变压器设计程序分析(2) 2.控件的事件 下图为“命令按钮Command1”的Click(单击)事件。单击后执行下一段命令。 VB变压器设计程序分析(2) Private Sub Combo9_LostFocus() A1 = Val(Combo9.Text): B1 = A1 For I = 0 To 45 A11 = A30(0, I): A011 = A40(0, I): B1 = A1 If A1 A11 And A1 A30(0, I + 1) Then JBA1 = A40(0, I) - A30(0, I) JBA1 = Int(JBA1 * 100) * 0.01 A01 = A1 + JBA1 Exit For End If If A1 = A11 Then A01 = A011 JBA1 = A01 - A1 Exit For End If Next End Sub VB变压器设计程序分析(2) 五)常用控件——文本框 1.在文本框和组合框中显示的数值通常是字符型,在程序中转换成数值型的语句。 由文本框中取值: P = Val(Text1.Text) 转换成数值型。 TAT

文档评论(0)

sdfgrt + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档