yuyuandadan的博客

vb编写的孔明棋小游戏源码 Public Sub disable() For i = 1 To 36 Label1(i).BackColor = &H8000000F; Label1(i).Enabled = False Next i End Sub Public Sub start(o) For k = 1 To o For l = 1 To 36 If (l >= (6 * k - 5)) And (l <= (o + 6 * k - 6)) Then Label1(l).Enabled = True Label1(l).BackColor = &HC000;& temp(l) = 0 End If Next l Next k End Sub Public Sub finish() s = 0 For i = 1 To 36 If temp(i) = 1 Then s = s + 1 End If Next If s = n * n Then MsgBox "恭喜您！", , "获胜" n = n + 1 Call start(n) End If End Sub

jsp环境配置tom-cat时需要保证lib文件夹里须有的压缩包

该txt文件记录的是邻接矩阵转化成可达矩阵的源代码。

该可执行文件格式是exe，功能是用于讲邻接矩阵转化成可达矩阵。

该文件是一个比较简单的静态网页，内容是阅读类网站的首页。