VB数组应用实例-成绩统计

时间:2013-12-19 16:34:00
【文件属性】:
文件名称:VB数组应用实例-成绩统计
文件大小:2KB
文件格式:RAR
更新时间:2013-12-19 16:34:00
成绩统计 VB数组应用实例-成绩统计 输入成绩部分: Private Sub Command1_Click() Dim i As Integer Picture1.Cls For i = 1 To N score(i) = Val(InputBox("请输入第" & i & "位学生的成绩")) Picture1.Print score(i); If i Mod 5 = 0 Then Picture1.Print Next i Command2.Enabled = True Command3.Enabled = True Command4.Enabled = True End Sub
【文件预览】:
演示案例1
----Form1.frm(5KB)
----工程1.vbp(623B)
----MSSCCPRJ.SCC(190B)
----工程1.vbw(55B)

网友评论

  • 是对10个数进行总分、平均分的统计 很好的小程序