[求助]数值转换的内部函数的问题~ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]数值转换的内部函数的问题~

共有8502人关注过本帖树形打印复制链接主题：[求助]数值转换的内部函数的问题~

qtcks

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

加好友

发短信

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

Post By：2013/1/13 18:30:00 [显示全部帖子]

Dim cs() As String = New String() { "1","2","3","4","5","6","7","8","9"}
Dim ns() As String = New String() {"01","02","03","04","05","06","07","08","09"}

这种强规则的转换，不建议用这种方式。

直接使用格式化就行了。

qtcks

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

加好友

发短信

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

Post By：2013/1/14 15:31:00 [显示全部帖子]

Dim Val As String = Args(0)
Dim ns() As String = New String() {"01","02","03","04","05","06","07","08","09"}
If ns(Val) isnothing Then
Return ns(Val)
End If

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

主题：[求助]数值转换的 内部函数的问题~

主题：[求助]数值转换的内部函数的问题~