VB Property Get/Let怎麼用
这就是面向对象里面的属性的封装了，虽然通常我们认为VB是伪面向对象，但是封装这个概念还是有的get是得到值 let是给属性赋值Private re_Text As StringPublic Property Let Text(ByVal NewValue As String) re_Text = NewValueEnd PropertyPublic Property Get Text() As String Text = re_TextEnd Propertyre_Text这个属性是私有的，外界无法访问，代码给出外界访问属性Text 分别具有Get和Let外界通过Text的Get可以读取到re_Text的值 同样通过Text的Let可以给re_Text赋值，如果只有Get 说明re_Text属性为只读，相反只有Let为只写不可读 外界用法 a.Text="abc" 执行完这句 a的私有成员re_Text的值已经是“abc”了，如果调试代码，你会发现这个过程中代码走进了Let里面（扩展：往往编程者会在Let代码段里做点其他同步的事，不如把sexid的let成1，那么同时sexname赋值成“男”实现性别编码和性别名称这两个属性时刻保持一致），同样string b=a.Text 执行这个代码会走到Get代码段里
VBA 写了一个简单的类，对属性先let再get，可是在let中总是提示“属性使用无效”
属性可以带参数，且可以带任意个数，比如在sheet1的代码中定义以下属性。为了方便起见，我虽然定义了两个参数，但实际只用了一个。注意get 和 let、set的参数的数量、名称、类型必须一致，对let或set，参数的排列顺序是自己的参数排在前面。123456789Dim arr(1 To 2) As String Public Property Get a(n As Integer, n1 As Integer) As String a = arr(n)End Property Public Property Let a(n As Integer, n1 As Integer, ByVal vNewValue As String) arr(n) = vNewValueEnd Property然后在其他地方就可以这样调用属性（注意只用了第一个参数，第二参数随便写的）1234567Private Sub CommandButton1_Click() Sheet1.a(1, 88) = "我" Sheet1.a(2, 24) = "你" MsgBox Sheet1.a(1, 32) MsgBox Sheet1.a(2, 55)End Sub这时会弹出两次对话框，分别显示 我 和 你。
Android 文件系统中添加文件及添加系统属性
android是linux系统，文件系统有很严格的权限设置，如果你的apk没有root权限那么你只能在有限的地方如sdcard目录下读写文件
至于读写文件的方法，最简答的在java上直接用FileInputStream类就可以
如果是ril层用c/c++的话，在ndk下直接用fopen fwrite就行了
所以核心问题是你的apk应用有没有权限来读写sys/data这个目录，如果想得到root权限，只能考虑使用一些本地权限提升漏洞的exploit来获得
VB 编译错误：无效外部过程
是把代码写在子过程、函数过程或属性过程外而发生的错误。在过程外无效：该语句必须发生在子过程、函数过程或属性过程（Property Get、Property Let 和 Property Set）内部。这个错误的起因与解决方法如下所示：*一个可执行的语句，如 Static 或 ReDim，出现在模块级别中。在模块级中 Static 是不需要的，因为所有的模块级变量都是静态的。在模块级中用 Dim 来代替 ReDim。想要在模块级中创建动态数组，请用 Dim 加空括弧来声明它。注意 在模块级只能使用注释与声明性语句，例如 Const、Declare、Deftype、Dim、Option Base、Option Compare、Option Explicit、Option Private、Private、Public 和 Type。子过程、函数过程和属性过程语句发生在它们的过程体之外，但在过程内声明。