以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  文本框字体的显示问题?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=52944)

--  作者:身份不明
--  发布时间:2014/6/26 8:43:00
--  文本框字体的显示问题?

图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看
能否当我打开文本框的时候,里面的号码字体可以变大一号字体呢。这样位数在多,字体看小,看久了眼睛花了。
--  作者:Bin
--  发布时间:2014/6/26 8:45:00
--  
自己设置一个窗口,放一个多行文本控件,字体随意设置.

CellButtonClick事件 执行e.cancel=true 取消原有窗口打开   执行forms(X).show 打开自己设计的窗口

--  作者:身份不明
--  发布时间:2014/6/26 8:55:00
--  

Bin,因为我号码的格式的是00000000-00000000,如果我的号码前后都是8位号码,算上“-”符号,一共应该是17位号码,

怎么在号码录入后,有个号码位数的校验功能呢?


--  作者:Bin
--  发布时间:2014/6/26 8:58:00
--  
设置输入掩码 00000000-00000000
--  作者:身份不明
--  发布时间:2014/6/26 8:59:00
--  
位数不固定啊,有时候8位,有时候7位,最多的时候是17位的
--  作者:身份不明
--  发布时间:2014/6/26 9:00:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:4.jpg
图片点击可在新窗口打开查看
在生成Excel的时候,提示语句未结束的错误。
--  作者:Bin
--  发布时间:2014/6/26 9:04:00
--  
If e.DataCol.name="第三列" Then
   If System.Text.RegularExpressions.Regex.Ismatch(e.newvalue,"[0-9]{1,17}-[0-9]{1,17}")=False Then
         MessageBox.show("不符合规范")
         e.Cancel=True
   End If
End If