摘要： 24点代码如下 Public Sub king(ByVal i As Integer) Select Case i Case 1 A = numberA B = numberB C = numberC D = numberD data(A, B, C, D) Case 2 A = numberA B = numberB C = numberD D = numberC data(A, B, C, D) Case 3 阅读全文