VB编程入门:如何用For语句计算n的n次方累加
来源:网络收集 点击: 时间:2024-07-20①启动VB新建工程1,在适当位置画出2个Label框、1个Text框以及一个Command按钮(如下图预先设置好各控件的Caption等属性)。

②双击“运算”(即Command1),在弹出的代码窗口中键入如下代码(复制注意分行):
Private Sub Command1_Click() Dim n As Single n = Val(Text1.Text) s = 0 For i = 0 To n s = s + i ^ 2 Next i Label3.Caption = 1+2^2+3^3+...+n^n = sEnd Sub
这就完成了利用For/Next语句进行运算的过程。
3/4③为了使操作更加方便,我们可以给Command设置SetFocus:
Private Sub text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1.SetFocusEnd Sub
这样当输入光标停在text1中,按下回车(Enter)键时,焦点就跳到Command上了,再按下回车于是就取代了重复的鼠标点击。

④最后运行试试吧(记得尝试下enter键哦)!

注意分行、空格以及英文半角字符
KeyAscii = 13 :ASCII码为13——Enter键
更多For/Next语句运用,请参考baidu
版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_977047.html