VB20从入门到精通.docx
- 文档编号:4035057
- 上传时间:2022-11-27
- 格式:DOCX
- 页数:237
- 大小:1.42MB
VB20从入门到精通.docx
《VB20从入门到精通.docx》由会员分享,可在线阅读,更多相关《VB20从入门到精通.docx(237页珍藏版)》请在冰豆网上搜索。
VB20从入门到精通
很多事情失败的原因不是行动前没有计划,
而是缺少计划前的行动。
注意力在结果上
不做准备就是准备失败
开大会时说大话,开小会时说小话
时间可以换取空间,空间可以换取时间
当动则动,当止则止
民主很重要,但群体是不能做决策的
将在外君令有所不受,但一定要付出代价。
自己应懂得承受,但人才是不会被埋没的。
人,是留不住的,即使你能把他留住在身边,也不能把他留住在人世。
但能留住的是什么?
(孔子去了,儒家思想却仍生生不息;牛顿走了,可三大定律依旧在为人类造福;爱迪生也走了,可夜晚再不仅是一片漆黑;)
领导力是获得追随者的能力
领导者的价值在于把追随者变为领导者。
勇于敢则杀,勇于不敢则活(勇敢可以杀敌,但是懂得隐蔽才能保存自己,好的战士是既会冲锋又会隐蔽的)
用人所长必容人所短
人生很大的误区在于见到好友不交,见到名师不败。
一个境界低的人讲不出来高远的话,一个没有使命感的人讲不出来有责任的话,一个格局小的人,讲不出来大气的话。
凡是能干大事的人都是能够坐得住的人。
如果没有这么多人干扰我,哪有我做球星的价值。
--------马拉多纳
不怕念起,就怕觉迟。
VB2010知识宝库
VB.NET常用命名空间和类介绍
一、基础命名空间
System.Collections
包含了一些与集合相关的类型,比如列表,队列,位数组,哈希表和字典等.(数据结构)
System.IO
包含了一些数据流类型并提供了文件和目录同步异步读写.
System.Text
包含了一些表示字符编码的类型并提供了字符串的操作和格式化
System.Reflection
包括了一些提供加载类型,方法和字段的托管视图以及动态创建和调用类型功能的类型.
System.Threading
提供启用多线程的类和接口
二、图形命名空间
System.Drawing
这个主要的GDI+命名空间定义了许多类型,实现基本的绘图类型(字体,钢笔,基本画笔等)和无所不能的Graphics对象.
System.Drawing2D
这个命名空间提供高级的二维和失量图像功能.
System.Drawing.Imaging
这个命名空间定义了一些类型实现图形图像的操作.
System.Drawing.Text
这个命名空间提供了操作字体集合的功能.
System.Drawing.Printing
这个命名空间定义了一些类型实现在打印纸上绘制图像,和打印机交互以及格式化某个打印任务的总体外观等功能.
三、数据命名空间
System.Data
包含了数据访问使用的一些主要类型.
System.Data.Common
包含了各种数据库访问共享的一些类型.
System.XML
包含了根据标准来支持XML处理的类.
System.Data.OleDb
包含了一些操作OLEDB数据源的类型.
System.Data.Sql
能使你枚举安装在当前本地网络的SQL Server实例.
System.Data.SqlClient
包含了一些操作MS SQL Server数据库的类型,提供了和 System.Data.OleDb相似的功能,但是针对SQL做了优化.(优化后的SQL操作类库)
System.Data.SqlTypes
提供了一些表示SQL数据类型的类.
System.Data.Odbc
包含了操作Odbc数据源的类型.
System.Data.OracleClient
包含了操作Odbc数据库的类型.
System.Transactions
这个命名空间提供了编写事务性应用程序和资源管理器的一些类.
四、WEB命名空间
System.Web
这个命名空间包含启用浏览器/服务器通信的类和接口.这些命名空间类用于管 理到客户端的HTTP输出和读取HTTP请求.附加的类则提供了一些功能,用于服 务器端的应用程序以及进程,Cookie管理,文件传输,异常信息和输出缓存的控制.
System.Web.UI
这个命名空间包含Web窗体的类,包括Page类和用于创建Web用户界面的其 他标准类.
System.Web.UI.HtmlControls
这个命名空间包含用于HTML特定控件的类,这些控件可以添加到Web窗体中 以创建Web用户界面
System.Web.UI.WebControls
包含创建ASP.NET服务器控件的类,当添加到窗体时,这些控件将呈现浏览器特 定的HTML和脚本,用于创建和设备无关的Web用户界面.
System.Web.Mobile
包含生成ASP.NET移动应用程序所需要的核心功能,包括身份验证和错误处理.
System.Web.UI.MobileControls
包括一组ASP.NET服务器控件,这些控件可以针对不同的移动设备呈现应用程 序.
System.Web.Services
包含能使你使用和生成XML Web Service的类,这些服务是驻留在服务器中的 可编程实体,并通过标准Internet协议公开.
五、框架服务命名空间
System.Diagnostics
这个命名空间所提供的类允许你启动系统进程,读取和写入事件日志以及使用性 能计数器监视系统性能.
System.DirectoryServices
这个命名空间所提供的类可便于从托管代码中访问Active Directory.此命名空 间中的类可以与任何Active Directory服务提供程序一起使用.
System.Media
包含用于播放声音文件和访问系统提供的声音的类.
System.Management
这个命名空间提供的类用于管理一些信息和事件,它们关系到系统,设备和WMI 基础结构所使用的应用程序.
System.Messaging
这个命名空间提供的类用于连接到网络上的消息队列,向队列发送消息,从队列 接收或查看消息.
System.ServiceProcess
这个命名空间提供的类用于安装和运行服务,服务是长期运行的可执行文件,它 们不通过用户界面来运行.
System.Timers
这个命名空间提供基于服务器的计时器组件,用以按指定的间隔引发事件.
六、安全性命名空间
System.Security
这个命名空间提供公共语言运行库安全性系统的基础结构.
System.Net.Security
这个命名空间提供用于主机间安全通信的网络流.
System.Web.Security
这个命名空间包含的类用于在Web应用程序中实现ASP.NET安全性.
七、网络命名空间
System.Net
包含的类可为当前网络上的多种协议提供简单的编程接口.
System.Net.Cache
这个命名空间定义了一些类和枚举,用于为使用WebRequest和HttpWebRequest类获取的资源定义缓存策略.
System.Net.Configuration
这个命名空间包含了以编程方式访问和更新System.Net命名空间的配置设置的类.
System.Net.Mime
这个命名空间包含了用于将电子邮件发送到SMTP服务器进行传送的类.
System.Net.Networkinformation
这个命名空间提供对网络流量数据,网络地址信息和本地计算机的地址更改通知的访问,还包含实现Ping实用工具的类.你可以使用Ping和相关的类来检查是否可通过网络访问某台计算机.
System.Net.Sockets
这个命名空间为严格控制网络访问的开发人员提供Windows套接字接口的托 管实现
八、配置命名空间
System.Configuration
这个命名空间包含用于以编程方式访问.Net Framework配置设置并处理配置 文件中错误的类.
System.Configuration.Assemblies
这个命名空间包含用于配置程序集的类.
System.Configuration.Provider
这个命名空间包含由服务器和客户端应用程序共享,以支持可插接式模型轻松添 加或移除功能的基类.
九、本地化命名空间
System.Globalization
包含的类定义与区域性相关的信息,其中包括语言,国家\地区,所使用的日历,日期 格式的模式,货币与数字以及字符串的排序顺序.
System.Resources
这个命名空间提供一些类和接口,它们使开发人员得以创建,存储并管理应用程 序中使用的各种区域性特定资源.
System.Resources.Tools
这个命名空间包含StronglyTypedResourceBuilder类,该类提供对强类型资源 的支持.这个编译时功能通过创建包含一组静态只读属性的类封装对资源的访问, 从而使得使用资源变得更加容易
一.窗体事件
1.自动调整窗体
Publicxz,yzAsDouble
PublicSubzishiying(ByValparentAsControl)
xz=75/Form5.Button1.Width
yz=23/Form5.Button1.Height
DimsFontAsFont
ForEachcAsControlInparent.Controls
DimzihaoAsInteger=c.Font.Size*xz/1.2\1
sFont=NewFont(c.Font.FontFamily,zihao,c.Font.Style)
c.Font=sFont
c.Width=c.Width*xz
c.Height=c.Height*yz
c.Left=c.Left*xz
c.Top=c.Top*yz
zishiying(c)
Next
EndSub
PrivateSubButton2_Click(senderAsSystem.Object,eAsSystem.EventArgs)HandlesButton2.Click
zishiying(Me)
EndSub
1.打印文字。
方法一:
在窗体上打印文字
DimgAsGraphics=Me.CreateGraphics
DimmBrushAsNewSolidBrush(Color.Red)
DimmFontAsNewFont("宋体",18)
g.DrawString("测试",mFont,mBrush,0,10)
(0为横坐标,10为纵坐标)
方法二:
在窗体上画文字
DimmAsGraphics
m=Me.CreateGraphics
m.DrawString("Thisisadiagonallinedrawnonthecontrol",_
NewFont("Arial",10),Brushes.Gold,NewPointF(300.0F,444.0F))
m.Dispose()
方法三:
在图片框上打印文字
PublicClassForm2
'ThisexamplecreatesaPictureBoxcontrolontheformanddrawstoit.
'ThisexampleassumesthattheForm_Loadeventhandlermethodisconnected
'totheLoadeventoftheform.
PrivatepictureBox1AsNewPictureBox()
PrivateSubForm1_Load(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesMe.Load
'DockthePictureBoxtotheformandsetitsbackgroundtowhite.
pictureBox1.Dock=DockStyle.Fill
pictureBox1.BackColor=Color.White
'ConnectthePainteventofthePictureBoxtotheeventhandlermethod.
ØAddHandlerpictureBox1.Paint,AddressOfMe.pictureBox1_Paint
'AddthePictureBoxcontroltotheForm.
Me.Controls.Add(pictureBox1)
EndSub'Form1_Load
00:
00:
03.9522260
PrivateSubpictureBox1_Paint(ByValsenderAsObject,ByValeAsSystem.Windows.Forms.PaintEventArgs)
'CreatealocalversionofthegraphicsobjectforthePictureBox.
DimgAsGraphics=e.Graphics
'DrawastringonthePictureBox.
g.DrawString("Thisisadiagonallinedrawnonthecontrol",_
NewFont("Arial",10),Brushes.Red,NewPointF(30.0F,30.0F))
'DrawalineinthePictureBox.
g.DrawLine(System.Drawing.Pens.Red,PictureBox1.Left,_
PictureBox1.Top,PictureBox1.Right,PictureBox1.Bottom)
EndSub'pictureBox1_Paint
EndClass
2.关闭窗体
窗体.Dispose
3.创建一个透明度为75%的窗体
PrivateSubCreateMyOpaqueForm()
'Createanewform.
Dimform2AsNewForm()
'Setthetextdisplayedinthecaption.
form2.Text="MyForm"
'Settheopacityto75%.
form2.Opacity=0.75
'Sizetheformtobe300pixelsinheightandwidth.
form2.Size=NewSize(300,300)
'Displaytheforminthecenterofthescreen.
form2.StartPosition=FormStartPosition.CenterScreen
'Displaytheformasamodaldialogbox.
form2.ShowDialog()
4.用代码在窗体添加一个按钮.
Dimbutton1AsNewButton()
'SetthebuttontoreturnavalueofOKwhenclicked.
button1.DialogResult=DialogResult.OK
'Addthebuttontotheform.
Controls.Add(button1)
button1.Text=123
5.自动生成一个窗体并创建两个按钮
(点击Cancle窗体自动关闭,如果他失去焦点,他不仅会响还会晃)
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
'Createanewinstanceoftheform.
Dimform1AsNewForm()
'Createtwobuttonstouseastheacceptandcancelbuttons.
Dimbutton1AsNewButton()
Dimbutton2AsNewButton()
'Setthetextofbutton1to"OK".
button1.Text="OK"
'Setthepositionofthebuttonontheform.
button1.Location=NewPoint(10,10)
'Setthetextofbutton2to"Cancel".
button2.Text="Cancel"
'Setthepositionofthebuttonbasedonthelocationofbutton1.
button2.Location=_
NewPoint(button1.Left,button1.Height+button1.Top+10)
'Setthecaptionbartextoftheform.
form1.Text="MyDialogBox"
'Displayahelpbuttonontheform.
form1.HelpButton=True
'Definetheborderstyleoftheformtoadialogbox.
form1.FormBorderStyle=FormBorderStyle.FixedDialog
'SettheMaximizeBoxtofalsetoremovethemaximizebox.
form1.MaximizeBox=False
'SettheMinimizeBoxtofalsetoremovetheminimizebox.
form1.MinimizeBox=False
'Settheacceptbuttonoftheformtobutton1.
form1.AcceptButton=button1
'Setthecancelbuttonoftheformtobutton2.
form1.CancelButton=button2
'Setthestartpositionoftheformtothecenterofthescreen.
form1.StartPosition=FormStartPosition.CenterScreen
'Addbutton1totheform.
form1.Controls.Add(button1)
'Addbutton2totheform.
form1.Controls.Add(button2)
'Displaytheformasamodaldialogbox.
form1.ShowDialog()
EndSub
演练:
使用WPF设计器生成视频浏览器
6.产生此效果
PublicClassForm1
'Createanewform.
DimmdiChildFormAsNewForm
DimmdiChildForm1AsNewForm
DimmdiChildForm2AsNewForm
PrivateSubForm1_Load(ByValsenderAsObject,_
ByValeAsSystem.EventArgs)HandlesMyBase.Load
'SettheIsMdiContainerpropertytotrue.
IsMdiContainer=True
'Setthechildform'sMdiParentpropertyto
'thecurrentform.
mdiChildForm.MdiParent=Me
mdiChildForm1.MdiParent=Me
mdiChildForm2.MdiParent=Me
mdiChildForm.Show()
mdiChildForm1.Show()
mdiChildForm2.Show()
mdiChildForm.Text=1
mdiChildForm1.Text=2
mdiChildForm2.Text=3
EndSub
EndClass
7.改变窗体的背景颜色
DimctlAsControl
IsMdiContainer=True
'Loopthroughcontrols,
'lookingforcontrolsofMdiClienttype.
ForEachctlInMe.Controls
IfTypeOf(ctl)IsMdiClientThen
'Ifthecontrolisthecorrecttype,
'changethecolor.
ctl.BackColor=System.Drawing.Color.PaleGreen
EndIf
Next
EndSub
7
(2)
PrivateSubForm1_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)HandlesMe.Click
BackColor=System.Drawing.Color.PaleGreen
EndSub
或BackColor=Color.Blue
系统颜色:
GroupBox3.BackColor=Control.DefaultBackColor
8.绘制椭圆窗体
DimshapeAsNewSystem.Drawing.Drawing2D.GraphicsPath
shape.AddEllipse(0,0,Me.Width,Me.Height)
Me.Region=NewSystem.Drawing.Region(shape)
9.获取当前时间
'Displaythetime
Text1.Text=Now.ToLongTimeString(只有时间20:
55:
36)
Text1.Text=Now(有日期和时间2012/1/2920:
57:
36)
Text1.Text=Today(只有日期20
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB20 入门 精通