第26题: [填空题]执行下面的程序,消息框里显示的结果是 【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 答案解析:[解析] Len()函数是字符串长度检测函数,返回字符串所含字符数。Chr()函数是字符代码转换字符函数,将数值表达式转换成字符串。Asc()函数是字符串转换字符代码函数,返回字符串首字符的ASCⅡ值