vb6 怎么将多个事件信息放到一个textBox中

[tluck_]

依次点击每个按钮将每个按钮返回的信息放到测试信息框内 谢谢各位大神了

[tluck_]

谢谢解决了 我是昨天才接触的 非常感谢

[tluck_]

引用 1 楼 Chen8013 的回复:

假设你输出“测试信息”的文本框为 Text1 简单的做法： 在每个“按钮事件”中，执行一句： Text1.Text = Text1.Text & 返回文本 & vbCrLf 注意两个问题： 1.　TextBox的内容长度有限制，大约最多能显示32768个字符（回车、换行，是两个字符，也要算在内） 2.　文本内容较多时，会有卡顿的感觉。 处理“卡顿”问题，可以用一个模块级的字符串变量来存储显示内容。比如变量名为 strMsg 。 在Form_Load中，写上strMsg = "" 然后，每个“按钮事件”中，写上两句： strMsg = strMsg & 返回文本 & vbCrLf Text1.Text = strMsg 这样处理，“卡顿”问题会有明显改善。 其实如果要显示很多内容的话，用ListView控件来显示比较合适。 一是“容量问题”不用考虑，只要你的计算机内存足够大（当然最多“有效”为4GB）， 　　2GB以上的内存几乎不用担心“内存不够用”了。 二是没有“卡顿”问题，记录几百万条、上千万条消息，跟记录几十条消息，几乎没差别。 　　注意这儿指的是“点一次按钮增加1条或几条消息”的前提下。 　　若是“一次性添加”：如果方法不当，几十条跟几万条，都会有“天壤之别”。

谢谢大神 解决了

[舉杯邀明月]

假设你输出“测试信息”的文本框为 Text1 简单的做法： 在每个“按钮事件”中，执行一句： Text1.Text = Text1.Text & 返回文本 & vbCrLf 注意两个问题： 1.　TextBox的内容长度有限制，大约最多能显示32768个字符（回车、换行，是两个字符，也要算在内） 2.　文本内容较多时，会有卡顿的感觉。 处理“卡顿”问题，可以用一个模块级的字符串变量来存储显示内容。比如变量名为 strMsg 。 在Form_Load中，写上strMsg = "" 然后，每个“按钮事件”中，写上两句： strMsg = strMsg & 返回文本 & vbCrLf Text1.Text = strMsg 这样处理，“卡顿”问题会有明显改善。 其实如果要显示很多内容的话，用ListView控件来显示比较合适。 一是“容量问题”不用考虑，只要你的计算机内存足够大（当然最多“有效”为4GB）， 　　2GB以上的内存几乎不用担心“内存不够用”了。 二是没有“卡顿”问题，记录几百万条、上千万条消息，跟记录几十条消息，几乎没差别。 　　注意这儿指的是“点一次按钮增加1条或几条消息”的前提下。 　　若是“一次性添加”：如果方法不当，几十条跟几万条，都会有“天壤之别”。

[舉杯邀明月]

楼主极可能是刚接触VB6的，还有一个问题可能楼主还不知道： 你“输出信息”的文本框，必须把它的 MultiLine属性设置为True。 这个只能在窗体设计时在“属性窗口”中进行更改，不能在运行中用代码改变的。 把MultiLine设置为True后，再把它的ScrollBars属性，改为2（有垂直滚动条，因为你会有“很多行”信息）。 　如果“每一条信息内容较多”，可以设置为3（水平、垂直滚动条都有）。 VB6的文本框，默认是“单行”的，哪怕你把控件拉得很高、文本内容中有回车+换行，它也只会显示1行文本。 并且从第1个“回车换行”那儿截断了，后面的内容“消失”（只是视觉上的消失，Text属性中还是完整的）。

[赵4老师]

VB6可视化程序设计(无锡职业技术学院)http://download.csdn.net/detail/zhao4zhong1/6824713