Dim V1, V2, V3 As Integer '石头按钮触发 Private Sub CommandButton1_Click() Label4.Caption = "石" Call run(1) End Sub '剪刀按钮触发 Private Sub CommandButton2_Click() Label4.Caption = "剪み" Call run(2) End Sub '布按钮触发 Private Sub CommandButton3_Click() Label4.Caption = "布" Call run(3) End Sub '逻辑处理共通 Private Sub run(obj) '胜率初期化 If V1 = Empty Then V1 = 0 End If If V2 = Empty Then V2 = 0 End If If V3 = Empty Then V3 = 0 End If '計算逻辑 Dim temp As Integer '随机数 temp = Rnd(3) * 3 + 1 If temp = 1 Then Label5.Caption = "石" If obj = 1 Then Label3.Caption = "平局" V3 = V3 + 1 ElseIf obj = 3 Then Label3.Caption = "人勝利" V1 = V1 + 1 Else Label3.Caption = "電脳勝利" V2 = V2 + 1 End If ElseIf temp = 2 Then Label5.Caption = "剪み" If obj = 2 Then Label3.Caption = "平局" V3 = V3 + 1 ElseIf obj = 1 Then Label3.Caption = "人勝利" V1 = V1 + 1 Else Label3.Caption = "電脳勝利" V2 = V2 + 1 End If Else Label5.Caption = "布" If obj = 3 Then Label3.Caption = "平局" V3 = V3 + 1 ElseIf obj = 2 Then Label3.Caption = "人勝利" V1 = V1 + 1 Else Label3.Caption = "電脳勝利" V2 = V2 + 1 End If End If '输出胜率 Label6.Caption = "人:" & V1 & " 電脳:" & V2 & " 平局:" & V3 & " 総合:" & (V1 + V2 + V3) End Sub
您还没有登录,请您登录后再发表评论
1. **增加记录**:用户可以通过输入或选择相应的字段,如日期、类别(收入或支出)、金额等,然后点击“添加”按钮,VBA宏会将这些信息插入到指定的Excel表格中,自动更新累计余额。 2. **删除记录**:如果需要删除...
利用word VBA制作简易考试及阅卷系统
Excel VBA 成绩统计分析实例集锦 本文档主要介绍了使用 Excel VBA 进行成绩统计分析的实例,通过创建一个 VBA 项目,实现成绩分析表的自动化生成。 知识点1:使用 VBA 创建成绩分析表 在本文档中,我们使用 VBA ...
VBA(excel)实现的统计两列重复个数,快速统计,简洁明了。
EXCEL vba简易教程及有关函数运用
### VBA 数组列不同值统计 #### 背景介绍 在Excel VBA编程中,经常需要处理数据集中的统计需求,特别是针对某一列中不同值的数量进行计数。这种统计方法对于数据分析、报告生成等场景非常有用。本文将详细介绍如何...
VBA简易教程,ppt版本 ,简单实用
利用excel的VBA编写的脚本,简单通俗易懂,一学就会。
VBA编程初级简易教程,供初级入门使用,老手绕道
ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的
Excel VBA(Visual Basic for Applications)是Microsoft Excel中的编程环境,允许用户自定义工作簿、工作表、图表和应用程序的功能。VBA结合了Excel的强大功能和VB语言的易用性,使得用户能够创建宏,自动化任务,...
通过Excel VBA爬取统计局统计标准:省--市--县,详细的爬虫代码
【标题】"成绩统计(vba版)_v3.2"是一个使用VBA(Visual Basic for Applications)编程语言在Excel环境中创建的应用程序,旨在帮助用户高效地进行学生成绩的管理和统计工作。VBA是Microsoft Office套件中内置的一种...
统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx...
标题中的“cad图中文字统计vba”是指利用AutoCAD软件中的VBA(Visual Basic for Applications)编程语言来实现对CAD图纸中文字信息的统计功能。这个VBA脚本主要针对的是建筑行业的常见应用场景,例如平面图和立面图...
《使用VBA进行中小学学生成绩统计》 在教育领域,成绩统计是一项不可或缺的工作,尤其对于中小学来说,定期对学生的成绩进行整理、分析是教学管理的重要环节。传统的手动统计方式耗时费力,易出错,而利用Excel配合...
《ExcelVBA简易会计信息系统与相关案例》是一份旨在教授如何利用ExcelVBA技术构建会计信息系统的教程。通过这份资料,你可以深入理解如何结合Excel的强大功能和VBA(Visual Basic for Applications)的编程能力,...
VBA(Visual Basic for Applications)是Microsoft Office套件中内置的一种编程语言,它允许用户自定义功能、自动化任务,尤其在Excel中,VBA被广泛用于数据处理和统计分析。以下将详细介绍标题和描述中涉及的VBA...
这个简易版的系统特别强调无需VBA(Visual Basic for Applications)支持库,这意味着它可能利用了Excel或其他类似电子表格软件的内置功能,而不是依赖于VBA编程来实现其功能。这样的设计使得系统更加易于使用,同时...
相关推荐
1. **增加记录**:用户可以通过输入或选择相应的字段,如日期、类别(收入或支出)、金额等,然后点击“添加”按钮,VBA宏会将这些信息插入到指定的Excel表格中,自动更新累计余额。 2. **删除记录**:如果需要删除...
利用word VBA制作简易考试及阅卷系统
Excel VBA 成绩统计分析实例集锦 本文档主要介绍了使用 Excel VBA 进行成绩统计分析的实例,通过创建一个 VBA 项目,实现成绩分析表的自动化生成。 知识点1:使用 VBA 创建成绩分析表 在本文档中,我们使用 VBA ...
VBA(excel)实现的统计两列重复个数,快速统计,简洁明了。
EXCEL vba简易教程及有关函数运用
### VBA 数组列不同值统计 #### 背景介绍 在Excel VBA编程中,经常需要处理数据集中的统计需求,特别是针对某一列中不同值的数量进行计数。这种统计方法对于数据分析、报告生成等场景非常有用。本文将详细介绍如何...
VBA简易教程,ppt版本 ,简单实用
利用excel的VBA编写的脚本,简单通俗易懂,一学就会。
VBA编程初级简易教程,供初级入门使用,老手绕道
ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的 ftp工具-vba做的
Excel VBA(Visual Basic for Applications)是Microsoft Excel中的编程环境,允许用户自定义工作簿、工作表、图表和应用程序的功能。VBA结合了Excel的强大功能和VB语言的易用性,使得用户能够创建宏,自动化任务,...
通过Excel VBA爬取统计局统计标准:省--市--县,详细的爬虫代码
【标题】"成绩统计(vba版)_v3.2"是一个使用VBA(Visual Basic for Applications)编程语言在Excel环境中创建的应用程序,旨在帮助用户高效地进行学生成绩的管理和统计工作。VBA是Microsoft Office套件中内置的一种...
统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx源码EXCEL VBA宏编程xlsx实例代码下载统计图形对象的个数.xlsx...
标题中的“cad图中文字统计vba”是指利用AutoCAD软件中的VBA(Visual Basic for Applications)编程语言来实现对CAD图纸中文字信息的统计功能。这个VBA脚本主要针对的是建筑行业的常见应用场景,例如平面图和立面图...
《使用VBA进行中小学学生成绩统计》 在教育领域,成绩统计是一项不可或缺的工作,尤其对于中小学来说,定期对学生的成绩进行整理、分析是教学管理的重要环节。传统的手动统计方式耗时费力,易出错,而利用Excel配合...
《ExcelVBA简易会计信息系统与相关案例》是一份旨在教授如何利用ExcelVBA技术构建会计信息系统的教程。通过这份资料,你可以深入理解如何结合Excel的强大功能和VBA(Visual Basic for Applications)的编程能力,...
VBA(Visual Basic for Applications)是Microsoft Office套件中内置的一种编程语言,它允许用户自定义功能、自动化任务,尤其在Excel中,VBA被广泛用于数据处理和统计分析。以下将详细介绍标题和描述中涉及的VBA...
这个简易版的系统特别强调无需VBA(Visual Basic for Applications)支持库,这意味着它可能利用了Excel或其他类似电子表格软件的内置功能,而不是依赖于VBA编程来实现其功能。这样的设计使得系统更加易于使用,同时...