如何实现文本框的表示是数字型的为右对齐、文字型为左对齐? ? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub Command1_Click() If IsNumeric(Text1.Text) Then Text1.Alignment = 1 Else Text1.Alignment = 0 End IfEnd Sub^_^ 楼上正解。判断是不是字符型或者数字型,然后把TEXT的ALIGNMENT动态改变就可以了接点分 VB 请教一个循环的算法,想了两天了没头绪,编程新手 【100分】用VB6 实现XML 文档的修改保存 VB十六进制颜色显示 如何添加新控件? 用shell打开一个QQ,请问如何才能得到QQ的句柄?(最外面的那个框框的句柄) 一个关于颜色的灰常灰常奇怪的问题!!!!! 把应用程序做成控件 菜鸟的烦恼,一个日期输入问题 VBA的API问题!!! 我想要一个类似桌面画图计算面积的小软件 如何响应三键鼠标滑轮 怎么样看到此网页的源代码?
If IsNumeric(Text1.Text) Then
Text1.Alignment = 1
Else
Text1.Alignment = 0
End If
End Sub^_^