私有子窗體_Load()
對於i = 1到80
負載C(i)
丙(壹)。可見=真
如果我Mod 9 = 0,那麽
丙(壹)。左= C(0)。左邊的
丙(壹)。Top = C(0)。Top + C(0)。高度* Int(i / 9)
其他
丙(壹)。左= C(i - 1)。左+ C(i - 1)。寬度
丙(壹)。Top = C(i - 1)。頂端
如果…就會結束
接下來我
末端接頭
該事件可以獲取按鈕所在的行數和列數。
私有Sub C_Click(索引為整數)
X = Int(Index/9)+1 'x表示行數。
Y = (Index Mod 9)+1 '表示列數。
MsgBox "此按鈕在第壹個" &;x & amp“好的,第壹個”&;y & amp“列。”
末端接頭