共回答了20个问题采纳率:80%

Dim a(10) As Integer

Private Sub Command1_Click()

For i = 1 To 10

a(i) = InputBox("请输入第" & i & "个分数")

Text1.Text = Text1.Text & Str(a(i))

Next i

End Sub

Private Sub Command2_Click()

Max = a(1)

Min = a(1)

For i = 1 To 10

s = s + a(i)

If Max < a(i) Then Max = a(i)

If Min > a(i) Then Min = a(i)

Next i

s = (s - Max - Min) / 8

Text2.Text = Max

Text3.Text = Min

Text4.Text = s

End Sub

Private Sub Command3_Click()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

End Sub

Private Sub Command4_Click()

End

End Su

1年前

8

用python模拟评委打分_用vb 编写一个评委打分的程序1. 编写一个评委打分的程序,实现以下功能:a) 单击“评委给分”按钮时弹出InputBo...相关推荐

  1. html单击按钮时弹出输入框,点击按钮弹出模态框的一系列操作代码实例

    实现功能 提交按钮功能: 点击提交按钮的时候都会弹出模态框,但是有不同的状态: 审核状态未通过:弹出未通过理由的input输入框,模态框中除了取消和确定按钮,新增确定并保存医院的按钮 审核状态已通过: ...

  2. Android 锁屏,息屏情况下打开界面Activity类似微信视频通话接电话时弹出接电话的界面

    Android 锁屏,息屏情况下打开界面Activity,类似微信视频通话接电话时弹出接电话的界面 https://blog.csdn.net/yingtian648/article/details/ ...

  3. 打开一个解决方案时弹出“项目所需的应用程序未安装,确保已安装项目类型(.csproj)的应用程序”问题的解决方案

    打开一个解决方案时弹出"项目所需的应用程序未安装,确保已安装项目类型(.csproj)的应用程序"问题的解决方案 参考文章: (1)打开一个解决方案时弹出"项目所需的应用 ...

  4. 解决Word 2007启动时弹出“无法访问您试图使用功能所在的网络位置”的问题...

    解决Word 2007启动时弹出"无法访问您试图使用功能所在的网络位置"的问题... 参考文章: (1)解决Word 2007启动时弹出"无法访问您试图使用功能所在的网络 ...

  5. Android在初始化时弹出popwindow的方法

    Android中在onCreate()时弹出popwindow,很多人都有过类似的需求吧,但是直接在onCreate()中调用popwindow的showAtLocation()方法是会报异常的,原因 ...

  6. 成功解决基于VS2015(Visual Studio2015)编写C++程序调试时弹出窗口一闪而过的问题

    成功解决基于VS2015(Visual Studio2015)编写C++程序调试时弹出窗口一闪而过的问题 目录 解决问题 解决方法 T1.修改配置属性的控制台

  7. 微信小程序点击按钮实现弹出模态框

    效果如下图 wxml如下: <button bindtap="popup">弹出</button><!-- 弹出层 --><view cl ...

  8. win7电脑总是提示重新启动计算机以完成重要更新的安装是怎么回事,Win7开机时弹出Windows Update提示,怎样解决?(图文)...

    Win7开机时弹出Windows Update提示,怎样解决?最近有一些Win7用户都反映了这样一个问题,就是在开关机的时候,电脑总是弹出"Windows Update"的窗口,同 ...

  9. 运行jmap时弹出:Usage: jmap [option] <pid> (to connect to running process) jmap [option] <

    运行jmap时弹出: Usage:jmap [option] <pid>(to connect to running process)jmap [option] <executabl ...

最新文章

  1. hexo的next主题个性化教程 打造炫酷网站
  2. BZOJ1054(搜索)
  3. 使用JetBrains dotMemory 4.0分析内存
  4. 关联规则算法Apriori的学习与实现
  5. [HNOI2005][BZOJ1202] 狡猾的商人
  6. java网上零食销售网站系统
  7. Python三十个常见的脚本汇总
  8. 基于BS架构的微博系统
  9. 7.2 可分离变量的微分方程
  10. python获取键盘按键键值_python获取键值
  11. 木瓜移动全方位布局跨境电商SaaS木瓜大橙, 这条新赛道有何机遇?
  12. 赫兹的单位换算_「频率单位」CPU频率和单位换算 - seo实验室
  13. 充满希望的新的一年!
  14. Android运行报错Manifest merger failed : uses-sdk:minSdkVersion 26 cannot be smaller than version 28 decl
  15. 在Ubuntu系统中修改下载源
  16. 怎么才能做好采购管理?
  17. 魔兽世界 windows 7 下 界面 问题
  18. 河北工业大学计算机专业好就业吗,河北工业大学就业率及就业情况怎么样(含就业前景好的专业)...
  19. 生产制造企业质量管理系统(QMS)规划方案
  20. 服务器s4系列固态,三星S4LJ204X01主控

热门文章

  1. 支付宝支付-支付宝PC端扫码支付
  2. SpringBoot如何切换Redis默认库
  3. 发布-订阅消息常用通信方式
  4. 小程序 获取用户信息 openid 等
  5. c语言 申请1k内存,怎么解决函数内申请内存,函数外释放的问题
  6. @EqualsAndHashCode()注解详解
  7. while语法php格式,PHP While 循环
  8. dos安装深度linux,U盘用grub4dos引导Deepin v20 Beta iso安装的方法
  9. 1003 我要通过! (20分)
  10. 东芝笔记本linux系统安装驱动,笔记本驱动,详细教您东芝笔记本无线网卡驱动怎么安装...