关注
码龄 粉丝数 原力等级 --
- 被采纳
- 被点赞
- 采纳率

已采纳
跪求VB大佬帮忙解一下,感谢!
收起
- 写回答
- 好问题 0 提建议
- 关注问题
微信扫一扫
点击复制链接分享
- 邀请回答
- 编辑 收藏 删除 结题
- 收藏 举报
2条回答 默认 最新
- 关注
码龄 粉丝数 原力等级 --
- 被采纳
- 被点赞
- 采纳率
碰碰虎 2021-06-03 14:47关注Command1_Click表示按钮按下开始执行了,首先For循环中引用GetValue 参数为变量,GetValue中S为静态变量表明,每次引用GetValue函数,S不清零能够保持上一次的值参与本次计算。这样For循环就是一个经典的公式(求梯形面积的公式)上底加下底乘以高除以2即(1+10)*10/2=55。
我们用草稿纸纪录一下For循环结束之后的相关值i变成了11,S变成了55。
当Print执行时再次执行GetValue时 S=55+11=66。
本回答被题主选为最佳回答 , 对您是否有帮助呢? 本回答被专家选为最佳回答 , 对您是否有帮助呢? 本回答被题主和专家选为最佳回答 , 对您是否有帮助呢?解决 1无用举报微信扫一扫
点击复制链接分享
编辑预览轻敲空格完成输入- 显示为
- 卡片
- 标题
- 链接
评论按下Enter换行,Ctrl+Enter发表内容
编辑
预览

轻敲空格完成输入
- 显示为
- 卡片
- 标题
- 链接
报告相同问题?
提交
- 2021-06-28 06:54回答 1 已采纳 Private Sub Check1_Click() If Checkl .Value = 1 Then Textl.FontName = "楷体 _GB2312” Else
- 2021-06-28 06:47回答 1 已采纳 Dim i As Integer Private Sub Command1_Click() i = Val(Label2) i = InputBox("请输入一个整数:", "VB") If i Mo
- 2020-06-04 09:29回答 1 已采纳 ``` (1) s = 0 for i = 2 to 100 step 2 s = s + i next msgbox s (2) s = 0 n = 1 while s x
- 2018-10-07 07:53LQANNN的博客 在使用VB 6.0中文企业版时,删除某些控件时会出错,VB直接闪退。删除label、textbox等控件时会闪退,而删除按钮等其它控件时不会出错,这是为什么?怎么解决? 求帮忙,急!!! ...
- 2021-07-27 02:11回答 2 已采纳 Class spd'定义爬虫类 Public url as String'定义url Sub sp()'定义方法 With CreateObject("Microsoft.XMLHTTP") .Ope
- 2021-05-26 10:07回答 2 已采纳 vb有点难,python倒是可以,参考一下:https://zhuanlan.zhihu.com/p/335476050
- 2021-03-01 15:17回答 2 已采纳 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Butt
- 2014-10-12 09:21用VB实现单纯型表并求最优解 运筹学中的线型优化
- 2021-06-22 03:23回答 3 已采纳 这个源码可以借鉴,如果你下不了,我可以帮忙下载,希望能采纳 https://download.csdn.net/download/yuxing1234/842988?utm_source=iteye
- 2018-06-27 03:21回答 2 已采纳 randarr在哪里定义的,有没有下标越界, rs.Move (NextPos - CurPos), CurPos 这里Move过去的游标是有效的么,调试下。
- 2020-05-12 08:13网管小贾的博客 使用其他高级语言可以很简单的调用SQLite,但对于古老的VB似乎是有些不可能完成的任务。 另外,调用某数据库,通常讲是需要数据库驱动的,比如在ODBC中添加驱动。 由于Windows里集成了SqlServer的驱动,所以用户...
- 2021-07-21 23:10潜水小透明的博客 VB求最大公约数的两个算法Private Sub Command1_Click()Dim a As Long, b As Longa = InputBox("请输入要求最大公约数的整数", " 求两数的最大公约数:step1", 0)b = InputBox("请输入要求最大公约数的整数", " 求两...
- 2022-02-24 03:49Ghost~的博客 解题思路:求最大公约数的方法就是两个数中用较大的数除于较小的数,只要不能被整除,那么就把较小的数当成被除数,余数当成除数,直到较大的数能被较小的数整除,余数不为0。 Private Sub Command1_Click() Dim a ...
- 2019-06-13 00:13yuanji006的博客 VB.NET在“连接到数据库”时出现“未将对象引用设置到对象的实例”,才开始学习VB.NET,跪求大神帮忙啊 你好! 这是你第一次使用 Markdown编辑器 所展示的欢迎页。如果你想学习如何使用Markdown编辑器, 可以仔细...
- 没有解决我的问题, 去提问
联系我们(工作时间:8:30-22:00)
400-660-0108kefu@csdn.net在线客服
- 京ICP备19004658号
- 经营性网站备案信息
公安备案号11010502030143
- 营业执照
- 北京互联网违法和不良信息举报中心
- 家长监护
- 中国互联网举报中心
- 网络110报警服务
- Chrome商店下载
- 账号管理规范
- 版权与免责声明
- 版权申诉
- 出版物许可证
- ©1999-2025北京创新乐知网络技术有限公司