笑如咖啡的个人资料 - RAT

笑如咖啡笑如咖啡

关注数: 0 粉丝数: 11 发帖数: 88 关注贴吧数: 4

好久没来了，哎！最近比较忙。贴吧太冷清了！

VB串口编程问答串口数据接收方式如何处理不定长数据的接收用字符方式收发码值大于127的字符数据串口通讯问答2串口数据接收方式1、在OnComm 事件中接收数据：这种方式能充分MSCOMM控件的特性。OnComm 事件还可以检查和处理通讯错误；可以通过检查 CommEvent 属性的值来查询事件和错误；对于不定长数据以及对数据进行处理比较复杂的情况，此法不是很方便。Private Sub MSComm_OnComm ()Select Case MSComm1.CommEvent' 错误Case comEventBreak ' 收到 Break。Case comEventCDTO ' CD (RLSD) 超时。Case comEventCTSTO ' CTS Timeout。Case comEventDSRTO ' DSR Timeout。Case comEventFrame ' Framing ErrorCase comEventOverrun '数据丢失。Case comEventRxOver'接收缓冲区溢出。Case comEventRxParity' Parity 错误。Case comEventTxFull '传输缓冲区已满。Case comEventDCB '获取 DCB] 时意外错误' 事件Case comEvCD ' CD 线状态变化。Case comEvCTS ' CTS 线状态变化。Case comEvDSR ' DSR 线状态变化。Case comEvRing ' Ring Indicator 变化。Case comEvReceive ' 收到 RThreshold # of chars.Case comEvSend ' 传输缓冲区有 Sthreshold 个字符 'Case comEvEof ' 输入数据流中发现 EOF 字符End SelectEnd Sub

VB遍历磁盘--并对文件操作 'DriveType常数值的意义： Const UnknownType=0 '0: "未知" Const Removable = 1 '1: "可移动" Const Fixed=2 '2: "固定" Const Remote=3 '3: "网络" Const CDROM=4 '4: "CD-ROM" Const RAMDisk=5 '5: "RAM 磁盘" dim fs, drv Set fs = CreateObject("scripting.filesystemobject") '遍历所有驱动器 For Each drv In fs.Drives '如果是可移动磁盘 If drv.DriveType = Removable Then '则将该分驱上的abc.bmp复制到c:盘 FileCopy drv.DriveLetter & ":\abc.bmp","c:\" End If Next

VB操作注册表 Private Sub Command1_Click() Dim x Set x=Createobject("Wscript.shell") x.regdelete "HKEY_LOCAL_MACHINE\SOFTWARE\microsoft\WindowsNT\CurrentVersion\Winlogon\Notify\WgaLogon " x.regdelete "HKEY_LOCAL_MACHINE\SOFTWARE\microsoft\Windows\currentversion\uninstall\wganotify " End Sub 以上的变量x是一个对象，它有3个改注册表的方法： x.regwrite "要修改的注册表项","值" 变量=x.regread "要读出的注册表项" x.regdelete "要删除的注册表项"

vb历史 1991年，美国微软公司推出了Visual Basic(可简称VB），目前的最新版本是VB 2008 Beta2(VB9)中文版。Visual 意即可视的、可见的，指的是开发像Windows操作系统的图形用户界面（Graphic User Interface,GUI）的方法，它不需要编写大量代码去描述界面元素的外观和位置，只要把预先建立好的对象拖放到屏幕上相应的位置即可。Basic 实际上是一个短语的缩写，这个短语就是 Beginners all_purpose symbolic instruction code ，其中文意思为“初始者通用符号指令代码语言”。Visual Basic有学习版、专业版和企业版三种版本，以满足不同的开发需要。学习版适用于普通学习者及大多数使用Visual Basic开发一般Windows应用程序的人员，但是；专业版适用于计算机专业开发人员，包括了学习版的全部内容功能以及Internet控件开发工具之类的高级特性；企业版除包含专业版全部的内容外，还有自动化构件管理器等工具，使得专业编程人员能够开发功能强大的组骨子里分布式应用程序。VB是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发Windows环境下的各类应用程序。它简单易学、效率高，且功能强大可以与Windowsr专业开发工具SDK相媲美。在Visual Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的广泛应用程序接口（API）函数，以用动态链接库（DLL）、对象的链接与世隔嵌入（OLE）、开放式数据连接（ODBC）等技术，可以高效、快速地开发Windows环境下功能强大、图形界面丰富的应用软件系统。随着版本的提高，Visual Basic的功能也越来越强。5.0版以后，Visual Basic推出了中文版，与前个版本相比，其功能有了很大提升。但是，功能再强大，Visual Basic仍然有一个缺点：在没有MSVBVM**.DLL的计算机上必须安装所需的DLL文件。用它可设计操作系统，不过，比较困难。在二十一世纪初，Microsoft公司推出Visual Studio 2003与Visual Basic之间有了重大变化，Visual Studio为各种编程工具做了一个平台，Visual Basic.NET可在这种平台上运行。相对于传统VB，有很大的不同。VB.Net，首次使用.Net构架进行可视化编程，并且能很好地与COM构架兼容。2005年Visual Studio 2005则运用了NET 2.0的技术，更加的方便了程序员的工作。可是新的程序对系统配置要求也较高，需要微软.Net Framework 2.0以上的.Net构架支持。2007年12月,微软(Microsoft)推出了Visual Studio 2008 Beta 2 发生了重大的变化(见附图)在代码输入的时候,可以比VB2005快很多,在非特殊的情况下,VB2008都会自动开启自动完成关键字这个命令而且开始支持最新的.NET Framework 3.5 Beta 2VB编程语言历史＝＝＝＝＝＝＝＝＝ Visual Basic从1991年诞生以来，现在已经13年了。BASIC是微软的起家产品，微软当然不忘了这位功臣。随着每一次微软技术的浪潮，Visual Basic都会随之获得新生。可以预见，将来无论微软又发明了什么技术或平台，Visual Basic一定会首先以新的姿态登上去的。如果你想紧跟微软，永远在最新的技术上最快速地开发，你就应该选择Visual Basic。 1991-西雅图夜空的雷电随着Windows 3.0的推出，越来越多的开发商对这个图形界面的操作系统产生了兴趣，大量的Windows应用程序开始涌现。但是，Windows程序的开发相对于传统的DOS有很大的不同，开发者必须将很多精力放在开发GUI上，这让很多希望学习Windows开发的人员却步。1991年，微软公司展示了一个叫Thunder的产品，所有的开发者都惊呆了，它竟然可以用鼠标“画”出所需的用户界面，然后用简单的BASIC语言编写业务逻辑，就生成一个完整的应用程序。这种全新的“Visual”的开发就像雷电（Thunder）一样，给Windows开发人员开辟了新的天地。这个产品最终被定名为Visual Basic，采用事件驱动，Quick BASIC的语法和可视化的IDE。Visual Basic 1.0带来的最新的开发体验就是事件驱动，它不同于传统的过程式开发。同时，VBX控件让可视化组件的概念进入Visual Basic。Visual Basic 1.0是革命性的BASIC，它的诞生也是VB史上的一段佳话。

百度VB俱乐部开张大吉百度VB俱乐部开张大吉！--------------------------等了几天，终于申请下来了。燕过留声，客过留言。希望大家常来VB俱乐部坐坐。

★如何限制inputbox中输入的内容★ 比如，我想用inputbox接受内容。我怎么能不让用户输入汉字，而只让他输入数字呢？具体该如何控制？希望哪位高手，不吝赐教...

★取日期、时间问题★ 我们常用的函数。可以取出日期和时间。但是我们有时候并不需要那么全。。我们只需要年或者月或者日。。。或者小时或者分钟......那么改怎么实现呢？我用mid做过。。。但是效果不怎么好。。取年还好点，因为现在基本上都是4位。。。但是取月、日、小时、分钟、秒。。。就不那么好使了。。。不知道各位能否提供点好的建议。。。敬请赐教。。。

达洲人的爱情留下你们喜欢的人的名字让你们的爱永恒

★绘制不一般的矩形★ 我们在使用windows的时候经常会选中多个文件我们经常有这样做---------按下鼠标左键。。。然后拖动鼠标。。。在这一瞬间。。。我们绘制了一个矩形。。。其边界是虚线的不知道如何实现这个操作

☆求N个字符串的最长公共子串☆ 求N个字符串的最长公共子串，N<20，字符串长度不超过255。例如N=3，由键盘依次输入3个字符串为：What is local bus ?Name some local buses.local bus is a high speed I/O bus close to the processor.则最长公共子串为"local bus"。

☆算法集锦☆ 大家都把自己知道的或者看过的一些算法发出来吧。。资源共享

双鱼的你还好吗？看过了狠多的文章，都是描述双鱼的。当然，我自己也是。不知道自己从什么时候开始相信星座的。也不知道这样的信任是对是错。只知道，自己确实经常容易伤感。很在意别人的感受。很在乎她是怎么想的，哪怕是她微乎其微的一举一动。看一部电影，可能会为主人公的某些举动而落泪。听一首歌曲，可能会为了那优美的旋律而遐想。我不知道，有多少人会是我这样。双鱼都是这样吗？问候一下其他的双鱼：“双鱼的你还好吗？”

伤感破碎让一切都在歌曲中破碎让我们在音乐中去感受伤感的旋律因为伤感的旋律最是能触动人的心弦查看专集：http://zhangmen.baidu.com/promotion/10010/155282.html

1 下一页