Vb中textbox输出的数据是字符串类型吗?

 我来答
sbj518
2016-03-22 · TA获得超过4.4万个赞
知道大有可为答主
回答量:1.1万
采纳率:81%
帮助的人:5327万
展开全部
是字符串类型的
要转换为数值类型的可以使用val进行转换
是字符串类型的
要转换为数值类型的可以使用val进行转换
是字符串类型的
要转换为数值类型的可以使用val进行转换
匿名用户
2016-03-22
展开全部
在窗体内加入控件text1,然后复制下面代码,运行即可(此功能不太完善,供参考):

Option Explicit

Private Sub Form_Load()
Text1.Text = " - - : : " '初始化格式
End Sub

Private Sub Text1_Change()
Select Case Text1.SelStart
Case 4, 7, 10, 13, 16 '位置控制
Text1.SelStart = Text1.SelStart + 1
End Select
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim i As Long
With Text1
If IsNumeric(Chr(KeyAscii)) = False Then KeyAscii = 0: Exit Sub '非数字退出
i = .SelStart
If i = 19 Then '防止数字输入超出范围
KeyAscii = 0
Exit Sub
End If
.Text = Left(.Text, i) & Mid(.Text, i + 2)
.SelStart = i
End With
End Sub
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
海岸过客
2016-03-22 · TA获得超过718个赞
知道小有建树答主
回答量:480
采纳率:100%
帮助的人:185万
展开全部
是的
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式