第3课VB基本控件、事件、属性实验二基本控件_第1页
第3课VB基本控件、事件、属性实验二基本控件_第2页
第3课VB基本控件、事件、属性实验二基本控件_第3页
第3课VB基本控件、事件、属性实验二基本控件_第4页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、实验二基本控件【实验目的】1. 掌握基本控件在窗体中的创建方法;2. 熟悉基本控件的属性设置方法;3. 熟练掌握基本控件的常用事件及方法的应用操作;【实验内容】1.建立一个允许剪切、复制和粘贴的简单便笺板程序。分析：根据题意，建立一个文本框输入文本，文本框初值为空，在程序运行 时，用户输入正文并允许显示多行，建立四个命令按钮分别实现题目要求的 功能。【实验步骤】1.在设计窗体中创建1个标签、1个文本框和4个按钮，对象建立后如图5 所示；图5创建对象后的窗体2.依据表2所示，设置各控件的属性值;表2窗体及对象的属性设置是否显示多行默认控件名称（Caption 属性）（Text属性）（MultiL

2、i ne 属性）Comma nd4.Fo ntSize = 10Form1简单便笺板无定义无定义Label1请输入内容无定义无定义Text1无定义（空白）TrueComma nd1剪切无定义无定义Comma nd2复制无定义无定义Comma nd3粘贴无定义无定义Comma nd4退出无定义无定义3.按表2的要求将各控件的属性设置完成后，窗体界面如图 6所示;*間車曲£版匚回®图6设置属性后的窗体4. 编写代码代码如下:Dim st As Stri ngP rivate Sub Form_Load()Labell.Fo ntSize = 16Text1.Fo ntSize

3、= 10Comma nd1.Fo ntSize = 10Comma nd2.Fo ntSize = 10Comma nd3.Fo ntSize = 10End SubPrivate Sub Comma nd1_Click() st = Text1.SelTextText1.SelText =""End SubPrivate Sub Comma nd2_Click() st = Text1.SelTextEnd SubPrivate Sub Comma nd3_Click()Text1.SelText = stEnd SubPrivate Sub Comma nd4_Click()EndEnd Sub5. 调试运行程序程序运行后，在文本框中输入任意一串字符,如图7所示。匚何冈请输入内容图7窗体运行界面再单击“粘若在文本框内选中内容，单击“剪切”、并将光标定位在文本框中的任意位 置，再单击“粘贴”按钮后，所选定的内容将移至当前光标所在位置；若在文本 框内选中内容，单击“复制”、并将光标定位在文本框中的任意位置， 贴”按钮后，则所选定的内容将在当前光标所在位

人人文库> 全部分类> 应用文书 > 作业报告

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论