此程序只用于学习研究，请勿用于非法活动。下载后请于24小时内删除。否则，后果自负。 Public Class Form1 Dim wi() As Integer = {0, 7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2} Dim ai() As String = {"0", "1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2"} Private Sub Button1_Click(B