关于vb的题目和vb的教程

来源：百度知道 编辑：UC知道 时间：2024/05/30 07:30:52
1.Cnm(←上下角标）=m!/n!(m-n)! 输入m,n求Cnm(←上下角标，请解答。很诚实的告诉大家，这是作业，但是我不知道如何下手，要会了这一题我才能触类旁通啊，老师上课我没听懂啊～～

2.请问一下哪里有好的vb在线教程啊？
不要推荐网易的葛军的，因为他的更新第九章后我看不了啊。 还有，不要是那个从入门到精通的，他的教程有一半没一半的～

1,form添加一个按钮
Private Sub Command1_Click()
Dim m, n, result
m = Val(InputBox("请输入m:"))
n = Val(InputBox("请输入n:"))
If m >= 1 And n >= 1 Then
result = fac(m) / (fac(n) * fac(m - n))
Print "C" & n & "_" & m & "=" & result
MsgBox "C" & n & "_" & m & "=" & result
End If
End Sub

Private Function fac(ByVal n As Integer) As Long
If n = 1 Then
fac = 1
ElseIf n > 1 Then
fac = n * fac(n - 1)
End If
End Function

2,
http://www.hongen.com/pc/program/vb/v1.htm

http://www.zwye.com/book/Soft/1564.htm