• 所有问题

    • vb计算10以内自然数的平方和,在form上显示结果

    如题所述

    举报该问题
    推荐答案   2016-06-06
    Private Sub Form_Click()
    For i = 1 To 9
    s = s + i * i
    Next i
    Print s
    End Sub
    温馨提示：答案为网友推荐，仅供参考
    相似回答
    ...题目:编写函数fun,其功能是:能计算从1开始到n的自然数的平...答：Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入一个正整数", "计算从1到n的平方和", 10) Print "fun(" & n & ")=" + CStr(fun(n))End SubPrivate Function fun(n As Integer) As Double For i = 1 To n s = s + i ^ 2 Next i fun ...
    VB若要在窗体上显示表达式的运算结果用什么方法?答：在窗体上显示，用form1.print方法，或用me.print方法，或者直接用print也可以。
    怎么让vb程序显示计算后的数值答：vb显示计算后的结果有两种方法 1、直接用输出控件 比如用text1输出。计算结果是s 你可以把s赋给text1.text 代码为 text1.text=s 这里的s可以字符型，也可以是数字型 他会自动转换成字符型，等效 text1.text=cstr（s）本例中 就用这种方法来显示，代码有错误 把(Text.1 text) = s 改成(Te...
    用VB Asp 怎么写"求两个数的平方和"的代码 急~!答：1、VB程序：在窗体上放置三个文本框（Name属性分别为txt1、txt2、txt3；text属性为空）和一个按钮（Name属性为cmdCal；caption属性为“计算”）。Private Sub cmdCal_Click()'纠错 If txt1.text="" or txt2.text="" Then MsgBox "至少有一个文本框没有录入数据！"Exit sub End if '计算 If...
    VB 用自定义函数(function),求1!+2!+3!+…+10!并用print显示结果?答：for i=1 to 10 sum=sum+fact(i)next debug.print sum End Sub function fact(x as integer) as long if x=1 then fact=1 else fact=x*fact(x-1)end if end function -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 虽然这样写结构清晰，但运算量大，算阶乘的...
    ...功能是:能计算从1开始到n的自然数中偶数的平方和!!!急用!!!_百度...答：Function sum(n) As Double sum = 0 For i = 1 To n If i Mod 2 = 0 Then sum = sum + i *2 Next End Function
    VB中运用计数循环结构计算出1+2+3+4+...+100的结果代码?答：这次把sum的值加上i循环后的值 i现在是2 而sum等于上次i的值为1 所以1+2就等于3然后把结果给了sum 这样一直循环...直到i等于101的时候超过了100就停止执行了，所以sum最终都是i自加后的值 这个时候循环结束然后执行下一条语句也就是print sum 打印sum的值 于是总数是5050吧。
    ...数对是指两个不同的自然数的和与差都是平方数。VB代码详细答：issq(i + j) And issq(j - i) Then Print i; j, k = k + 1 If k Mod 5 = 0 Then Print End If Next j Next iEnd SubFunction issq(n As Integer) As Boolean issq = Int(Sqr(n)) * Int(Sqr(n)) = nEnd Function ...
    如何在VB一或二个文本框中显示一个计算结果同时也显示上次计算结果答：Private Sub Command1_Click()Dim a As Single, b As String b = Text1 '将上一次的结果保存在变量B中 a = InputBox("请输入X:")Text1 = js(a)Text2 = b End Sub Function js(a As Single) As Single'这是计算公式,你可以改其他的 If a <= 10 Then js = 50 - a ^ 2 Else...
    大家正在搜
    自然数的计算方法是什么方法计算从1开始到n的自然数和连续自然数的和如何计算自然数的计算方式是什么自然数最小的计算单位是多少自然数的算法自然数的和vb的form事件showvb form参数