当前位置: 首页 > news >正文

大兴企业官网网站建设报价网站推荐界面

大兴企业官网网站建设报价,网站推荐界面,wap游戏纵横四海,广告海报创意设计文章目录 打开开发工具编写第一个VBA使用VBA调试器 VBA语法 打开开发工具 文件->选项->自定义功能区->开发工具 编写第一个VBA 点击开发工具 ->点击Visual Basic 选择sheet1->右键->插入->模块 Sub 第一个VBA程序()MsgBox "Hello World!&quo…

文章目录

  • 打开开发工具
  • 编写第一个VBA
    • 使用VBA调试器
  • VBA语法

打开开发工具

文件->选项->自定义功能区->开发工具
在这里插入图片描述
在这里插入图片描述

编写第一个VBA

点击开发工具 ->点击Visual Basic
在这里插入图片描述
选择sheet1->右键->插入->模块
在这里插入图片描述

Sub 第一个VBA程序()MsgBox "Hello World!",vbOKonly, "VBA控制台程序" '输出程序信息
End Sub

点击调试->运行 进行测试
在这里插入图片描述

在这里插入图片描述

使用VBA调试器

在这里插入图片描述
调试过程后面为快捷键,按相应快捷键可以快速调试

Sub 第一个VBA程序() 'VBA程序以Sub开始,End Sub结束Dim context As String  'Dim...As...声明变量Dim title As StringRem 将内容存入context变量context = "欢迎进入Excel VAB世界!"title = "Hello Excel VBA"MsgBox context, vbOKOnly, title 'MsgBox为内置函数弹出框
End SubSub 判断闰年()Dim year As Integeryear = CInt(InputBox("请输入需要判断的年份:", "判断闰年"))If year Mod 4 = 0 And year Mod 100 <> 0 ThenMsgBox "" & year & "是一个闰年", vbOKOnly, "判断闰年"ElseIf year Mod 100 = 0 And year Mod 400 = 0 ThenMsgBox "" & year & "是一个闰年", vbOKOnly, "判断闰年"ElseMsgBox "" & year & "不是一个闰年", vbOKOnly, "判断闰年"End IfEnd If
End SubSub 求阶乘()Dim i As IntegerDim chengji As Longchengji = 1i = 1While i <= 10chengji = chengji * ii = i + 1WendMsgBox "10阶乘为:10! = " & chengji, vbOKOnly, "求阶乘"
End Sub

VBA语法

开始结束:Sub…End Sub
声明变量:Dim…As…
弹出框:MsgBox 内容 ,vbOKOnly,标题。拼接字符串 “” & year & “n内容”
输入框:InputBox(“提示语句:”)
转化为数字:CInt(内容)
条件语句:If…Else…End If
循环语句:While…Wend

http://www.dtcms.com/a/466618.html

相关文章:

  • 精准核酸检测
  • 摩尔信使MThings入门教程3
  • 电子商务与网站建设报告福建建设工程信息网
  • 银座商城官网镇江seo网站优化
  • 网站建设好公司好做cps的网络文学网站
  • 廊坊做网站公司排名四川省住房和建设厅官方网站
  • 17.链路聚合——LACP模式(2025年10月10日)
  • PG数据文件位置迁移
  • 优化百度网站企业vi设计策划书
  • 建设一个网站平台需要哪些技术员网站到期时间查询
  • 网站建设在哪块做wordpress主题激活
  • 网站开发建设中上海网站排名优化优化
  • 做外卖在哪个网站做好兰州专业网站建设团队
  • 雄安做网站要多少钱网页建站专业公司
  • 微分中值定理(费马、罗尔、拉格朗日、柯西)
  • Umi-OCR_文字识别工具 免安装使用教程(附下载安装包)!开源离线OCR识别软件下载
  • 怎么做提升网站转化率深圳住房城乡建设局网站首页
  • 网站备案前置审批表网站建设域名的选取有讲究
  • 传统室分与数字室分系统对比
  • JAVA工具类Arrays处理数组实际应用示例
  • 【开题答辩全过程】以 阿纳海姆高达模型研究所网站的设计与实现为例,包含答辩的问题和答案
  • 钻井也要“精确制导”?如何让地下钻头奔向千米之外的目标2
  • GJOI 10.7/10.8 题解
  • HTML5网站建设案例游戏推广赚钱
  • 大淘客网站怎么做宜宾有什么大型网站建设公司
  • 优秀网站设计推荐沈阳工程信息
  • wpf之Ellipse控件
  • 全新流量广告变现系统源码 任务管理系统 含搭建教程
  • 衡阳网站建设专家代刷网站只做软件下载
  • 福州cms模板建站Wordpress多站点为什么注册不了