vb问题急请教各位大侠！！！！

[阿环提]

Private Sub Command1_Click()
Dim num As Integer
num = 1
Do Until num > 6
Print num;
num = num + 2.4
Loop
End Sub
上段程序为什么输出的是整型的数值
麻烦各位大侠告诉一声，不胜感激！！！！！

[东海凌波]

不明白你的程式怎么运行的，VB里面怎么会有逗号
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim num As Integer
num = 1
Do Until num > 6
Label1.Text = num & ","
num = num + 2.4
Loop
Label1.Text = Label1.Text.Substring(0, Label1.Text.Length - 1)
End Sub

[东海凌波]

说错了，是分号“；”

[阿环提]

这层我就不知道了，用vb6.0运行了发现它是按一下按钮就输出再按一次就换行输出。我是初学的，为了应付计算机二级考试[Quote=引用 4 楼 dhlb 的回复:]
说错了，是分号“；”
[/Quote]

[yanyuchonglou]

[Quote=引用 2 楼 m512187119 的回复:]
Dim num As double
可以这样声明
[/Quote]

对的。

[ziyouli]

[Quote=引用 4 楼 dhlb 的回复:]
说错了，是分号“；”
[/Quote]

看这代码就是vb6的，现在很多人把vb6和vb.net混了，正常事...

这个输出的是整数那是因为你把num定义成integer类型的原因，每次赋值自动取整。

[l_g_guo]

Dim num As single'定义为单精度变量，应该可以输出小数。

[l_g_guo]

应付考试，可以用VB6.0，因为试题可能也是VB6.0，如果编写小软件，还是用VB2010，比较方便。

[m512187119]

Dim num As Integer
变量声明类型为整型的当然是那样的结果

[m512187119]

Dim num As double
可以这样声明