周末了人气困了出个题目刺激一下你！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 周末了人气困了出个题目刺激一下你！

共有14522人关注过本帖树形打印复制链接主题：周末了人气困了出个题目刺激一下你！

qtcks

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：485 积分：3926 威望：0 精华：6 注册：2009/3/29 13:25:00

Post By：2010/11/21 10:49:00 [显示全部帖子]

Dim zm As String = "abcdefghijklmnopqrstuvwxyz"
Dim jz As String = "i love foxtable"
Dim nr As String
For i As Integer =0 To jz.Length-1
    If zm.Contains(jz.Chars(i)) Then
        nr += zm.IndexOf(jz.Chars(i))+1 & ","
    End If
Next
output.show(nr)
9,12,15,22,5,6,15,24,20,1,2,12,5,

下一主题 >> << 上一主题

主题：周末了 人气困了 出个题目 刺激一下你！

主题：周末了人气困了出个题目刺激一下你！