算法与程序设计VB试题与答案10_vb程序设计试题及答案

算法与程序设计VB试题与答案10由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“vb程序设计试题及答案”。

VB101、打开文件“考生文件夹178工程1.vbp”，完善Command1_Click事件及fac函数并保存。

实现功能：用递归法求3!+5!+7!的值，将结果输出到窗体上。

Public Function fac(a As Integer)As Integer If a = 1 Then fac = ① Else fac = a * ②(a1)+ fib(n1)End If End Function

Private Sub Command1_Click()Dim sum As Integer sum = s(③)Print “sum=”;sum End Sub ①1 ②n ③100

6、打开“考生文件夹776”中的文件“蜗牛爬竹.vbp”，完善Command1_Click事件代码并保存。

实现功能：青竹高17米，蜗牛从青竹底端慢慢爬向顶端，晴天每天爬1.4米，雨天每天爬1.8米，若蜗牛爬到顶端用了11天，计算晴天、雨天各多少天？（晴天对应文本框text1，雨天对应文本框text2）

Private Sub Command1_Click()Dim x As Single Dim y As Integer y =(171.4)① = 11-y Text1.Text = Str(②)+ “天” Text2.Text = Str(③)+ “天” End Sub ①x ②x ③y