3个回答
展开全部
新建一个VB的EXE程序，画一个TEXT1，将文本改为110，再画一个COMMAND1，复制以下代码
Option Explicit
Private Sub Command1_Click()
Dim a As Single
a = CSng(Text1.Text)
Print a
End Sub
将字符串转换成数字的函数还有，CInt和Val都是整型,CLng长整型，用法和本例差不多的。本例中的CSng是单精度型的也就是小数型的。
Option Explicit
Private Sub Command1_Click()
Dim a As Single
a = CSng(Text1.Text)
Print a
End Sub
将字符串转换成数字的函数还有，CInt和Val都是整型,CLng长整型，用法和本例差不多的。本例中的CSng是单精度型的也就是小数型的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
