电子文档交易市场
安卓APP | ios版本
电子文档交易市场
安卓APP | ios版本

任务八利用动画美化系统界面

30页
  • 卖家[上传人]:san****019
  • 文档编号:70705507
  • 上传时间:2019-01-18
  • 文档格式:PPT
  • 文档大小:406.01KB
  • / 30 举报 版权申诉 马上下载
  • 文本预览
  • 下载提示
  • 常见问题
    • 1、VB.NET程序设计,任务八 利用动画美化系统界面,本章学习目标: 掌握Timer控件的使用 掌握VB.NET中的标准对话框的使用,目标,在应用程序的界面上增加动画将会使得应用程序更加美化,更吸引用户。 同时使用标准对话框将会使用户更方便的操作系统。,问题的引入,任务: 在登陆录窗体上设置一个能自动从左向右移动的标题,任务,标题能不断地从左向右移动,任务: 在职员窗体中增加一个显示员工照片的信息。当单击“照片”按钮时能从硬盘上选择相应的照片,任务,职员照片,Timer控件称为计时器,是应用程序中控制定时事件的控件,通常用于设计按固定的时间间隔所执行的操作。,Timer控件的相关知识,Timer 控件的常用属性、事件:,Timer控件的常用属性和事件,Timer控件实例,在窗体标签上动态显示当前的系统时间。,在窗体上添加一个Timer和Label控件,设置Timer的Enabled属性为True。InterVal属性为1000,Private Sub Timer1_Tick(ByVal sender As Object,ByVal e As EventArgs) Handles _ Ti

      2、mer1.Tick label1.Text = DateTime.Now.ToString() End Sub,随堂,在登陆录窗体上设置一个能自动从左向右移动的标题,PictureBox控件称为图片框控件,可显示多种格式的图片。,PictureBox控件的相关知识,PictureBox控件的常用属性、事件:,Image属性用于显示图片。该属性可以通过属性窗口设置,也可以在代码中设置,PictureBox控件图片的加载,通过属性设置只要通过单击该属性右侧的省略号,选择要显示的图片,通过代码设置,使用Image类的FromFile方法进行设置,其语法格式如下: PictureBox1.Image = Image.FromFile(“图片文件路径名”),PictureBox控件实例,在窗体上添加一个Button和一个PictureBox控件,当单击Button控件时在PictureBox控件中显示C盘的leaf.gif文件,Private Sub Button1_Click(ByVal sender As Object,ByVal e As EventArgs) Handles Button

      3、1.Click PictureBox1.Image = Image.FromFile(“c:leaf.gif”) End Sub,MessageBox消息框,MessageBox 是一个预定义对话框,它将与应用程序相关的信息显示给用户,MessageBox消息框(续),调用 MessageBox 类的 Show 方法显示消息框 public static DialogResult Show(string text, string caption, MessageBoxButtons Buttons, MessageBoxIcon icon); 其中参数text在消息框中显示的文本,caption在标题栏中显示的文本,buttons指定在消息框中显示的哪些按钮。icon指在消息框中显示的图标。 例如:,MessageBox.Show (“计算完成”, “计算器程序“, MessageBoxButtons.OKCancel, MessageBoxIcon.Asterisk);,指定若干常数,用以定义 MessageBox 上将显示哪些按钮,MessageBoxButton枚举,指定定义要显

      4、示的图标,MessageBoxIcon枚举,指定定义要显示的图标,MessageBoxIcon枚举(续),指定标识符以指示对话框的返回值,DialogResult枚举,MessageBox对话框实例,在窗体上添加一个Button和TextBox控件,当单击Button显示一个对话框,在TextBox上显示用户在对话框上的选择,Private Sub Button1_Click(ByVal sender As Object,ByVal e As EventArgs) Handles Button1.Click Dim dr As DialogResult dr = MessageBox.Show (“计算完成”, “计算器程序“, _ MessageBoxButtons.OKCancel, MessageBoxIcon.Asterisk); If dr = DialogResult.OK Then TextBox1.Text = “确定” ElseIf dr = DialogResult.Cancel Then TextBox1.Text = “取消” End If End Sub,Op

      5、enFileDialog 组件是一个预先配置的对话框它与 Windows 操作系统所公开的“打开文件”对话框相同 可使用 ShowDialog 方法在运行时显示该对话框 调用ShowDialog方法后,对于用户的选择会相应地返回一个DialogResult枚举值 使用 Multiselect 属性可使用户选择多个要打开的文件,OpenFileDialog控件,FileName属性用于获取用户所选择的文件(包含完整路径) Filter 属性设置当前文件名筛选字符串,该字符串确定出现在对话框的“文件类型”框中的选择 设置Filter属性的格式为: 描述符1|过滤符1|描述符2|过滤符2| 其中描述符是将要显示在对话框”文件类型”下拉列表中的文字说明,可随意指定。过滤符是由通配符和实际文件扩展名组成的,如*.*表示所有文件。 Word文档|*.doc|文本文件|*.txt 表示在对话框中只显示扩展名为.doc、.txt文件。,OpenFileDialog控件,OpenFileDialog控件实例,在窗体上添加一个Button、TextBox、OpenFileDialog控件,当单击Butto

      6、n显示一个打开对话框,在TextBox上显示用户所选择的文件名及路径(参考代码如下:),Private Sub Button1_Click(ByVal sender As Object,ByVal e As EventArgs) Handles Button1.Click Dim dr As DialogResult dr = OpenFileDialog1.ShowDialog() If dr = DialogResult.OK Then TextBox1.Text = OpenFileDialog1.FileName End If End Sub,Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click If Me.OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then Me.TextBox1.Text = Me.OpenFileDialog1.Fil

      7、eName End If End Sub,或,随堂练习,如图所示,当单击”照片”按钮时,显示出打开对话框,选择相应的图片后,将在图片框中显示出所选择的图片,SaveFileDialog控件,Windows 窗体 SaveFileDialog 组件是一个预先配置的对话框,它与 Windows 使用的标准“保存文件”对话框相同 使用 SaveFileDialog 组件时,必须编写文件保存逻辑。 使用 ShowDialog 方法在运行时显示该对话框,FontDialog控件,FontDialog 是标准的 Windows“字体”对话框,用于公开系统上当前安装的字体 默认情况下,该对话框显示以下项 字体、字体样式和字体大小的列表框 删除线和下划线等效果的复选框 脚本的下拉列表以及字体外观的示例 若要显示字体对话框,可以调用ShowDialog 方法,FontDialog控件的常用属性,ColorDialog控件,ColorDialog控件允许用户从调色板选择颜色以及将自定义颜色添加到该调色板 “颜色”对话框允许使用系统提供的“调色板”自定义颜色。而“字体”对话框不行 Color属性用于设置或获

      8、取所选择的颜色,实例,在窗体上添加一个Button、TextBox、FontDialog、ColorDialog控件,当单击Button分别显示“字体”和“颜色”对话框,在TextBox上的文本字体和前景色也改变,Private Sub Button1_Click(ByVal sender As Object,ByVal e As EventArgs) Handles Button1.Click Dim dr As DialogResult dr = FontDialog1.ShowDialog() If dr = DialogResult.OK Then TextBox1.Font= FontDialog1.Font End If dr = ColorDialog1.ShowDialog() If dr = DialogResult.OK Then TextBox1.ForeColor= ColorDialog1.Color End If End Sub,小结,本任务学习了Timer控件和标准对话框控件的使用,从数据库中得到图片文件的路径,然后在PictureBox上显示出图片,习题,

      《任务八利用动画美化系统界面》由会员san****019分享,可在线阅读,更多相关《任务八利用动画美化系统界面》请在金锄头文库上搜索。

      点击阅读更多内容
    最新标签
    发车时刻表 长途客运 入党志愿书填写模板精品 庆祝建党101周年多体裁诗歌朗诵素材汇编10篇唯一微庆祝 智能家居系统本科论文 心得感悟 雁楠中学 20230513224122 2022 公安主题党日 部编版四年级第三单元综合性学习课件 机关事务中心2022年全面依法治区工作总结及来年工作安排 入党积极分子自我推荐 世界水日ppt 关于构建更高水平的全民健身公共服务体系的意见 空气单元分析 哈里德课件 2022年乡村振兴驻村工作计划 空气教材分析 五年级下册科学教材分析 退役军人事务局季度工作总结 集装箱房合同 2021年财务报表 2022年继续教育公需课 2022年公需课 2022年日历每月一张 名词性从句在写作中的应用 局域网技术与局域网组建 施工网格 薪资体系 运维实施方案 硫酸安全技术 柔韧训练 既有居住建筑节能改造技术规程 建筑工地疫情防控 大型工程技术风险 磷酸二氢钾 2022年小学三年级语文下册教学总结例文 少儿美术-小花 2022年环保倡议书模板六篇 2022年监理辞职报告精选 2022年畅想未来记叙文精品 企业信息化建设与管理课程实验指导书范本 草房子读后感-第1篇 小数乘整数教学PPT课件人教版五年级数学上册 2022年教师个人工作计划范本-工作计划 国学小名士经典诵读电视大赛观后感诵读经典传承美德 医疗质量管理制度 2 2022年小学体育教师学期工作总结 2022年家长会心得体会集合15篇
    关于金锄头网 - 版权申诉 - 免责声明 - 诚邀英才 - 联系我们
    手机版 | 川公网安备 51140202000112号 | 经营许可证(蜀ICP备13022795号)
    ©2008-2016 by Sichuan Goldhoe Inc. All Rights Reserved.