在B4A (basic4android)中使用脚本为按钮或标签添加边框并设置其样式？

Sub Activity_Create(FirstTime As Boolean)
    ' 设置按钮的边框和样式
    Dim btnBorder As Panel
    btnBorder.Initialize("")
    btnBorder.Color = Colors.Transparent ' 设置边框颜色为透明，可以根据需要修改
    btnBorder.AddView(btnExample, 0, 0, btnExample.Width, btnExample.Height)
    Activity.AddView(btnBorder, btnExample.Left, btnExample.Top, btnExample.Width, btnExample.Height)
End Sub

Sub Activity_Resume
    ' 设置按钮的样式
    btnExample.TextColor = Colors.White ' 设置按钮文本颜色，可以根据需要修改
    btnExample.Background = btnBorder ' 设置按钮的背景为边框控件
End Sub