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

运行下列程序：Private Sub form_Click（)x = InputBox（"请输入一个数：")Select Cas

运行下列程序：Private Sub form_Click（)s = InputBox（"请输入一个字符A：")Select

运行下列程序：Private Sub Command1_Click（)s$ = "abcdefabcdefabcdef"k = InStr（

运行下列程序：Private Sub Command1_Click（)x = "祝你成功"y = "1234"F

运行下列程序：Private Sub form_Click（)x$ = "123": y$ = "abc"n = Len

运行下列程序：Private Sub Form_Click（)a = 3t = InputBox（"请输入一个整数")Sele