请问有没有写字板的源代码下载？

Question

我说的不是记事本，是windows的写字板。想看一下。
如果没有源码，哪位告诉我写字板上边的字体及大小及插入对象是怎么弄出来的，也给加分。

Answer 1

你可以看一下notpad++，这个一个开源的程序，不过是C编写的。

Answer 2

那只不过都是些按钮罢了。要获得Windows所有字体并加入到一个组合框中那还不容易吗？在VB中可以用Screen对象获得系统所安装的所有字体并加入到一个组合框中：'获得系统所系统的字体列表：
在Form1中加入一个组合框，并在Form1中加入如下代码： 
Private Sub Form_Load() 
        Dim counter As Integer 
        For counter = 0 To Screen.FontCount-1 
            Combol1.AddItem Screen.Fonts(counter) 
        Next 
End Sub 其他的，就不说了！

Answer 3

插入对象怎么弄啊  我这样写了
On Error Resume Next
OLE1.InsertObjDlg
  If Err <> mscomdlg.cdlCancel Then
  zjjss.OLEObjects.Add , , dlgCommonDialog.FileName
  End If
但是弄出来的东西放不到richtextbox里边去啊  ，高手快来，解决了我要加分了