[一个学困生的点滴记事]11月2日 阴今天上午,在妈妈那里跟她一起忙饭,突然妈妈接到一个电话,说表嫂要带她的妹妹来找我,什么事情在电话里说不清就见面再说。我和妈妈都猜测,是不是要我帮她找书?是不...+阅读
方法一:commondialog控件一个-------comopen richtextbox一个,作为文本框 两个菜单: 文件,下有新建,打开,保存,字体,退出,打印. 编辑,下有查找,查找下一个 Option Explicit Public sFind As String Private Sub Form_Resize() '如果窗体不处于最小化RichTextBox1状态,改变RichTextBox1大小以适应窗体大小变化 If Form1.WindowState1 Then RichTextBox1.Width = Form1.Width - 135 If Form1.Height
'---------------------------------------- With RichTextBox1 .SelFontName = CmdOpen.FontName .SelFontSize = CmdOpen.FontSize .SelBold = CmdOpen.FontBold .SelItalic = CmdOpen.FontItalic .SelStrikeThru = CmdOpen.FontStrikethru .SelUnderline = CmdOpen.FontUnderline End With End Sub '当“新建”菜单项被点击时,设置为空 Private Sub mnuNew_Click() RichTextBox1.Text = "" End Sub '当“查找下一个”菜单项被点击时 Private Sub mnuNext_Click() ' SelStart属性-返回或设置所选择的文本的起始点; ' 如果没有文本被选中,则指出插入点的位置。 RichTextBox1.SelStart = RichTextBox1.SelStart + RichTextBox1.SelLength + 1 RichTextBox1.Find sFind, , Len(RichTextBox1) End Sub '当“打开”菜单项被点击时 Private Sub mnuOpen_Click() CmdOpen.ShowOpen RichTextBox1.LoadFile (CmdOpen.FileName) End Sub '当“打印”菜单项被点击时 Private Sub mnuPrint_Click() CmdOpen.Flags = cdlPDReturnDC + cdlPDNoPageNums If RichTextBox1.SelLength = 0 Then CmdOpen.Flags = CmdOpen.Flags + cdlPDAllPages Else CmdOpen.Flags = CmdOpen.Flags + cdlPDSelection End If CmdOpen.ShowPrinter '将 RichTextBox 控件中格式化文本发送给设备进行打印。
RichTextBox1.SelPrint CmdOpen.hDC End Sub '当“保存”菜单项被点击时 Private Sub mnuSave_Click() CmdOpen.ShowSave 'RichTextBox的SaveFile方法,保存文本 RichTextBox1.SaveFile (CmdOpen.FileName) End Sub方法二: VB6.0中,新建文件的时候选择"VB应用程序向导"可以建立一个文本处理的程序.包括了记事本的所有功能.里面的代码和技巧还是值得一学.祝愿你学有所成.
以下为关联文档:
二、贝贝的记事本自从上了小学,贝贝的记性就变得很不好,他常常是晚上已经钻进了被窝,才想起第二天美术课要买全班统一的水彩笔。或者就是早上到了学校,小组长来收明天的课外活动费,可贝贝早就把这...
求一个用手机学简单日语的软件其实用手机学日语要求不是很高的话,可以考虑下日剧或日本动漫在手机上看,这样效果最好。 安卓这类软件很少,不过还是有的 EZ旅游日语 EZ Japan-Japanese v1.3 全部播放让您同步...
设计一个简单的学生成绩管理系统我没写,只能和你说说怎么写。 可以由类模板和数组写。 我说说类模板的吧。 定义一个Student类存放学生信息(姓名,初始排名,各科成绩,个人总分); 初始排名由输入顺序排,在计算名字的...
陈慧琳记事本的歌词翻开随身携带的记事本 写着许多事都是关於你 你讨厌被冷落 习惯被守候 寂寞才找我 我看见自己写下的心情 把自己放在卑微的后头 等你等太久 想你泪会流 而幸福快乐是什么 爱...
室内设计软件学室内设计的软件有哪些室内设计需要运用的软件如下: AutoCAD:结合工程实例使学员迅速掌握CAD制图软件的应用及操作技巧,通过多种由代表性的室内设计工程案例的绘制,培养学员按照行业规范利用计算机应...
按键精灵有N个窗口可以指定为记事本窗口第一个窗口移动到代码如下,先打开几个空白的记事本文件,然后运行就可以了 电脑屏幕宽度 = Plugin.Sys.GetScRX() HwndEx = Plugin.Window.Search("无标题 - 记事本") MyArray = Split(HwndEx, "|")...
求一个简单程序的设计思路只要思路!用冒泡排序法。 下面是一个示例,希望对你有帮助。 public class lee0908143 { public static void main(String[] args) { int[] intNum={20,10,50,40,30,70,60,80,90,100}; /...
神的记事本好不好看神的记事本是类似于侦探风格的,剧情主要恋爱次要,话说好像就根本没恋爱。。= =。。 个人认为挺好看的,是部神作。光看第一集可能还没啥感觉,但越往后看,就显得 越有意思,重要的是...
记事本是用来干什么的记事本是用来干什么的,求专更有利于个人发展:1 编辑文本信息。 2 可以用来写编程语言的源代码。比如你用C语言写了一段代码,然后把该文件的扩展名改成。C,然后在TC2。0下可以直...