┢惠大论坛┪ » 计算机学堂 » 帮我帮我~解决问题~PLS~~

拉拉 发表于 2008-6-29 22:28

帮我帮我~解决问题~PLS~~

Access 2003 應用教程裏的一道課后題：
执行下面的程序，消息框里现实的结果是————

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”哦~解釋一下~

[[i] 本帖最后由 拉拉 于 2008-6-29 23:53 编辑 [/i]]

小奕 发表于 2008-6-29 22:33

只能帮忙顶~~~

vincent 发表于 2008-6-29 22:36

我现在只想小拉帮我解决下问题 为什么每次我一打开你的帖子
电脑浏览器就出问题:angry

拉拉 发表于 2008-6-29 22:46

:angry 因爲我可愛！

小羽 发表于 2008-6-29 22:47

:chahan 没学Access，帮不了你，有空看看这个

`猜钚透` 发表于 2008-6-29 23:15

Str是字符串的意思
len(str)是计算字符串的长度，比如字符串是ab，长度就是2
所以从第一位数字开始 step是跳转的意思，-1表示向后跳。
从ab的a开始跳转，向后减一位，就是b了
之后str=str&Chr那一行的意思是继续计算
Asc是升序排列
k已经是b了，b是2的意思
k1已经是b了，b是2的意思
所以k1+k，就是从b加2
b加2就是d
所以答案就出来了
abdb

`猜钚透` 发表于 2008-6-29 23:21

呃。。。
不知道对不对哦，应该对吧。。。

沁源雪狼 发表于 2008-6-29 23:33

偶帮不了你，只有帮你顶起了

飯團 发表于 2008-6-29 23:44

:bunaifan 已经有人帮你解答了,我就路过吧,把那几个函数理解了,也就理解这一题了

kczx239 发表于 2008-6-29 23:50

跟数据库没关
完全是VB的内容
6楼正解

MID函数：从一个文本字符串的指定位置开始，截取指定数目的字符。
即从K位开始在字符串str里截取1个字符
Asc函数是返回一个字符的 ASCII 码
chr函数返回ASCII 码对应的字符

[[i] 本帖最后由 kczx239 于 2008-6-30 00:09 编辑 [/i]]

拉拉 发表于 2008-6-29 23:55

天~~打少了一个逗号
应该是~~
Str=Str &Chr (Asc(Mid(Str,k,1)+k)

Mid(Str,k,1)这个我不太懂哦~~解释解释~~~

就是书上的题目~是ACCESS哦!

vincent 发表于 2008-6-29 23:59

回复 地毯 拉拉 的帖子

你说谎 你是邪门:angry 看你头像就知道了:smoking

小羽 发表于 2008-6-30 00:00

Private Sub Form_Click()
Dim Str As String,k As Integer '声明两个变量
Str="ab" '给变量赋值
For k=Len(Str) To 1 Step -1 '做一个循环从变量Str ' 的长度就是 2 到 1 步长是负一
Str=Str & Chr(Asc(Mid(Str,k,1))+k) '
'首先是MID函数
'语法
'Mid(string, start[, length])
'Mid 函数的语法具有下面的命名参数：
'部分 说明
'string 必要参数。字符串表达式，从中返回字符。如'果 string 包含 Null，将返回 Null。
'start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("")。
'length 可选参数；为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数（包括 'start 处的字符），将返回字符串中从 start 到尾端的所有字符。
’然后是Asc 函数返回一个 Integer，代表字符串中首字母的字符代码。
’最后是Chr 函数
’返回 String，其中包含有与指定的字符代码相关的字符
Next k
MsgBox Str ’用MSGBOX 输出结果
End Sub

飯團 发表于 2008-6-30 00:09

:bunaifan是VB的一些函数，和access没关。
LS的正解。那个少了一个句号，是mid函数。
不过LS会不会解释得太专业你看不懂吖，孩子

飯團 发表于 2008-6-30 00:10

Mid(Str,k,1)
也就是在Str中，从第K个字符开始向右取1个字符。。。

kczx239 发表于 2008-6-30 00:12

回复 13# 小羽 的帖子

太专业了
不好理解

`猜钚透` 发表于 2008-6-30 19:58

嘻嘻。。。那说明我的还算对咯？！

拉拉 发表于 2008-6-30 20:40

:sad :sad :sad 崩溃```````````````````````````````````快点找个人来教我``FACE TO FACE~

拉拉 发表于 2008-6-30 20:41

:sad :sad 我是电脑白痴``````

kczx239 发表于 2008-6-30 23:42

自己多看点书吧
饭团是计算机系的
肯定会的啦

查看完整版本: 帮我帮我~解决问题~PLS~~