中易网

用VB按以下要求制作一个程序:设计一个窗体,用InputBox函数输入一个自然数n, 【接下行】

答案:1  悬赏:40  
解决时间 2021-03-22 08:31
单击计算按钮后打印1到n之间的奇数之和,退出按钮实现结束功能,如图1所示。
要求: n的值由InputBox函数输入,界面参考图1。
最佳答案
Private Sub Command1_Click()
Dim n, i, S As Long
n = InputBox("请输入自然数n的值", "期末考试第一题")
For i = 1 To n Step 2
S = i + i
Next
Label1.Caption = "1到" & n & "之间奇数的和为:" & S
End Sub
Private Sub Command2_Click()
Unload Me
End Sub

窗体中有Command1、Command2和Label1
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
急需谜底是草莓的谜语(关于猜水果方面)
去年年检完,用户名和密码忘了怎么办?
南昌市属于什么省
女朋友应当如何称呼自己?
请问哪有高中数学全套教学同步视频下载?
HR说三个工作日内给我发邮件叫我注意查收,但
罗阳高速出口有多少个
天津新港船舶重工有限责任公司 机械研究生的
在教室里用什么春联?
请问烟台开发区哪家健身房比较好?不办年卡,
想喝清肠茶哪种的比较好
想要一树难开两样花的曲
印度飞饼做摆摊生意有前景吗?嘉兴平湖/桐乡
和女朋友在一起 我只感觉自己像个备胎
爱说爱笑的妈妈这两天怎么忽然变得少言寡语了
推荐资讯
空调充氟加到0.4制热好不好?
2012上财会计专业硕士复试考试科目
内蒙古乌海市公安局海勃湾分局鄂尔多斯东街派
手机oppo x9o77多少钱
女人如花阅读感悟100字左右
喝水蜜桃花茶能减肥美容吗
东北办公室内适合养什么花草。 气温5-25摄氏
阿玛尼的男包怎么辨别真假
宏英丰达钢铁在哪里啊,我有事要去这个地方
夏天一天洗几次澡合适?
圣蜜莱雅适合多大年龄的人用啊?
怎样可以快速去眼袋,简单小方法。
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?