中国内乱:vb中数据如何输入

来源:百度文库 编辑:高校问答 时间:2024/05/01 14:02:20
我想通过TEXT输入一些数据,然后将其保存在一个变量里.如何实现
比如说,程序运行,要求在文本框中输入姓名,通过循环将N个人的姓名输入,将其存储在一个数组中.
我运行时,按回车,光标仍闪,无法结束!
请教高人!!!!

dim mmm() as string
dim i as integer
sub init()
redim mmm(1 to 1)
i=1
end sub
sub text_keypress(k as integer) '参数记不得了
if k<>X then exit sub '这里的X是回车的ascii代码,不知道写vbcrlf可以不
redim mmm(1 to i) '有一个用法可以保证里面所保存的内容不会被清掉
i=i+1
mmm(i)=text.text
end sub

临时写的,没有环境调试,另外好久没有用了,所以可能有一些基本的错误,但是这样的思路应该可以满足你的要求了

dim abc as string
abc=text1.text

用读文件函数啊 OUTPUT "路径“ AS #**再讲其赋值给变量啊

FSO可以读取硬盘上的文件内容,可以参考一下相关的知识

先设一个变量,再将TEXT的TEXT属性值付给变量就可以了!~
^O^