求高手指导vb填空

来源:百度知道 编辑:UC知道 时间:2024/06/13 17:43:07
在窗体中添加两个命令按钮,其名称分别为Command1和Command2,窗体加载时要求Command1不可用,Command2可用;单击Command2后,Command1可用。请将下列程序补充完整。
Private Sub Command2_Click()
_________________________【2】___________
End Sub
Private Sub Form_Load()
_______________________【3】_____________
End Sub
3、下列程序功能是:单击窗体,在对话框输入数字并将其存放到变量X中,求所输入数字的阶乘,并将结果打印到窗体上
Private Sub Form_Click()
Dim x As Integer
Dim s As Double
Dim i As Integer
x = Val(InputBox("请输入数据"))
s = 【 4 】
For i = 1 To x
s =【 5 】
Next
Print s
End Sub

Private Sub Command2_Click()
command1.enabled=true
End Sub

Private Sub Form_Load()
Command1.Enabled=False
Command2.enabled=true
End Sub

Private Sub Form_Click()
Dim x As Integer
Dim s As Double
Dim i As Integer
x = Val(InputBox("请输入数据"))
s = 1
For i = 1 To x
s =s*i
Next
Print s
End Sub

2:form1.command1.enable=ture
3:form1.command1.enable=false
form1.command2.enable=true
4你说阶乘是啥意思?一会儿给你解答。