VB选择文字求助

来源：百度知道 编辑：UC知道 时间：2024/06/16 23:05:31
编程，用程序选择文本框中的文字，程序界面如图。要求：
程序运行时，文本框Text1中立即自动显示“好好学习，天天向上。”并且使“结束”(Command2)按钮不可用。
单击“选择”（Command1)按钮，要求分别用InputBox输入选择文字的起点和要选中的文字数目，然后选中这些文字，并把焦点定位到文本框中，并使“退出”按钮可用。
单击“退出”按钮结束程序运行。

Private Sub Command1_Click()
Text1.SelStart = InputBox("请输入选择文字的起点", "输入", "0")
Text1.SelLength = InputBox("请输入要选中的文字数目", "输入", "0")
Text1.SetFocus
Command2.Enabled = True
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Text1.Text = "好好学习，天天向上"
Command2.Enabled = False
End Sub
这个应该满足你的要求吧

textbox.selstart
textbox.sellength
试一试就明白了