您可以使用反射来检查应用程序是否在调试模式下:
Sub Activity_Create(FirstTime AsBoolean)
Dim r As Reflector
'Reflector 类主要是用来调用JAVA的API,即调用JAVA来实现目前B4A暂时还没有提供的功能
Dim isDebug As Boolean = r.GetStaticField("anywheresoftware.b4a.BA", "debugMode")
End Sub
您可以使用反射来检查应用程序是否在调试模式下:
Sub Activity_Create(FirstTime AsBoolean)
Dim r As Reflector
'Reflector 类主要是用来调用JAVA的API,即调用JAVA来实现目前B4A暂时还没有提供的功能
Dim isDebug As Boolean = r.GetStaticField("anywheresoftware.b4a.BA", "debugMode")
End Sub