扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
1.编程求1!+3!+5!+....+n! N由inputbox获取
创新互联公司专注于网站建设|网站维护公司|优化|托管以及网络推广,积累了大量的网站设计与制作经验,为许多企业提供了网站定制设计服务,案例作品覆盖成都门帘等行业。能根据企业所处的行业与销售的产品,结合品牌形象的塑造,量身开发品质网站。
Function Math(ByVal N As Integer) As Integer
Dim c As Integer = 1
For i = 1 To N
c *= i
Next
Return c
End Function
Dim N As String = InputBox("输入N的值.")
If N = "" Then Return
MessageBox.Show(Math(N))
2.用最简单的方法将个位数和十位数互换,一定要最简单的方法..比如31换成13.
Dim s As String = InputBox("输入一个十位数.")
If s = "" Then Return
MessageBox.Show(StrReverse(s))
题1:
最简单了,高中就学过的等差数列,公式代过来就行拉
SUB A()
return 100*101/2
END SUB
题2:
更简单拉,小学初中就学过长度乘高度等于面积
FUNCTION B(Width as integer, Height as integer) AS INTEGER
return Width*Height
END FUNCTION
1、
For j = 3 To 19 Step 4
m += 1
Next
为循环5次
For i = 1 To 15 Step 4
Next
为循环4次
则总共循环4*5=20,m没循环一次+1,则m=20
2、从下面这段可以看出“*”与“#”是同步的(因为走else时,会继续循环),有“*”肯定“#”,而输出“*”只有当i=2,4时,则有2次,为*#*#
For i = 1 To 5
If i Mod 2 = 0 Then
Console.Write("*")
Else
ContinueFor
EndIf
Console.Write("#")
Next
在加上最後次输出:Console.WriteLine("$")
结果则为:*#*#$
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流