没事也得找事

最近轻松了
找点事赶！
我做了这样一个程序！
一个Richtextbox
一个Text
每次输入到Text中的字的颜色都不一样（通过通用窗体来调）
怎么让Richtextbox的每行字色也不一样？
（不玩虚的！）
我是通过Winsock发送的在一个程序里发过去的红色字
在另一个程序里接到后要判断颜色
（二进制代码可以吗？）
给出源程序！还有！有什么控件可以放GIF图？（动的）

解决方案 »

  1.   

    AniGIF.ocx控件可以播放GIF图片.到网上下一个就可以了.颜色可以传一个RGB值过去.
      

  2.   

    Private Sub Command1_Click()
        Dim iCur As Integer
        iCur = Len(RichTextBox1.Text & vbCrLf)
        RichTextBox1.Text = RichTextBox1.Text & vbCrLf & Text1
        RichTextBox1.SelStart = iCur
        RichTextBox1.SelLength = Len(Text1)
        RichTextBox1.SelColor = vbRed
    End Sub