用VB.NET编写一个程序 ：编一求阶乘的函数f(n),主调程序求组合数的程序，分别调用f(n),用来计算组合数的值

Private Sub Command1_Click()

你所需要的网站建设服务，我们均能行业靠前的水平为你提供.标准是产品质量的保证，主要从事成都网站制作、网站设计、企业网站建设、手机网站制作、网页设计、品牌网站制作、网页制作、做网站、建网站。成都创新互联公司拥有实力坚强的技术研发团队及素养的视觉设计专才。

Dim A, B, C

A = 10

B = 3

C = f(A) / (f(B) * f(A - B))

Print C

End Sub

Private Function f(n)

Dim I As Integer

f = 1

For I = 1 To n

f = f * I

Next I

End Function

求 vb.net应用教程（第2版）课后考场答案

这种资源还是在百度或GOOGLE上搜一下，如果曾经有人在网上发布，或有网站下载，一般都会被搜索引擎收录；如果搜不到，你可以找一下相关的论坛，最好是那种人气比较高的论坛，注册会员，发帖求助，会有高手帮你的。

VB.net的开方运算

VB的运算顺序是：先乘除、后加减，有括号的先算括号内，有负号的先算负号。

请你比较一下这个运算中x和y的值：

Dim n As Single = 4

Dim x As Single

Dim y As Single

x = n + 1

x = x / n

x = x - 1

x = Math.Sqrt(x)

y = Math.Sqrt((n + 1) / n - 1)

这样就会发现，你的代码中括号的位置错了。

正确的应该是： Math.Sqrt((n + 1) / n - 1)

16.在VB.NET中，如果保留动态数组元素原来的值，在关键字Redim后加_____参数。

Redim Preserve Arr(10,n)

通过Preserve关键字定义的动态数组，可以更改数组arr最末维的大小，且保留数组arr原来各个元素的值。

所以答案为：C

例如：

Dim arr()

Redim arr(1 to 1,1 to 2)

arr(1,2) = "你好"

Redim Preserve arr(1 to 1, 1 to 3)

msgbox arr(1,2) '这个时候依然可以得到arr(1,2)的值为“你好”。

而且从答案来看，Redim只可能与Preserve联合使用。其他都无法编译！

当前文章：vb.net第二版答案 vb课后题答案第二版高等教育出版社
本文地址：http://ybzwz.com/article/ddccdps.html