13518219792
Public Class Form1
创新互联公司专业提供西云机房服务，为用户提供五星数据中心、电信、双线接入解决方案，用户可自行在线购买西云机房服务，并享受7*24小时金牌售后服务。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim N As Integer = 9
Randomize()
Dim xx(9) As Integer
For i As Integer = 0 To N
xx(i) = Int(Rnd() * 1000) '产生 [0,1000) 之间的整数
Next
For i As Integer = 0 To N - 1
For j As Integer = i + 1 To N
If xx(i) xx(j) Then
Dim temp As Integer = 0
temp = xx(i) : xx(i) = xx(j) : xx(j) = temp
End If
Next
Next
Dim sum As Integer = 0
For i As Integer = 0 To N
TextBox1.Text += xx(i) vbCrLf
sum += xx(i)
Next
TextBox1.Text += "最大值：" xx(9) vbCrLf "最小值：" xx(0) vbCrLf "平均值：" sum / 10
End Sub
End Class
没有“十进制整数型表示范围”的说法，是整型或长整型类型的表示范围，每种数值类型都有常数，如Integer的最大值和最小值：Integer.MaxValue ,Integer.MinValue 。鼠标停留在这个语句上时会显示它的数值的。integer是32位的，大概有个20亿的正负值吧。
其实没有所谓的VB2010，应该是VS2010，其中集成了VB、C#等一系列开发语言，也就是在VS中，你可以选择其中一种语言来进行开发，这些语言都工作在.Net的框架中。所以，VS2010中包括了VB.Net。
