VB 是Visual Basic编程语言编写计算机程序需要使用计算机编程语言。计算机编程语言是人和计算机“对话”的桥梁。就像人类的语言一样,计算机编程语言也有很多。目前较为广泛使用的语言有“C++”、“Pascal”、“Basic”等。在众多的计算机编程语言中,以BASIC语言最为易学易用。
BASIC是英文Beginner’s All purpose Symbolic Instruction Code的缩写,意思为初学者通用符号指令代码,一直都是程序设计入门的首选语言。
我对VB的理解并不算深,学习这门语言也并不久,也就半年时间,当年在学校的时候,学校只给予开了半年时间就停了。在这半年时间里,趋着一番热情,也做了几个小软件出来:《飘飘个人专用记事本》、《定时系统》、《枫泠工资结算系统ACC版》;今天在这里想解释的就是记事本,这个是我们在使用电脑时,经常会使用到的一个工具。然而,这么小的一个工具里面的功能,又是如何实现的呢?麻雀虽小,但五障俱全;又是不是每个人都可以完整的把记事本的一些功能做出来呢?偶是新手,老鸟别扎堆,VB初学者可以来看看:
首先我们看看软件的界面:
现在看了首页,我们开始一步步的进行功能解说吧!
字体优化:
如何调用字体颜色面板:首先在面板右击选择控件,然后在里面找到“microsoft common dialog control 6.0”控件,并进行安装。然后在工作区添加一个此控件[可自定义名称],通过:“CommonDialog1.ShowColor Text1.ForeColor = CommonDialog1.Color”这两句来分别调用调色板与文本框的文字附值;
如何调用字体:“CommonDialog1.Flags = 3
CommonDialog1.ShowFont”此时有三种字体供选择。你可以进行判断。判断代码如下:
If CommonDialog1.FontName <> " " Then
Text1.FontName = CommonDialog1.FontName
End If
Text1.FontSize = CommonDialog1.FontSize
Text1.FontBold = CommonDialog1.FontBold
Text1.FontItalic = CommonDialog1.FontItalic
如何通过滚动条控制字体大小:
只需要添加滚动条控件后,调用这一句:“Text1.FontSize = HScroll1.Value”即可。
系统中的“查找或替换”功能如何实现:
Dim inta As Integer
inta = InStr(1, Text1.Text, Text2.Text)
Text1.SetFocus
Text1.SelStart = inta - 1
Text1.SelLength = Len(Text2.Text)
首先定义一个变量,来存放选择出来的数据。并在点击“查询”的时候,text1.Text获得焦点;Text1.SelLength获得长度;
这是查找,那替换呢?既然text2.Text需要查找的文字找到了,我们只需要将另一个值给它即可,即:
Text1.SelText = Text3.Text
专用小工具栏里面的内容是如何调用的呢?
通过使用SHELL语句;我们以超级终端来作说明吧,使用以下语句调用:
Shell ("C:\Program Files\Windows NT\hypertrm.exe")
再以“远程控制”调用作说明:
Shell ("mstsc.exe")
这里肯定有朋友会说,为什么他们调用的不同呢?上面的是绝对路径调用,下面的却不是;要说明的是,下面的用绝对路径调用也是可以的,但系统给了我们这样的方便,我们为什么不用呢?只要在系统“运行”里面可以调用输入进程名能调出来的,在这里,你都可以直接用Shell ("程序名")的方式调出;
两个窗体之间,我们又该如何连接呢?如下所示:
“shengxiao21.Show” 即:“窗体名称.show”
限于篇幅,在这里只说这么多,查看更多内容,请访问:
http://hi.baidu.Com/huazhongxu