返回首页

vb编写程序,读入十个数并且现实互不相同的数

发布时间：2016-06-01 18:42:44

代码如下，如有疑问，可追问： Private Sub Command1_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = InputBox("请输入第" & i & "个数：") Print a(i); Next i Print Max = a(1) Min = a(1) For i = 1 To 10 If Max < a(i) Then Max = a(i) If Min >

相关内容

最新内容

← 上一条：跪求！2011年四川专升本复习资料---西华 下一条：西华大学专升本复习资料 →

热门栏目