比如，支持了自定义大小

楼主幸苦了,感谢楼主分享!

感谢分享！不过我编译了几次出来的软件都是白屏的呢？不知道有一样的情况吗？

来学下

编译后生成了apk，打开了模拟器，运行时不行。将apk放到模拟器中打开提升无法解析安装包！为什么？

编译以前保存的程序，安装到手机白屏。仍然不能关闭打开的软件，有一个软件正在编辑时不能打开另一个软件。文件操作没有改进，仍然是原来的问题，保存文件时不能覆盖，否则闪退，打开文件无法实现，闪退。
Event Button1.Click()
Dim file1 As Integer
file1 = Open2("/sdcard/1/file1.txt")
Files.WriteString(file1, TextBox1.Text)
Files.Close(file1)
TextBox2.Text = "OK"
End Event
Event Button2.Click()
Dim file2 As Integer
Dim str1 As String
file2 = Open2("/sdcard/1/file1.txt")
str1 = Files.ReadString(file2)
Files.Close(file2)
TextBox2.Text = str1
End Event

感谢楼主还在努力

好

楼主可以尝试把vb4a移植到pc端的java环境下

做的还可以，就是完善一下ListView控件，不能用，手机运行闪退，那个媒体播放也闪退，字符数组感觉有问题，给每个元素赋值就死机，数组已定义。mynam（1）＝“a”

编译失败是怎么回事啊？

有好用的中文版的软件吗？请分享一下。