• VBA代码


    一、更改标题名称

    • 点击右上角的黑色方块
    • 计时器触发:每次要执行的代码
    • 计时器间隔:每次执行代码的间隔
    '计时器触发代码
    Private Sub Form_Timer()
    Caption = "当前时间:" & Time() 'caption表示标题
    End Sub
    

    二、模块

    • 模块分为类模块和标准模块
      • 类模块:局部特效,只对一小部分有作用
      • 标准模块:全局模块,对所有部分都起作用

    二(1)、构成

    • 1.子过程:Sub,不能返回值。
    • 2.函数过程:function,实现特定过程,可以返回值
      • 函数名 = 值,就是函数的返回值
    • 两个语句写在同一行,语句中间加冒号“:”
    • 如果一个语句写在一行太长可以换行,但要在换行的末尾加下划线“_”
    • 一个单引号“'”或者rem表示注释这一行,注意rem后面要空一格。
    '子过程代码模板
    Sub 过程名参数)
    语句
    End Sub
    
    function 函数名(参数)
    语句
    End function
    

    三、变量定义

    dim word as string '定义word为字符类型的变量,string表示可变长字符串
    word = "mrflysand" '赋值,将字符串mrflysand给word这个变量
    
    dim word1 as string*4 '令字符长度为4
    word1 = "fly" '字符长度为4
    word1 = "mrflysand" '字符长度为4
    

    四、数据类型

    四(1)、时间类型

    • date()时间函数,获取当前系统的时间
    • #2021-2-13##11:40#,时间类型用“#”

    四(2)、布尔型booleun

    • true 1
    • false 0
    • not 0 = 1
    • not 1 = 0

    四(3)、变体型variant

    • 变体型:可以接受任意类型的数据(除定长字符串,用户定义类型)
    • 如果一个变量没有给类型,变体型就会成为它的默认类型

    四(4)、对象类型

    • form窗体类型
    • report报表类型
    • Control控件类型
    • 用法Dim f as form


    ❤️有则改之,无则加勉。如有错误、建议、疑问,评论或联系飞沙QQ:2602629646
    ❤️本文来自作者:MrFlySand,转载请注明原文链接:https://www.cnblogs.com/MrFlySand/p/14408913.html

  • 相关阅读:
    java 基于服务做统一数据导出
    canvas实行五星红旗盖章
    linux 端口操作
    windows mysql 连接
    C++ 保留有效位数 和 保留小数位数
    C++ cv::Mat数据类型 + 提取某些行或列
    element中table的表格更新数据之后保留原来的勾选状态
    js 下载网络文件到本地,根据url下载文件,下载本地文件
    QML与C++ 集成概览
    Qt中qDebug不能输出的解决
  • 原文地址:https://www.cnblogs.com/MrFlySand/p/14408913.html
Copyright © 2020-2023  润新知