Private Sub Command1_Click( )
Dim s As Integer
Dim I As Integer
S=0
For i=1 To 10
s=s+i\7
Next i
Text1.text=str(s)
End sub
该程序段运行后,文本框Text1中显示____
组词。
控____ 挖____ 改____ 攻____
核____ 该____ 联____ 耿____