16168.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 31 行

HTML
31
字号
<html>
  <head>
    <title>Re: 请问二个问题~</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 请问二个问题~</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by 老洪 on July 26, 1999 at 09:23:44:<p>
In Reply to: <a href="16139.html">请问二个问题~</a> posted by 小洪 on July 25, 1999 at 15:38:53:<p>
: 请问您一个读档的问题,为什么用以下的语法读一个档的全部内容的话<br>: 如果被读取的该档是中文的话就会显示"输入己超过档案结尾"的错误讯息<br>: Text1.Text = Input#(LOF(1), 1)<p>试试如下的方法:<br>dim barr() as byte<p>Open "c:\test.txt" for Input as #1<br>barr=InputB(LOF(1),1)<br>Text1.Text=StrConv(barr,vbUnicode)<br>close #1<p>  <br>: 另一个问题则是,要怎样让一行文字中的第n个文字变色呢?<br>RichTextBox1.SelStart = n+1<br>RichTextBox1.SelLength = 1<br>RichTextBox1.SelColor = QBColor(12)<p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 16168-->
<!--top: 16180--><li><a href="16180.html">Re: 请问二个问题~</a> <b>小洪</b> <i>12:32:42 7/26/99</i>
(<!--responses: 16180-->1)
<ul><!--insert: 16180-->
<!--top: 16199--><li><a href="16199.html">Re: 请问二个问题~</a> <b>老洪</b> <i>17:40:57 7/26/99</i>
(<!--responses: 16199-->0)
<ul><!--insert: 16199-->
</ul><!--end: 16199-->
</ul><!--end: 16180-->
</ul><!--end: 16168-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?