vb.net10 windows11 vbs

VB.NET 程序随机产生10个整数并进行排序

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) 之间的整数

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

Dim sum As Integer = 0

For i As Integer = 0 To N

TextBox1.Text += xx(i) vbCrLf

sum += xx(i)

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。

当前标题：vb.net10 windows11 vbs
本文URL：http://azwzsj.com/article/hgipsp.html