关于VB的一个小问题
大家看看下面的代码,是随机函数的:PrivateSubCommand1_Click()DimnAsInteger,mAsIntegerRandomizen=Val(Tex...
大家看看下面的代码,是随机函数的:
Private Sub Command1_Click()
Dim n As Integer, m As Integer
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & Int((m - n + 1) * Rnd) + n & " "
Label3.Caption = p
Next i
End Sub
其中P没有声明,也没有说明,在这里P代表什么?是0还是?
大家看看这样改一下规范吗?
Private Sub Command1_Click()
Dim n As Integer, m As Integer, p As String '声明p为字符型
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & Str(Int((m - n + 1) * Rnd + n)) & " " '将int()转换为字符型
Label3.Caption = p
Next i
End Sub 展开
Private Sub Command1_Click()
Dim n As Integer, m As Integer
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & Int((m - n + 1) * Rnd) + n & " "
Label3.Caption = p
Next i
End Sub
其中P没有声明,也没有说明,在这里P代表什么?是0还是?
大家看看这样改一下规范吗?
Private Sub Command1_Click()
Dim n As Integer, m As Integer, p As String '声明p为字符型
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & Str(Int((m - n + 1) * Rnd + n)) & " " '将int()转换为字符型
Label3.Caption = p
Next i
End Sub 展开
展开全部
在这里p是进行的字符运算,那么p的初始值是空的字符,最后结果是得到n到m之间的一个随机数,但类型是字符型的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Label3.Caption = p
应该写成:Label3.Caption = str(p)吧.
我也是初学者哈,不知道是不是错的,反正我知道caption属性应该是字符型的.
前面第一次运算是数值型的,所以后面要转化成字符型的.
应该写成:Label3.Caption = str(p)吧.
我也是初学者哈,不知道是不是错的,反正我知道caption属性应该是字符型的.
前面第一次运算是数值型的,所以后面要转化成字符型的.
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
p是临时变量,没有显式声明是很不好的习惯
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
表示要输出的结果。。。是str的。。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询