用VB按以下要求制作一个程序:设计一个窗体,用InputBox函数输入一个自然数n, 【接下行】

2025-04-30 19:56:07
推荐回答(1个)
回答1:

Private Sub Command1_Click()
Dim n, i, S As Long
n = InputBox("请输入自然数n的值", "期末考试第一题")
For i = 1 To n Step 2
S = i + i
Next
Label1.Caption = "1到" & n & "之间奇数的和为:" & S
End Sub
Private Sub Command2_Click()
Unload Me
End Sub

窗体中有Command1、Command2和Label1