填空题

执行下面的程序，消息框里显示的结果是 【13】 。 Private Sub Form_Click() Dim Str As String，K As Integer Str="ab"， For k=Len(Str)To 1 Step-1 Str=-Str & Chr(Asc(Mid(Str,k，1))+k) Next k MsgBox Str End Sub

【参考答案】

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

填空题
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：Function m(x as Integer,y as InteSer)as Integerm=IIf(x＞y,x,y)EndFunctionPrivate Sub Command1_Click()Dim a as Integer,b as InteSera=lb=2MsgBox m(a,B) End Sub打开窗体运行后，单击命令按钮，消息框的输出结果为 【12】 。
填空题
在模块中执行宏的命令是使用DoCmd对象的 【10】 方法。
相关试题