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。
当前名称:vb.net10 windows11 vbs
转载源于:https://www.cdcxhl.com/article38/hgipsp.html
成都网站建设公司_创新互联,为您提供标签优化、网站建设、网站改版、网页设计公司、网站内链、品牌网站制作
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联