vb简单编程，高中水平，为会考~

显示全部楼层 · 2017-11-27 13:50:53

假设你在界面上已经添加了label1控件，名称为label1，并且将AutoSize属性设为True。Private Sub Command1_Click()Dim i As Integer,strTmp As String,intTmp As IntegerstrTmp="随机产生5个数："
'临时字符串变量赋初值For i = 1 To 5intTmp= Int(Rnd() * 90) + 10;strTmp=strTmp & intTmp & vbTabNext iLabel1.Caption=strTmpEnd Sub...

千问 · 2017-11-27 13:50:53

个位数，求所有的数的和。最好能用VB语境！！= =急急急 Private Sub Form_Click() Dim x As Integer, s As Long, n As Integer x = 100V...

千问 · 2017-11-27 13:50:53

参考这样 label1=“随机产生5个数：" &Int(Rnd() * 90) + 10...

千问 · 2017-11-27 13:50:53

Private Sub Command1_Click() Dim i As Integer
For i = 1 To 5
'Print Int(Rnd() * 90) + 10;'这句换成下面
label1=label1 &Int(Rnd() * 90) + 10 & " "
Next i ...