运行下列程序：Dim bPrivate Sub Form_Click（)a = 1: b = 1Call fun1（a)Print "X = &quo

运行下列程序，单击窗体后输出的结果是（)。Private Sub Form_Click（)Dim aDim s As Intege

运行下列程序：Private Sub Form_Click（)Dim sum As IntegerDim i As Integersum = 0For i =12

下列程序运行后，信息框显示的内容是（)。Private Sub Command1_Click（)Dim s1 As StringDim s2

运行下列程序：Private Sub Command1_Click（)Dim s1 As String * 1Dim s2 As Strings1 = &quo

运行下列程序：Private Sub Form_Click（)Dim a As Integera = 1For i = 1 To 5Call fun1（a)Ne

（28）阅读下列程序： Private Sub Commandl_Click（) Dim i As Integer,k As Integer k=2 For i=1 T