[{"data":1,"prerenderedAt":-1},["ShallowReactive",2],{"$fXWzEIXnSywN9u-RPKdFu_CqMji5vZJZ0RGFzCwVrgAI":3},{"answer":4,"createTime":5,"id":6,"options":7,"origin":12,"question":19,"related":20,"source":30,"type":31},[],"2025-06-13 14:03:04",199883347,[8,9,10,11],"2","4","6","8",{"count":13,"courseId":14,"courseImg":15,"courseName":16,"workId":17,"workName":18},50,"8d8c9c6545bf1e2566ca7546fe778ebf","https:\u002F\u002Ftihai-oss-cloud.itihey.com\u002Fimg\u002F9c1e48361b00f3ee2086f4e259ed792b.jpg","数据库智能技术及应用","work_43494730","第8章 VBA模块","在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As Integer)As Integer Do While m<>n Do While m>n m=m-n Loop Do While m n=n-m Loop Loop f=m End Function 窗体打开运行后,单击命令按钮,则消息框的输出结果是( )",[21,32,40,49,56,63,68,77,86,94],{"answer":22,"createTime":5,"id":23,"options":24,"question":29,"source":30,"type":31},[],199883316,[25,26,27,28],"数值","字符串","变体","逻辑型","InputBox函数的返回值类型是( )","v1",0,{"answer":33,"createTime":5,"id":34,"options":35,"question":39,"source":30,"type":31},[],199883318,[36,37,36,38],"","'","\u002F","VBA程序的多条语句能够写在同一行,中间用( )分开",{"answer":41,"createTime":5,"id":42,"options":43,"question":48,"source":30,"type":31},[],199883320,[44,45,46,47],"Y=X:X=Y","Z=X:Y=Z:X=Y","Z=X:X=Y:Y=Z","Z=X:W=Y:Y=Z:X=Y","下面能实现两个变量值互换的语句是( )",{"answer":50,"createTime":5,"id":51,"options":52,"question":55,"source":30,"type":31},[],199883322,[8,53,9,54],"3","死循环","有如下循环结构 X=1 Do X=X+2 Loop Until x>=7 问一共循环几次( )",{"answer":57,"createTime":5,"id":58,"options":59,"question":62,"source":30,"type":31},[],199883324,[8,9,60,61],"5","7","有如下循环结构 X=8 Do While X<=20 X=X+2 Loop 问一共循环几次( )",{"answer":64,"createTime":5,"id":65,"options":66,"question":67,"source":30,"type":31},[],199883326,[8,9,53,60],"以下程序运行后,消息框的输出结果是( ) Dim m( 10 ) For k = 1 To 10 m( k ) = 14 - k Next k x = 6 MsgBox m( 2 + m( x ) )",{"answer":69,"createTime":5,"id":70,"options":71,"question":76,"source":30,"type":31},[],199883328,[72,73,74,75],"10","12","11","13","以下程序运行后,立即窗口中显示的是( ). f1 = 1 f2 = 1 For n = 3 To 7 f = f1 + f2 f1 = f2 f2 = f Next n Debug.Print f",{"answer":78,"createTime":5,"id":79,"options":80,"question":85,"source":30,"type":31},[],199883330,[81,82,83,84],"Call A","Call A( 10 , 20 )","A( 10 , 20 )","Call A 10 , 20","在代码中定义了一个子过程: Sub A( a , b ) …… End Sub 下列调用该过程的形式中,正确的是( )",{"answer":87,"createTime":5,"id":88,"options":89,"question":93,"source":30,"type":31},[],199883332,[54,90,91,92],"循环0次","语法错误","循环1次","运行下列程序段,结果是( ) For s=99 to 50 Step 2 k=k+1 Next s",{"answer":95,"createTime":5,"id":96,"options":97,"question":102,"source":30,"type":31},[],199883335,[98,99,100,101],"Static","Dim","Visible","Const","VBA中定义符号常量可以用关键字( )"]