在VB6.0中用RichTextbox控件总出错
我是一个VB的初学者,在学习VB菜单编辑器时例题用RichTextbox控件时在文件打开时总出错,下面是程序代码,请高手指点一下,找了好久也没有解决办法.
Private Sub munopen_Click()
CommonDialog1.DialogTitle = "请选择一个文件"
CommonDialog1.Filter = "文本文件(*.txt)|*.txt|写字板文件(*.rtf)|*.rtf|所有文件(*.*)|*.*"
CommonDialog1.FilterIndex = 1
CommonDialog1.InitDir = "F:\"
CommonDialog1.Flags = 4
CommonDialog1.ShowOpen
RichTextbox1.loadfile CommonDialog1.FileName
Form1.Caption = CommonDialog1.FileName
就是RichTextbox1.loadfile CommonDialog1.FileName这一句出错
我在运行中选择了文件也是报错,刚才有人说是richtextbox1和添加的控件名称不符合,能告诉我在什么地方设置相符吗?
我复制你的代码，运行成功了。
我推测你的错误就像那个人说的，是控件名的问题
你应该确认一下你显示文本的控件的Name是不是RichTextbox1
如图
RichTextbox1.loadfile CommonDialog1.FileName 可不就出错了
if CommonDialog1.FileName<>"" then RichTextbox1.loadfile CommonDialog1.FileName
添加richtextbox控件流程
打开工程菜单--部件--列表中选择 microsoft rich textbox control 6.0
然后从 工具箱 点选（图标右下角带红色A字样）控件 添加到窗体中
在VB6.0中用RichTextbox控件总出错
我复制你的代码，运行成功了。我推测你的错误就像那个人说的，是控件名的问题 你应该确认一下你显示文本的控件的Name是不是RichTextbox1 如图
RICHTEXTBOX中字体修改问题,非常奇怪【VB6.0中】
那是因为“18”这里用的是全角的引号！其实这个属性值的类型是数值型，所以是不用加引号的（不过用了引号的话VB也会自动转化为数值型，所以不会出错，但是如果连引号都用错了，那就没办法了）。正确的应该是：Form18.RichTextBox1.Font.Size = 18 Form18.RichTextBox2(0).Font.Size = 16 Form...
一个在vb6.0中用richtextbox文本框的问题
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Sub Command1_Click()Dim Start As Long, Length As Long Start = SendMessage(RichTextBox1.hwnd, EM_LINEINDEX...
Microsoft RichText Box 6.0
Private Sub Form_Resize() '设置richtextbox属性 窗体大小改变会触发的事件 On Error Resume Next '如果出现错误，忽略错误，继续执行 RichTextBox1.Top = 900 RichTextBox1.Left = 20 RichTextBox1.Height = ScaleHeight - 40 RichTextBox1.Width = ScaleWidth - 40 End Sub Private S...
vb6.0,richtextbox文本框中,在win8下,用搜狗输入法输入文字,返回的光 ...
因为搜狗输入法输入时预留一位，我的也是这样，似乎也找不到可以判断输入法的函数，目前我想的办法暂时只有统计光标位置的时候暂时调整IMEMode关闭输入法，统计完了之后跳回去
VB里怎么没有Microsoft Rich Textbox Control 6.0
那可能是精简版精简掉了你的Richbox插件，你到网上找RICHTX32.OCX，下载一个，放到C:\\Windows\\System32\\ 里面就行的。如果vb中还不显示，就点击部件对话框里的浏览，然后打开你的RICHTX32.OCX就行了。我原来也遇到过这类问题，到网上下载一个就ok了。。你留个邮箱，给你传过去也行 ...
VB6.0中RichTextBox判断语法
我也是一个初学者，我想这也许可以用这样来实现 Private Sub RichTextBox1_Change()Dim a, b, i If RichTextBox1.SelStart < 4 Then Exit Sub b = RichTextBox1.SelStart For i = 1 To 4 RichTextBox1.SelStart = RichTextBox1.SelStart - 1 RichTextBox1.SelLength = 4 Next If ...
vb用input出错,说什么超出文件尾
2..用RichTextBox控件实现。添加部件:Microsoft Rich Textbox Control 6.0添加控件:RichTextBox1添加读取语句：RichTextBox1.LoadFile FileName速度比较的快，方便简洁。然后让你的字符串变量为RichTextBox1.text就可以了。参考自:http:\/\/zhidao.baidu.com\/link?url=3RHbVfLlhLOeQFiza39GskqTaY3dKGO...
vb6.0 RichTextBox 的用法
RichTextBox的功能与用法大体上与TextBox（文本框）相似，但其功能更加强大，缺点是占用内存空间更多。其最突出的优点是对字体的改变更灵活，多出了一些属性和方法。这里简单说几个：改变字体：控件名.Font.Name = ... '比如："宋体" （双引号必须有）改变字体大小：控件名.Font.Size = '...
VB6.0 的richtextbox控件中如何使滚动条始终向下
richTextBox1.Select(richTextBox1.TextLength, 0);\/\/然后移动滚动条，使输入点(text entry point)(即光标所在的位置）显示出来 \/\/这样也可以达到滚动到最下方的目的 richTextBox1.ScrollToCaret(); 二. 输入时滚动条始终在下：richTextBox1的TextChanged事件 private void richTextBox1_TextChanged(...
