爱刨根知识网

  1. 首页 > 经验知识 > >

怎么利用记事本来编程，可以用记事本进行编程吗( 三 )

生活经验编程


1.“图像列表”：选择ImageList1
2.“样式”：根据喜爱选择1-trbStandard或者2-trbFlat
继续点击“属性页”的“按钮”选项，插入若干按钮 。按钮有多种样式，请根据需要设置 。这里请一定注意：每一个与用户操作有关的按钮都必须注明关键字、装载图片，如“新建”按钮，在“关键字”项注明“新建”，在“图像”项键入“New”（即ImageList1中的图片关键字）,需要的话还可以在“工具提示文本”项填入适当的提示语 。
(二)编写工具栏的按钮代码
Private Sub ToolBar1_ButtonClick(ByVal Button As MSComctlLib.Button)
On Error Resume Next '出错处理
Select Case Button.Key '按关键字选择
Case "新建"
mnuNew_Click '等于菜单项“新建”被单击
Case "打开" '等于菜单项“打开”被单击
mnuOpen_Click
'......(继续编写其它按钮的代码)
End Select
End Sub
完成后试运行一下我们的程序，我们发现，有了工具栏之后，程序变得漂亮多了，只是有一个问题：打开一个较长的文档后，编辑框的下拉滚动条向上的箭头不见了 。原因是：工具条占用一定的空间 。解决方法：将“设置编辑框的位置和大小”中的RichTextBox1.Top
= 20 和 RichTextBox1.Height = Me.ScaleHeight - 40分别改为RichTextBox1.Top =
380，RichTextBox1.Height = Me.ScaleHeight - 400即可 。
二.状态栏
(一)制作状态栏
状态栏的英文名字叫StatusBar，在窗体上添加它后会默认出现在窗体的最下方 。用鼠标右键点击它，调出“属性页”对话框，单击“窗格”项，插入一些窗格，可以将各个窗格的“样式”设置为：
0-sbrText 显示文本，需编写代码
1-sbrCaps 显示大小写状态，无需编程
2-sbrNum 显示NumLock键开关状态，无需编程
3-sbrIns 显示Insert键状态，无需编程
4-sbrScr1
5-sbrTime 显示时间，不编程时时间不会随系统时钟变化
6-sbrDate 显示日期，无需编程
注意：加进状态栏后需将Form_Resze中的RichTextBox1.Height =
Me.ScaleHeight - 400改为RichTextBox1.Height = Me.ScaleHeight - 600 。
(二)状态栏根据其“样式”属性决定用不用编写代码(如上文所述) 。下面举些例子，读者可以认真揣摩，从而达到举一反三的效果 。
例一：用户选取了“新建”后，让第一个窗格显示：“目前状态：正在打开文件《……》” 。请将下面代码写进“打开”菜单里面：
StatusBar1.Panels(1).Text = "目前状态：正在打开文件"
& "《" &CommonDialog1.FileTitle & "》"
例二：让第三个窗格显示时间并让时间跟随系统时钟变化 。
首先，给程序加一个Timer控件，将其Interval属性设为1000 。然后：
在Form_Load过程加入：StatusBar1.Panels(1).Text = Time；然后给Timer控件编写代码：
Private Sub Timer1_Timer()
If StatusBar1.Panels(3).Text <> CStr(Time) Then
StatusBar1.Panels(3).Text = Time
End If
End Sub
Private Sub RichTextBox1_Chang()
CommonDialog1.FileName
End Sub
辛苦了那么久，我们现在已经拥有一个象模象样的记事本了 。这个记事本由于用了RichText控件，理论上它能打开和编辑任意大的文档，使用起来的确比Windows自带的记事本方便得多 。当然，还有一些其它的功能需要添加和完善，这就靠你慢慢去完成了 。
【怎么利用记事本来编程，可以用记事本进行编程吗】以上就是关于怎么利用记事本来编程，可以用记事本进行编程吗的全部内容，以及怎么利用记事本来编程的相关内容,希望能够帮到您 。

推荐阅读


上一篇：手机QQ版本怎么更新，电脑qq怎么更新到最新版本

下一篇：excel怎么自动调整行高，如何自动调整单元格大小