主题：数字转字符串问题（已解决）

各位老师，

 

想在单元格中设置编号的顺序号，在单元格中输入4，输入后自动转换为“0000”，如果是3则自动转换为“000” 以此类推，输入任何一个数字都可以转换为数字所代表的“0”的个数，代码要怎么写？

 

谢谢！

谢谢程版，但不是整列的如下图

  

此主题相关图片如下：360截图20130102103912658.jpg

 

当左边是“日期格式”时，第二列就是下拉列表

只有当第一列是“顺序号位数”时第二列中输入的数字才要自动转换为“0000”的样式，数字是任意的，不固定的。

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:动态列表项目.table

用了如如下代码可以了，但如果单元格内输入非数字的内容就会出错，如何才能避免这个错误？要是能动态设置单元格的数据类型就好了。但我不知道请教大家了。

 

If e.Col.Name = "值" And e.Row("类型") = "顺序号位数" Then
    Dim s As String = "0000000000"
Dim i As Integer = Cint(e.text)
    If i > 10 Then
        messagebox.show("只能输入10以内的数字!","提示")
        e.Cancel = True '则禁止退出编辑模式
    Else
        e.text = s.substring(0,i)
    End If
End If

谢谢程版，但第二列是字符型，通用的，即不同的表用的结构不一样，其他都解决了，只是当左边类型为“顺序号位数”时如何限制值这个单元格只能输入0—9的数字就行，如果左边类型是字符串，那就限制不能输入数字，这样的功能要如何实现？

 

谢谢！

 

 

此主题相关图片如下：示例.gif

对啊，怎么没想到，解决了。谢谢blackzhu,程版及CZY！

我有仔细看的，只是你6楼的那个不能通用，你看我那个动画的示例就清楚了，所以我后来改用e.text的值来判断就可以了，当左边列是字符串时可以禁止输入数字，左边是顺序号位数时又可以禁止录入字符串，

再次感谢程版及大家。