十六进制异或运算法则_异或（xor）是一个数学逻辑运算符，如:x xor y，其运算具体方法描述如下： ⑴分别将十进制数x,y转换为二进制,并将转换的每位二进制数存储到数组a,b中；如果两个二进制位...

(2)

实现上述功能的VB程序如下，请在①、②、③的划线处填入合适的代码。

Dim m As Integer

' 学生人数

Dim score(1 To 3000) As Integer  ' 存放学生分数

Dim xm(1 To 1000) As String  ' 存放学生姓名

Private Sub Command1_Click()

Dim i As Integer, t As Integer, code As Integer, mc As

Integer

Dim a(0 To 100) As Integer  '存放每个分数的个数

Dim b(0 To 100) As Integer  '存放每个分数的名次

Dim

code_n(1 To 3) As String

code_n(1)

= "游泳" : code_n(2) = "跑步" :

code_n(3) = "跳远"

code

= Val(Text1.Text)

For i

= 0 To 100

a(i) = 0

Next

i

sum =

0

For i

= 1 To m  '计算每个分数的个数及体能测试优秀的人数

t =①

a(score(t)) = a(score(t)) + 1

If score(t) >= 90 Then sum = sum + 1

Next

i

mc =

1

For i

= 100 To 0 Step -1  '计算每个分数的名次

If a(i) <> 0 Then

b(i) = mc

mc =②

End If

Next

i

List2.Clear

List2.AddItem

" 姓名  " +③ + "

名次"

For i

= 1 To m

'在List2中输出m个学生的姓名、指定项目的分数及名次，代码略

Next

i

sum =

Int(sum / m * 10000 + 0.5) / 100

Label2.Caption

= "优秀率是：" + Str(sum) +"%"

End

Sub

Private

Sub Form_Load()

’从数据库读取姓名存入数组xm，体能测试数据存入数组score，总人数存入变量m。

’代码略

End

Sub

①________②________③________