Visual Basic.NET是基于微软.NET Framework之上的面向对象的中间解释性语言(名片中说VB.NET是"...中间解释性语言“，这种说法极不准确，甚至完全错误。可能原编辑者是指的编译器会先将源码翻译成MSIL(Microsoft Intermediate Language)中间语言这回事,但这和”解释性语言“有很大差别)，可以看作是Visual Basic在·Net Framework平台上的升级版本，增强了对面向对象的支持。但由于改动太大，导致VB.net对VB的向后兼容性不好，在业界引起不小的争议。 大多的VB.Net程序员使用Visual Studio .Net作为IDE（integrated development environment).SharpDevelop是另一种可用的开源的IDE。VB.Net需要在.Net Framework平台上才能执行。 VB.NET的主页
成都创新互联长期为成百上千家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为昂仁企业提供专业的成都网站建设、成都网站制作，昂仁网站改版等技术服务。拥有10年丰富建站经验和众多成功案例,为您定制开发。
详情请看百度百科：;type=synfromtitle=VB.NETfr=aladdin
个人意见，希望采纳:
：你先了解一下：
启动项英文msconfig
alerter -错误警报器，垃圾，关闭。
application layer gateway service -给与第三者网络共享/防火墙支持的服务，有些防火墙/网络共享软件需要。占用1。5mb内存。
application management-用于设定，发布和删除软件服务。
automatic 更新s -windows自动更新，K，滚！
background intelligent transfer service -这个服务原是用来实现http1.1服务器之间的信息传输，微软称支持windows更新时断点续传
clipbook - 用与局域网电脑来共享 粘贴/剪贴的内容。（K，想得出！）
com+Event system -一些 COM+ 软件需要，检查你的 c:\program files\ComPlus Applications 目录，没东西可以把这个服务关闭．
COM+Event system application －同上
COmputer browser － 用来浏览局域网电脑的服务，但关了也不影响浏览！垃圾
cryptographic services -windows更新时用来确认windows 文件指纹的，我更新时才开启一下。
DHCP client－静态IP者需要（xDSL 等）小猫就不用了！！
Distributed link tracking client－用于局域网更新连接信息，比如在电脑A有个文件，在B做了个连接，如果文件移动了，这个服务将会更 新信息。占用4兆内存。
Distributed Transaction coordinator－无聊的东西。
DNS Client－DNS解析服务。。无聊～～
Error reporting service -错误报告器，把windows中错误报告给微软，无聊～～～～～
＊Event Log- 系统日志纪录服务，很有用于查找系统毛病．
Fast user switching compatibility－多用户快速切换服务．．无聊
help and support -帮助，无聊，还是无聊帮助．．哈哈
Human interface device access－支持”弱智“电脑配件的。。比如键盘上调音量的按钮等等。。
IMAPI CD-burning COM service －xp刻牒服务，用软件就不用了占用1。6兆内存
Indexing service -恐怖的xp减速的东东！！！关关关！！！
Internet Connection Firewall(ICF).........-xp防火墙。。不用就关。
IPSEC Services－大众用户连边都沾不上。
Logical Disk manager －磁盘管理服务。。需要时它会通知你，所以一般关。
Logical Disk manager administrative service－同上。
messenger -不是msn，不想被骚扰的话就关。注：妖刺就是利用这个。
MS software shadow copy provider－无用，据说是备份用的。。我看什么用都没。
Net Logon－登陆 Domain Controller 用的，大众用户快关！
Netmeeting remote desktop sharing－用netmeeting 实现电脑共享。。晕！关！！
Network Connections - 上网／局域网要用的东东！
Network DDE －和clipbook一起用的，无聊～～～～
Network DDE DSDM －同上
Network 本地 Awareness－如有网络共享或ICS/ICF可能需要.(服务器端）
NT LM Security support provider－telnet 服务用的东东，关！！
NVIDIA Driver Helper service -nvidia 显卡帮助，关！
PDEngine - perfectdisk 引擎
PDScheduler -perfectdisk 计划服务
PerFORMance logs and alerts－记录机器运行状况而且定时写入日志或发警告，内容可能过于专业，所以。。自己决定。
＊Plug and Play- 自动查测新装硬件，即插即用，开着吧～～～
Portable media serial number－绝对无用，无聊之及。
Print Spooler -打印机用的，我打印时才开一下。
Protected Storage－储存本地密码和网上服务密码的服务，包括填表时的“自动完成”功能。
QoS RSVP -关！就是那个20％的 QoS
Remote access auto connection manager－宽带者／网络共享可能需要！！
Remote desktop help session manager－远程帮助服务，傻透，占用4兆内存。
＊Remote Procedure Call (RPC) -系统核心服务！
Remote Procedure Call LOCATOR－这个倒没什么用，管理 RPC 数据库服务，占用1兆内存。
remote registry －远程注册表运行／修改。大漏洞，还不快关！！
removable storage －一般情况下不用，磁带备份用的。
routing and remote access－哈哈。。不知者关！
secondary logon－给与administrator 以外的用户分配指定操作权．晕～～～
security accounts manager－像 Protected Storage, IIS Admin 才需要。
server -局域网文件／打印共享需要的。
shell hardware detection－给有些配置自动启动，像内存棒，和有些cd驱动等
smart card -关！1。4兆内存
smart card helper -关！
SSDP Discovery service－没有什么硬件利用这个服务。。
system event notification－记录用户登录／注销／重起／关机信息。。谁管这些。。
system restore service -系统还原服务，吃资源和内存的怪兽。。虽然有时用到，自己决定。
task scheduler－windows 计划服务啦，垃圾．
TCP/IP NetBIOS helper－如果你的网络不用 Netbios 或WINS，关了．
Telephony - 拨号服务，如果你的宽带不用拨号，那么关了它。
telnet -大漏洞，我第一个关的就是这个．这根dos中 telnet 命令没关系。2兆内存。
terminal services－实现远程登录本地电脑，快速用户切换和远程桌面功能需要，
不用这些功能就关了吧。
themes -给xp打扮的东东，不要太花锹的就关了。
uninterruptible power supply－停电保护设备用的。。。没有的就关。
universal plug and play device host－同SSDP Discovery Service ，没用．
upload manager－用来实现服务器和客户端输送文件的服务，简单文件传输不需要这个！
volume shadow copy－同MS Software Shadow Copy Provider，无用．
webclient－可能和以后的．net技术有联系，安全起见，我关得实实的！
Windows Audio - 控制着你听到的声音。关了就没声音了！！
Windows Installer -windows的MSI安装服务，建议设成手动。
windows image acquisition (WIA) -有些数码相机和扫描器用的，我的扫描器觉得它没用。
Windows Management Instrumentation - 满重要的服务，是管”服务依K”的，但关
了会出现奇怪的问题．
windows management 包含umentat
另外,团IDC网上有许多产品团购,便宜有口碑
Public Class Form1
Inherits System.Windows.Forms.Form
Private City(33) As String '市 数组
Public Province(33) As String '省 数组
'初始化省市地区名
Public Function Init() As Boolean
City(0) = "东城,西城,崇文,宣武,朝阳,丰台,石景山,海淀,门头沟,房山,通州,顺义,昌平,大兴,平谷,怀柔,密云,延庆"
City(1) = "黄浦,卢湾,徐汇,长宁,静安,普陀,闸北,虹口,杨浦,闵行,宝山,嘉定,浦东,金山,松江,青浦,南汇,奉贤,崇明"
City(2) = "和平,东丽,河东,西青,河西,津南,南开,北辰,河北,武清,红挢,塘沽,汉沽,大港,宁河,静海,宝坻,蓟县"
City(3) = "万州,涪陵,渝中,大渡口,江北,沙坪坝,九龙坡,南岸,北碚,万盛,双挢,渝北,巴南,黔江,长寿,綦江,潼南,铜梁,大足,荣昌,壁山,梁平,城口,丰都,垫江,武隆,忠县,开县,云阳,奉节,巫山,巫溪,石柱,秀山,酉阳,彭水,江津,合川,永川,南川"
City(4) = "石家庄,邯郸,邢台,保定,张家口,承德,廊坊,唐山,秦皇岛,沧州,衡水"
City(5) = "太原,大同,阳泉,长治,晋城,朔州,吕梁,忻州,晋中,临汾,运城"
City(6) = "呼和浩特,包头,乌海,赤峰,呼伦贝尔盟,阿拉善盟,哲里木盟,兴安盟,乌兰察布盟,锡林郭勒盟,巴彦淖尔盟,伊克昭盟"
City(7) = "沈阳,大连,鞍山,抚顺,本溪,丹东,锦州,营口,阜新,辽阳,盘锦,铁岭,朝阳,葫芦岛"
City(8) = "长春,吉林,四平,辽源,通化,白山,松原,白城,延边"
City(9) = "哈尔滨,齐齐哈尔,牡丹江,佳木斯,大庆,绥化,鹤岗,鸡西,黑河,双鸭山,伊春,七台河,大兴安岭"
City(10) = "南京,镇江,苏州,南通,扬州,盐城,徐州,连云港,常州,无锡,宿迁,泰州,淮安"
City(11) = "杭州,宁波,温州,嘉兴,湖州,绍兴,金华,衢州,舟山,台州,丽水"
City(12) = "合肥,芜湖,蚌埠,马鞍山,淮北,铜陵,安庆,黄山,滁州,宿州,池州,淮南,巢湖,阜阳,六安,宣城,亳州"
City(13) = "福州,厦门,莆田,三明,泉州,漳州,南平,龙岩,宁德"
City(14) = "南昌市,景德镇,九江,鹰潭,萍乡,新馀,赣州,吉安,宜春,抚州,上饶"
City(15) = "济南,青岛,淄博,枣庄,东营,烟台,潍坊,济宁,泰安,威海,日照,莱芜,临沂,德州,聊城,滨州,菏泽"
City(16) = "郑州,开封,洛阳,平顶山,安阳,鹤壁,新乡,焦作,濮阳,许昌,漯河,三门峡,南阳,商丘,信阳,周口,驻马店,济源"
City(17) = "武汉,宜昌,荆州,襄樊,黄石,荆门,黄冈,十堰,恩施,潜江,天门,仙桃,随州,咸宁,孝感,鄂州"
City(18) = "长沙,常德,株洲,湘潭,衡阳,岳阳,邵阳,益阳,娄底,怀化,郴州,永州,湘西,张家界"
City(19) = "广州,深圳,珠海,汕头,东莞,中山,佛山,韶关,江门,湛江,茂名,肇庆,惠州,梅州,汕尾,河源,阳江,清远,潮州,揭阳,云浮"
City(20) = "南宁,柳州,桂林,梧州,北海,防城港,钦州,贵港,玉林,南宁地区,柳州地区,贺州,百色,河池"
City(21) = "海口,三亚"
City(22) = "成都,绵阳,德阳,自贡,攀枝花,广元,内江,乐山,南充,宜宾,广安,达川,雅安,眉山,甘孜,凉山,泸州"
City(23) = "贵阳,六盘水,遵义,安顺,铜仁,黔西南,毕节,黔东南,黔南"
City(24) = "昆明,大理,曲靖,玉溪,昭通,楚雄,红河,文山,思茅,西双版纳,保山,德宏,丽江,怒江,迪庆,临沧"
City(25) = "拉萨,日喀则,山南,林芝,昌都,阿里,那曲"
City(26) = "西安,宝鸡,咸阳,铜川,渭南,延安,榆林,汉中,安康,商洛"
City(27) = "兰州,嘉峪关,金昌,白银,天水,酒泉,张掖,武威,定西,陇南,平凉,庆阳,临夏,甘南"
City(28) = "银川,石嘴山,吴忠,固原"
City(29) = "西宁,海东,海南,海北,黄南,玉树,果洛,海西"
City(30) = "乌鲁木齐,石河子,克拉玛依,伊犁,巴音郭勒,昌吉,克孜勒苏柯尔克孜,博 尔塔拉,吐鲁番,哈密,喀什,和田,阿克苏"
City(31) = ""
City(32) = ""
City(33) = "台北,高雄,台中,台南,屏东,南投,云林,新竹,彰化,苗栗,嘉义,花莲,桃园,宜兰,基隆,台东,金门,马祖,澎湖"
Province(0) = "北京"
Province(1) = "上海"
Province(2) = "天津"
Province(3) = "重庆"
Province(4) = "河北"
Province(5) = "山西"
Province(6) = "内蒙古"
Province(7) = "辽宁"
Province(8) = "吉林"
Province(9) = "黑龙江"
Province(10) = "江苏"
Province(11) = "浙江"
Province(12) = "安徽"
Province(13) = "福建"
Province(14) = "江西"
Province(15) = "山东"
Province(16) = "河南"
Province(17) = "湖北"
Province(18) = " 湖南"
Province(19) = "广东"
Province(20) = "广西"
Province(21) = "海南"
Province(22) = "四川"
Province(23) = "贵州"
Province(24) = "云南"
Province(25) = "西藏"
Province(26) = "陕西"
Province(27) = "甘肃"
Province(28) = "宁夏"
Province(29) = "青海"
Province(30) = "新疆"
Province(31) = "香港"
Province(32) = "澳门"
Province(33) = "台湾"
End Function
'得到省相对应的市
Public Function GetCity(ByVal a As ComboBox, ByVal b As ComboBox) As Boolean
b.Items.Clear()
Dim num, x1, i
num = a.SelectedIndex
x1 = Split(City(num), ",")
For i = 0 To UBound(x1)
b.Items.Add(x1(i))
Next
End Function
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Init()
ComboBox1.Items.AddRange(Province)
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
GetCity(ComboBox1, ComboBox2)
End Sub
End Class