任意给定一个数值n，怎样用VB编程计算1+2^2+3^3+....+n^n的和呢？
工具/原料
VisualBasic6.0
方法/步骤
1、启动VB新建工程1，在适当位置画出2个Label框、1个Text框以及一个Command按钮（如下图预先设置好各控件的Caption等属性）。
2、双略居承柘击“运算”（即Command1），在弹出的代码窗口中键入如下代码（复制注意分行）：PrivateSubComma荏鱿胫协nd1_Click()DimnAsSinglen=Val(Text1.Text)s=0Fori=0Tons=s+i^2NextiLabel3.Caption="1+2^2+3^3+...+n^n="&sEndSub这就完成了利用For/Next语句进行运算的过程。
3、为了捂执涡扔使操作更加方便，我们可以给Command设置SetFocus：PrivateSubtext1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=吭稿荔徊13ThenCommand1.SetFocusEndSub这样当输入光标停在text1中，按下回车（Enter）键时，焦点就跳到Command上了，再按下回车于是就取代了重复的鼠标点击。
4、最后运行试试吧（记得尝试下enter键哦）！
