VB会的指点下

[复制链接]
查看11 | 回复1 | 2010-4-1 22:44:56 | 显示全部楼层 |阅读模式
Dim r As SingleDim s As SingleDim k As Singler = Val(Text1.Text)s = Val(Text2.Text)k = s + rText3.Text = Str(k)
回复

使用道具 举报

千问 | 2010-4-1 22:44:56 | 显示全部楼层
你的字符定义的是single(单精度浮点)也就是小数类型,我认为应该改为integer(整数),试一下
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行