一道VB输出结果的小题目

在网友发出求解请求:

解答如下:

程序测试:

代码

Private Sub Command1_Click()
a = 3
b = 2
c = -3

d = Abs(b + c) + a * Int(Rnd + 3) + Asc(Chr(65 + a))

e = Abs(b + c)
f = a * Int(Rnd + 3)
h = Chr(65 + a)
g = Asc(Chr(65 + a))

Label2.Caption = e
Label3.Caption = f
Label4.Caption = g
Label1.Caption = d

Label8.Caption = h

End Sub

运行结果:

总结:

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...