用VB将123456编写成162534
答案:3 悬赏:40 手机版
解决时间 2021-07-20 15:13
- 提问者网友：爱了却不能说
- 2021-07-19 16:25
用VB将123456编写成162534
最佳答案
- 五星知识达人网友：摆渡翁
- 2021-07-19 17:47
呵呵，不太明白是个什么意思：
你可以试一下这个:
dim i as long,k as long
i=123456
k=i+39078
print i
print k
全部回答
- 1楼网友：夜余生
- 2021-07-19 18:52
dim a as long,b as string
a=123456
b=""
if len(str(a))/2=int(len(str(a))/2) then
for i = 1 to len(str(a))/2
b=b & mid(str(a),i,1) & mid(str(a),len(str(a))-i,1)
next i
else
for i = 1 to len(str(a)-1)/2
b=b & mid(str(a),i,1) & mid(str(a),len(str(a))-i,1)
next i
b=b & mid(str(a), (len(str(a))+1)/2,1)
end if
- 2楼网友：大漠
- 2021-07-19 18:44
不太明白你的意思，麻烦再说清楚一些
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯