我附上了一些示例代碼的問題。我用兩行和一個位圖創建一個列表視圖。我禁用第二個標籤，所以我只有圖像和一個標籤。我想垂直居中文本，似乎無法弄清楚！ Sub Globals
Dim listview1 As ListView
Dim bitmap1 As Bitmap
End Sub
Sub Activity_Create(FirstTime As Boolean)
bitmap1.Ini
我有這個代碼在我的項目中工作很好，但想知道最簡單的方法來允許它用於多個按鈕而不重複代碼。例如 - 我有mybuttonBTN1下面，並想添加mybuttonBTN2等 - 我嘗試了幾種方法，但總是得到奇怪的結果。 Dim buttonSLD As StateListDrawable
buttonSLD.Initialize
Dim buttonSTS(2) As Int
buttonSTS(
擴展我以前的問題，我試圖重用代碼爲多個按鈕分配顏色/狀態。在我的最後一個問題中，我忘記了代碼的顏色部分。這是我正在嘗試的 - 但獲得一個Undeclared變量'buttonprs'之前使用它被分配任何值。正如我正在學習 - 我敢肯定，我有語法問題，並感謝您的幫助！ Sub SetStateDrawable(Btn As Button, buttonPRS As ColorDrawable, bu
我想我可能在這裏有錯誤的想法 - 有人可以讓我變直嗎？ 我有一個標籤，當點擊時會導致一個面板出現 - 我用panel.visible = true做了這個 - 事實上它非常笨重，但我希望它可以滑動打開。 所以我使用了for-next循環來動態改變面板的高度，我試圖用計時器來減慢速度。但我做錯了： Sub button_click
For i = 1 to 500
counter = i
ti