填空题

在窗体上画一个文本框(其Name属性为Text1)，编写如下事件过程，运行结果是______。
Private Sub Form_Load()
Show
Text1.Text = "你好!"
Text1.SetFocus
For i = 1 To 15
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub

【参考答案】

120
<上一题 目录 下一题>
热门 试题

填空题
47
填空题
设有如下程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim arr1 Dim Min As Integer,i AS Integer arr1=Array(12,435,76,-24,78,54,866,43) Min=arr1(1) For i=2 To 8 If arr1(i)＜Min Then______ Next i Print 最小值是: ; Min End Sub
相关试题