①工程文件名是“工程1.vbp”
②该工程只有1个窗体
③窗体文件名是“Form.frm”
④窗体名称是“寻找水仙花数”
Private Sub Obj_Click( )
s=s+1
Text.Text=Str(s)
End Sub
Dim C As Long
A="456":B="123": C=Val(A+B)
该程序段运行后,C的值为
x=0
For i=1 to 10 step
If then x=x+i
Next i
Private Sub Command1_Click( )
Dim x as Double
x=val(Text1.Text)
If x<=50 then
Text2.text= Str(0.35*x)
Text2.text=
End If
End sub
Private Sub Command1_Click( )
Dim s As Integer
s=1
For k=1 T0 10 Step 2
s= k*(k+1)
Next k
Print(s)
End Sub
改正为:、