给一个文本框,只能输入数字、小数点和负号,其他的按键输入将不显示。
1.普通程序代码控制
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Dim c As Char
c = e.KeyChar
If c = "."c Then
If InStr(TextBox1.Text, e.KeyChar) > 0 Or (InStr(TextBox1.Text, "-") > 0) And (TextBox1.SelectionStart = 0) Then
e.KeyChar = ""
End If
ElseIf c = "-"c Then
If InStr(TextBox1.Text, c) > 0 Or TextBox1.SelectionStart > 0 Then
e.KeyChar = ""
End If
ElseIf c = "0"c Then
If (TextBox1.SelectionStart = 0 And Not TextBox1.Text.StartsWith("0") And TextBox1.Text.Length <> 0) Or (TextBox1.SelectionStart <= 1 And TextBox1.Text.StartsWith("0")) Then
e.KeyChar = ""
End If
ElseIf c = ControlChars.Back Then
ElseIf InStr("123456789", e.KeyChar) <= 0 Then
e.KeyChar = ""
End If
End Sub
2.正则表达式控制//正则表达式不对
Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
'利用正则表达式验证
'System.Text.RegularExpressions.Regex.IsMatch(TextBox2.Text, "^(-?\\d+)(\\.\\d+)?$") ''''该表达式来源与网上,未经证实
End Sub
// ^[+-]?(?:\d+\.?\d*|\d*\.?\d+)[\r\n]*$ 据说这个是对的。未验证。
3.使用MaskedTextBox//不能输入-和。
Mask属性设置的是自定义掩码为999999999999999
===============================================
将窗体中所有TextBox的text全部清空,其他的CheckBox啊RadioButton啊这些照旧
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim tp As TabPage
Dim text As Control
For Each tp In TabControl1.TabPages
For Each text In tp.Controls
If TypeOf text Is TextBox Then
text.Text = ""
End If
Next
Next
End Sub
分享到:
相关推荐
微电网两阶段鲁棒优化经济调度方法(完美复现)/两阶段鲁棒优化python代码.zip原创代码,完美复现,收敛良好,非烂大街的版本!!!注释十分详细,且将目标函数与约束写成紧凑形式,简洁工整,易于拓展修改。本资源...
考虑电动汽车可调度潜力的充电站两阶段市场投标策略matlab实现源码+详细注释.zip考虑电动汽车可调度潜力的充电站两阶段市场投标策略matlab实现源码+详细注释.zip考虑电动汽车可调度潜力的充电站两阶段市场投标策略...
基于Python完美复现微电网两阶段鲁棒优化经济调度方法源码+项目说明+超详细代码注释.zip 根据文中的强对偶理论编程求解时出现了一些问题,因此重新推导了模型的KKT条件进行求解 语言:Python 3.10.1 + Gurobi ...
复现中国电机工程学报《微电网两阶段鲁棒优化经济调度方法》 根据文中的强对偶理论编程求解时出现了一些问题,因此重新推导了模型的KKT条件进行求解 语言:Python 3.10.1 + Gurobi 10.0.1 程序说明:twostageMG....
海龟绘制通过绘制长方形、圆形、圆弧、爱心,五角星等,构成太阳花、爱心等教师节元素,组成一幅教师节贺卡,祝老师们节日快乐。叶子画法,从最右边叶柄出发,顺时针绘制,分别以半径40,-70,40,-60绘制圆弧。注意...
2.主要针对各个计算机相关专业,包括计算机科学、信息安全、数据科学与大数据技术、人工智能、通信、物联网等领域的在校学生、专业教师、企业员工。 3.项目具有丰富的拓展空间,不仅可作为入门进阶,也可直接作为...
Heckman两阶段回归结果 分组回归(组间系数检验) 工具变量回归模型(2SLS模型) 调节效应(包含画图分析) 中位数回归(解决极端值问题) PSM倾向性得分匹配回归结果 分享文件中包含代码以及示例数据,大家可以照着...
本书的每个知识点都配备了精简示例或案例,每一段示例或案例都配有完整代码,主要代码都配有详细的代码说明。同时为了便于教师的教学,还配备了精彩的电子教案。 本书适合作为各高校Python教材,同时也适合Python...
3. 阶段考试:共计6次,老师随机选择一道进行考试。 4. 实验要求:每次实验内容要求在课内时间段进行提交,超时拒绝接受。代码相同者均计0分。 5. 实验报告:共5次实验报告,提供报告模版,由学生添加关键代码。实验...
下面我们就介绍如何制作自己的人脸数据集,该项目可以分为两个阶段,第一阶段是人脸图片的获取和简单的清洗,第二阶段是人脸图片的高级清洗和标注人脸信息。人脸信息的标注和清洗使用到了百度的人脸识别服务。 - 不...
matlab指纹定位代码室内位置 东北大学信息处理实验室 作者:彭武,倪珂授课教师:Closas教授 报告: 介绍 室内定位已经得到了很大的改善,并且由于近两年来智能手机和其他无线设备等物联网(IOT)的广泛使用,室内...
我还要感谢孟岩老师,你给我的鼓励我一直记在心里。我要感谢我的挚友郭洪桥,不仅仅因为你在技术上给我的帮助,更加因为你在精神上给我的支持。感谢我的同事和朋友张会昌,你在技术上的广度和深度总令我钦佩。另外,...
我还要感谢孟岩老师,你给我的鼓励我一直记在心里。我要感谢我的挚友郭洪桥,不仅仅因为你在技术上给我的帮助,更加因为你在精神上给我的支持。感谢我的同事和朋友张会昌,你在技术上的广度和深度总令我钦佩。另外,...
本项目主要分为管理员跟教师两个角色;各个模块具体功能如下: (1)教师管理:管理员添加教师基本信息,这一功能是必要的,通过登记教师的基本信息,可以在关键时刻快速的查阅资料,找到教师人员。 (2)课程管理:...
基于JSPweb教学管理系统程序源代码+设计说明学生成绩教师课程教学管理 一套相对完整的JSP毕业论文——教学管理系统,用JSP开发与实现动态网站的好范例,描述了J2EE的相关技术,比如Servlet,JSP,Struts,Hibernate...
本文中所设计的网上考试系统,主要有两个大的模块组成:一是考生在线考试模块,考生在本系统注册后,在考试时间开始后即可登录到本系统参加考试,参加考试的题目由系统随机从题库中抽取,考生中途不得对试卷进行刷新...
·拒绝晦涩难懂的呆板教学,宋老师语言生动幽默,举例形象生动深入浅出,迅速让你把握问题本质,四两拨千斤 2.课程内容推陈出新: ·基于JDK 11,将Java8、Java9、Java10、Java11新特性一网打尽 ·课程中,Eclipse...
·拒绝晦涩难懂的呆板教学,宋老师语言生动幽默,举例形象生动深入浅出,迅速让你把握问题本质,四两拨千斤 2.课程内容推陈出新: ·基于JDK 11,将Java8、Java9、Java10、Java11新特性一网打尽 ·课程中,Eclipse...
将老师和同学共同操作的成绩查询工作转为老师和同学跟计算机系统共同完成 操作,提高成绩查询效率,节省查询时间,降低人的工作强度。 ⒉数据描述 数据库描述 数据库作为公共课平时成绩查询系统的基础之一,主要是...
每个时间步输入特征个数] ,循环核时间展开步数我在代码中设计为使用前30天的数据,预测出第31天的数据,以此类推,每个时间步的输入特征个数我在代码中的设计为将当天的分解后特征每个时间段仅对应其中五个原数据...