专栏首页力哥聊运维与云计算vb6中使text控件的光标随着增加的内容向下移动

vb6中使text控件的光标随着增加的内容向下移动

vb6中使text控件的光标随着增加的内容向下移动

Dim i As Integer

Private Sub Command1_Click()

Text1.Text = Text1.Text + "test..." + CStr(i) + Chr(13) + Chr(10)

i = i + 1

End Sub

Private Sub Form_Load()

i = 1

End Sub

Private Sub Text1_Change()

Text1.SelStart = Len(Text1.Text)

End Sub

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • 健步如飞--让虚拟机完全跑在宿主机内存中

    最近有些应用需要高iops,尝试看看能不能让虚拟机直接跑在宿主机的内存中,成功了;

    力哥聊运维与云计算
  • 禁止server 2008域端口的脚本

    netsh advfirewall firewall set rule name=all protocol=TCP dir=in localport=9389 ...

    力哥聊运维与云计算
  • RHEL 6.5 中的KVM虚拟化新特性

    昨天看到redhat官网的资料,RHEL 6.5 中会增加许多KVM虚拟化新特性,有些特性在实际工作中可能非常有前景,比如windows虚拟机的agent,原生...

    力哥聊运维与云计算
  • 计算机高职专业VB知识要点002,案例涉及控件:复选框combobox、列表框listbox、框架组frame、单选按钮、多选框

    3.combobox复选框添加一项,使用additem,这个函数的第一个参数表示添加什么文字,第二个参数表示添加到第几项,注意第二个参数从0开始表示

    刘金玉编程
  • 《最重要的事,只有一件》第一部分 谎言 误导并阻碍成功

    yeedomliu
  • 我是如何准备技术面试的

    我是如何准备技术面试的 前拿到的知名公司的offer是腾讯和新美大(大众点评、美团)。一直想写一篇面经分享给大家,但因为一些琐碎的事情,就一直耽误着。 今天就...

    用户1289394
  • 使用Supervisor管理进程

    Supervisor (http://supervisord.org) 是一个用 Python 写的进程管理工具,可以很方便的用来启动、重启、关闭进程(不仅仅是...

    喝茶去
  • [成功]成功的要诀是什么?是意志力

    成功的要訣是什麽?是意志力 ? 优秀的学生和表现差的学生之间,最大的区别并不是智商,只要他们足够认真,坚持,就能学的很好。 在各种测验中,一个人是否成功通过,在...

    杨熹
  • Android WiFi热点开发的示例代码

    上次写了Android连接匿名WiFi的内容。WiFI开发对于应用层开发是比较小众的知识点,不过既然用到了就在此记录下。

    砸漏
  • pt-osc工具的一个细节

    在MySQL中,如果我们需要对大表进行变更,往往使用gh-ost或者pt-osc工具,我平日里使用pt-osc比较多,来说说这个工具使用过程中的一个细节吧。关于...

    AsiaYe

扫码关注云+社区

领取腾讯云代金券