分享
 
 
 

用VB谈WINDOWS记事本功能技术

王朝网站推广·作者佚名  2011-12-04
窄屏简体版  字體: |||超大  

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

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有