十万火急!VB6.0中的RichTextBox文本如何设置出现滚动条!!!

EM_LINEINDEX, -1, 0)Col = j2 - k End Sub Private Sub RichTextBox1_Change()GetCur RichTextBox1.hwnd, LiN, Col List1.Left = RichTextBox1.Left + Col * RichTextBox1.Font.Size * 10 List1.Top = RichTextBox1.Top + LiN * RichTextBox1.Font.Size * 30 End Sub ...

我复制你的代码，运行成功了。我推测你的错误就像那个人说的，是控件名的问题 你应该确认一下你显示文本的控件的Name是不是RichTextbox1 如图

我做报表一般用RichTextBox或是From来做,一般都能做的很好,也不用去考虑什么水晶报表了。 (2)不要迷信于API。API能做很多东西,但有些东西在VB里面的函数中就有,API只是VB对WindowsSDK的封装而已。如果想学好API,建议学习SDK。如果VB本身就能很好的支持这个功能,何必还要用API呢。 (3)不要什么都想着控件。如果...

VB的文本框不支持这种操作，你可以用富文本框来实现这种操作。打开工程菜单，选部件，选中Microsoft Rich Textbox Control，确定。然后就可以把富文本框添加到窗体上了。下面是实现对齐的代码。Private Sub Command1_Click()RichTextBox1.SelAlignment = rtfLeft End Sub Private Sub Command2_Click()Rich...

'RichTextBox超链接示例，tonkeys原作代码'2013-5-21Private Sub RichTextBox1_Click() Dim L As Integer, R As Integer, C As Integer C = RichTextBox1.SelStart cfu = RichTextBox1.SelUnderline L = -1 cc = Len(RichTextBox1.Text) - 1 If cfu Then us = ...

工程---部件---Microsoft Rich Textbox Control 6.0 (SP6)---勾选---确定 工具栏里就出现了

RichTextBox1.SetFocus '把光标移到指定的文本框中 End Sub Private Sub MenuCut_Click() '剪切 Clipboard.Clear '清空剪贴板内容 Clipboard.SetText RichTextBox1.SelText '设置剪贴板内容为选定文本 RichTextBox1.SelText = "" '删除文本框中选定内容 End Sub Private Sub MenuCo...

这种东西，专业点的一般是用数据库来储存聊天记录。。如果你不想用。。可以每次收到消息的时候，先将原richtextbox.text的内容存入一个变量。。然后追加内容。。。

1．总体思路 先建立一个标准EXE工程，在窗体上建立三个命令按钮控件、一个通用对话框控件和一个 Richtextbox控件，然后通过[打开文件]按钮的触发事件，选择要朗读的文本文件，把文本内容输出到Richtextbox框中，再通过[开始朗读]按钮触发事件，同时调用Excel对象的语音方案，将Richtextbox框中的文本全部朗读...

其中:     TextID.Text = "" 是把会员编号文本框中的内容清空,其它语句与此类似。   FormBack.TextAll.Text = LblID.Caption  " "  TextID.Text _  vbNewLine  该语句设置FormBack窗体中TextAll文本框的文本。vbNewLine是换行显示标志。“ _”是续行标志...