在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写如下代

解析：由于语句Option Base 1的存在，则数组下标的下界是1。Array函数是用来给数组元素赋初值的，它要求数组必须是一个变体变量名。题中语句  Dim a  a=Array(2，4，6，8)  是将2赋给a(1)，将4赋给a(2)，将6赋给。a(3)，将8赋给a(4)。  分析For循环语句，可知循环一共执行了两次。  i＝4时，执行语句s＝s+a(i)*j相当于s =0+a(4)*1(s未被初始化，则默认为0)得s的值为8。接着执行语句j＝j*10相当于j=1 *10，得j的值为10。  i＝2时，执行语句s＝s+a(i)*j相当于s＝8+a(2)*10(此次循环中的s和j均为上次循环所得结果值)得s的值为48。然后再执行语句j=j*l0。  最后执行的语句Prints，故最后的输出结果为s的值48。