以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  IsNumberic(e.Sender.text)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=30717)
--  作者：ttitt147
--  发布时间：2013/4/2 16:28:00
--  IsNumberic(e.Sender.text)

IsNumberic(e.Sender.text)

 

这样写不行，要怎么写？
--  作者：Bin
--  发布时间：2013/4/2 16:29:00
--  
e.Sender 先把它转换成指定控件。再操作
--  作者：ttitt147
--  发布时间：2013/4/2 16:31:00
--  
我这个控件是动态增加的控件，要判断其输入内容，要如何处理。
--  作者：Bin
--  发布时间：2013/4/2 16:31:00
--  
例如 Dim lb As WinForm.Label= e.Sender
--  作者：ttitt147
--  发布时间：2013/4/2 16:31:00
--  
错误提示是：未声明 isnumberic
--  作者：Bin
--  发布时间：2013/4/2 16:31:00
--  
动态控件一样有名称的啊。和普通控件一样获取即可
--  作者：Bin
--  发布时间：2013/4/2 16:32:00
--  
e.Form.Controls("控件名") 即可
--  作者：ttitt147
--  发布时间：2013/4/2 16:34:00
--  
If e.Sender.name.SubString(len(e.Sender.name) - 1) = 2 Then
Dim s As String = e.Sender.text
    If IsNumberic(s) Then
        If Cint(e.Sender.text) > 1000 Then
            MessageBox.Show("时间最大允许值为1000!")
            e.Sender.text = 1000
        End If
    Else
        MessageBox.Show("输入内容错误!")
        e.Sender.text = 1000
    End If
End If
--  作者：ttitt147
--  发布时间：2013/4/2 16:34:00
--  
总提示isnumberic未声明
--  作者：ttitt147
--  发布时间：2013/4/2 16:35:00
--  
未声明名称 IsNumberic