各位：求助关于RTF以及listbox的问题

Question

 1、好像listbox没有“下拉部分”吧？应该是ComboBox吧？
    如果是的话，如下：
005 调整 Combo 下拉部分的宽度 98-9-03
声明：
Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Const CB_GETDROPPEDWIDTH = &H15F
Private Const CB_SETDROPPEDWIDTH = &H160
Private Const CB_ERR = -1
函数：
' 取得 Combo 下拉的宽度
' 可以利用该函数比例放大或缩小宽度
Public Function GetDropdownWidth(cboHwnd As Long) As Long
    Dim lRetVal As Long
    lRetVal = SendMessage(cboHwnd, CB_GETDROPPEDWIDTH, 0, 0)
    If lRetVal <> CB_ERR Then
        GetDropdownWidth = lRetVal
        '单位为 pixels
    Else
        GetDropdownWidth = 0
    End If
End Function
'设置 Combo 下拉的宽度
'单位为 pixels
Public Function SetDropdownWidth(cboHwnd As Long, NewWidthPixel As Long) As Boolean
    Dim lRetVal As Long
    lRetVal = SendMessage(cboHwnd, CB_SETDROPPEDWIDTH, NewWidthPixel, 0)
    If lRetVal <> CB_ERR Then
        SetDropdownWidth = True
    Else
        SetDropdownWidth = False
    End If
End Function
 2、采用二进制写临时文件，再读这个文件。

Answer 1

老大您太让我感动了，对了是combobox，这个问题就多谢了，关于第二个呢？你说写临时文件，可是如果原来的richtextbox里的东西不会被后来的冲掉吗？我还没有试，问了先！

Answer 2

能否讲的详细点啊？我都快急疯了，呵呵！！浪费您宝贵时间真是抱歉，马上给分，好象我刚才给了说我密码不对，奇怪！
我的意思是说，假如我在一个richtextbox里有了一部分的内容，然后按您的意思是说要读取别的二进制的rtf文件，那原来的内容不是又没有了吗？到底怎么做啊？说详细点嘛

Answer 3

能否讲的详细点啊？我都快急疯了，呵呵！！浪费您宝贵时间真是抱歉，马上给分，好象我刚才给了说我密码不对，奇怪！
我的意思是说，假如我在一个richtextbox里有了一部分的内容，然后按您的意思是说要读取别的二进制的rtf文件，那原来的内容不是又没有了吗？到底怎么做啊？说详细点嘛