Public Function IsFileReady(ByVal filepath As String) As Boolean '检查文件是否正在被使用的函数If File.Exists(filepath) = False ThenReturn TrueExit Function '如果filpath文件不存在,也就不没有被占用,应该返回trueEnd IfTryFile.Open(filepath, FileMode.Open).Close()Return TrueCatch e As Except...【阅读全文】
RichTextBox的ZoomFactor有一个自动缩小、放大的属性。直接设置,即可得到而缩放效果,特别是对于其保存成的RTF富文本的不同字形、字体能同步放大缩放。 案例测试: namespace pageScrolTest { public partial class Form1 : Form { ...【阅读全文】