VB.NET编程
文章平均质量分 67
ncgege
这个作者很懒,什么都没留下…
展开
-
vb.net 不会无响应的延时函数delay
用系统Threading.Thread.Sleep函数延时过程中会造成程序无响应,特别是最小化窗口后,经常无法正常激活窗口,下面这个就好多了。参数单位为毫秒 Public Shared Sub delay(ByVal Interval As Integer) Dim __time As DateTime = DateTime.Now Dim __Span A原创 2016-02-24 11:26:24 · 5126 阅读 · 0 评论 -
vb.net DateTimePicker如何显示某…
vb.net使用DateTimePicker时,我们往往希望程序初始化是显示固定的某一天,比如本月的第一天,或者本年的1月1号。 DateTimePicker1.Value = DateTime.Now.AddDays(-DateTime.Now.Day+ 1)这个函数有点意思,使用DateTime.Now.AddDays先减去本月当期天数,再加一天,就变成本月的第一天了同理,本年的第原创 2016-02-24 11:33:05 · 3080 阅读 · 0 评论 -
如何使用vb.net多线程
可能一些小程序用不上,单线程就可以完成,但是很多程序往往需要多个线程同时操作,或者用辅助线程来完成主线程的工作, 多线程对于一个程序员来说是一个必须逾越的槛。最近在写一个程序,设备要同时登陆3台设备,如果使用单线程排队完成,时效性就达不到要求,应次没办法必须要学习多线程,那么如何使用vb.net多线程呢?下面是我百度搜索的一片多线程使用实例,先参考:线程的基本操作Dim Td As原创 2016-02-24 11:33:09 · 10401 阅读 · 6 评论 -
vb.net多线程同步调用实例
以前一直感觉多线程比较难懂,最近由于需要,没办法必须克服,这不看了几遍书,终于理解差不多了,先把最开始的一个实例弄上来吧。ImportsSystem.Threading '看名字就知道,这个类干什么用的,多线程应用程序都要用这个类Public Delegate FunctionBinaryOp(ByVal x As Integer, ByVal y As Integer) As In原创 2016-02-24 11:33:30 · 3728 阅读 · 0 评论 -
.net多线程程序windows窗体安全调…
如果使用多线程来提高 Windows窗体应用程序的性能,则必须确保以线程安全方式调用控件。访问 Windows窗体控件本质上不是线程安全的。如果有两个或多个线程操作某一控件的状态,则可能会迫使该控件进入一种不一致的状态。还可能会出现其他与线程相关的Bug,例如争用情况和死锁。确保以线程安全方式访问控件非常重要。.NET Framework可帮助您检测以非线程安全方式访问控件这一问题。I原创 2016-02-24 11:33:58 · 346 阅读 · 0 评论 -
vb.net webbrowser控件如何获取鼠…
首先添加引用Microsoft.mshtml,具体操作项目->添加引用->.NET找到添加就行需要的控件webbrowser一个,button一个,如果名字不是默认请修正代码中控件名字。然后代码如下即可:在vs2010, 【.net4.0下调试通过】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e A原创 2016-02-24 11:34:03 · 675 阅读 · 0 评论 -
messagebox.show使用方法
messagebox是最常用的一个控件,基本的使用方法大家应该很熟悉,但是一些高级用法必须按照重载方法是用,否则会报错,具体对照如下,详见参考网址:http://msdn.microsoft.com/zh-cn/library/system.windows.forms.messagebox.show(v=VS.80).aspx名称 说明Mess原创 2016-02-24 11:34:10 · 3312 阅读 · 0 评论 -
vb.net webbrowser如何使用IHTMLDo…
我们知道很多js代码执行结果在浏览器源代码里看不到,其实我们可以使用IHTMLDocument2来获取 定义如下,需要在项目中添加mshtml.IHTMLDocument2 引用 Dim htmlDocument As mshtml.IHTMLDocument2 'IHTMLDocument2 htmlDocument = WebBrowser1.Do原创 2016-02-24 11:34:14 · 1222 阅读 · 0 评论 -
有些时候经常要查询数组中是否包含…
有些时候经常要查询数组中是否包含某个元素,用array.indexof非常方便: Function getSex(ByVal Lname As String, ByVal dicPath AsString) Dim Sex As String = "男" dicPath =System.IO.Path.GetDirectoryName(dicPath)原创 2016-02-24 11:34:33 · 403 阅读 · 0 评论 -
vb document.execCommand()语法格…
今天想全选webbrowser内容,然后复制保存到文件中,但是遇到些问题,不知道怎么做,今天翻阅了微软的MSDN,可惜太不详细了,没有具体使用方法,百度遇到一片好文章“document.execCommand()方法处理Html数据时常用语法格式”,粘贴出来共享。如下:document.execCommand()方法处理Html数据时常用语法格式如下: 复制内容到剪贴板 代码: docum原创 2016-02-24 11:32:04 · 798 阅读 · 0 评论 -
vb.net 判断是否按下某个按键
vb.net判断是否按下某个按键,比如我的textbox2控件要监听,是否按下了ctrl+F11,或者ctrl+F12,并分改变窗体状态。 Private SubTextBox2_KeyDown(ByVal sender As System.Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) HandlesTextBox2.K原创 2016-02-24 11:31:34 · 12114 阅读 · 0 评论 -
vb 读写.ini文件
INI 文件就是 Windows 中常见的以 .ini 为扩展名的文件,其内部格式和各部分的名称如下:[Section1]Key1=Value1Key2=Value2Key3=Vlaue3[Section2]Key1=Value1Key2=Value5Key4=Value4Key5=...... INI 文件中分若干个段(Section),每个段中有若干个键 (Ke原创 2016-02-24 11:26:29 · 992 阅读 · 0 评论 -
今天完终于完成了ChinaZ站长论坛顶…
这几天老婆回娘家挖竹笋,呵呵可惜她老家太忙了,帮忙好几天,只挖了4根竹笋,她的笋干计划有泡汤了。 这几天要带小孩,是在没多少时间上网,写东西。ChinaZ账号注册也2年多了,一直没怎么回帖。在里面发了个踢楼帖,悲剧了,没玩过踢楼,本人洗刷惨了。强烈刺激我要得些金币。 我也不想无聊的去顶贴,使用顶贴机,那账号很可能被封。根据自己的需要,花了2个晚上,做了个站长论坛智能回帖机,原创 2016-02-24 11:26:34 · 256 阅读 · 0 评论 -
vb.net 数组去除重复
Public Function FilterRpeat(ByVal allUrls As String()) AsString() '去除重复函数,返回数组 '这个对象用来存储非重复数据,我这里是去除重复域名,所以定义这个名字 Dim Lst_Domains As New List(Of String)() Dim Str原创 2016-02-24 11:26:50 · 7941 阅读 · 0 评论 -
vb截取任意两个特征字符之间的字符…
vb截取字符串(1)左部截取left$(字符串,n):n是要截取的字符个数(2)中部截取Mid$(字符串,p,n):表示从第p个字符开始截取n个字符(3)右部截取Right$(字符串,n):表示截取字符串的后n个字符如:left$("abcdefg",3)的结果是:"abc"mid$("abcdefg",2,3)的结果是:"bcd"right$("abcdefg",3)的结果是:"原创 2016-02-24 11:27:05 · 15627 阅读 · 0 评论 -
UTF-8 GBK UTF8 GB2312及其他常用…
UTF-8:UnicodeTransformationFormat-8bit,允许含BOM,但通常不含BOM。是用以解决国际上字符的一种多字节编码,它对英文使用8位(即一个字节),中文使用24为(三个字节)来编码。UTF-8包含全世界所有国家需要用到的字符,是国际编码,通用性强。UTF-8编码的文字可以在各国支持UTF8字符集的浏览器上显示。如,如果是UTF8编码,则在外国人的英文IE上也能显示原创 2016-02-24 11:30:56 · 438 阅读 · 0 评论 -
万网whois查询接口代码
1、域名check接口采用HTTP,POST,GET协议:调用URL:http://panda.www.net.cn/cgi-bin/check.cgi参数名称:area_domain 值为标准域名,例:hichina.com调用举例:http://panda.www.net.cn/cgi-bin/check.cgi?area_domain=hichina.com返回原创 2016-02-24 11:31:01 · 7021 阅读 · 0 评论 -
vb.net批量查询已删除域名
这里使用chinaZ的接口查询已删除域名,中间省略了些函数,大家可以自己写一下。后期还需要增加备案查询,以及百度domain查询。Imports System.Text.RegularExpressionsPublic Class Form1 Public pageCount AsInteger = 1 '以查询到域名结果页数 Public domainCount AsI原创 2016-02-24 11:31:05 · 397 阅读 · 0 评论 -
VB.net怎么最小化到系统托盘
小孩放假了,天天在电脑上看动画片,时间有点长,对小孩视力和身体都不好,准备自己写个有个性的保护程序,就是固定时间直接播放声音,并锁定屏幕一定间隔,过后程序自动最小化到托盘。现在遇到问题,不知道vb.net程序怎么最小化到系统托盘,百度到一篇资料CP过来参考。新浪微博对代码支持不好,排序有问题,可以直接查阅:http://oteman.blog.sohu.com/47614796.html所谓静态原创 2016-02-24 11:31:30 · 2204 阅读 · 0 评论 -
IE浏览器自动点击等事件WebBrowser…
现在.net流行的是C#,有些时候想找VB代码还真挺难得,这不找了个c#控制IE浏览器自动点击等事件WebBrowser,mshtml.IHTMLDocument2,大家可以自己翻译下,或者找找灵感,非常好的资料。全文如下:可以实现例如通过应用程序操作google搜索,用户输入要搜索的内容,然后在google中搜索;可以自动点击网页上的按钮等功能 1.加入对Microsoft原创 2016-02-24 11:34:37 · 3580 阅读 · 0 评论 -
x64系统调用API注意事项
我的系统是win7x64,在vb.net调用APIfindwindow时发现个奇怪现象,获取到的句柄和SPY++看到的不一样,后然才发现,是编译选项没对。双击“MyProject”,选择“编译”-“高级编译选项”-“目标CPU”为x64即可解决。因为在x64环境下,integer的变量位长是不一样的。原创 2016-02-24 11:34:42 · 687 阅读 · 0 评论 -
vs2010中打开vs2008
如何在vs2010中打开vs2008项目文件?第一步:以记事本方式打开该项目的sln解决方案,找到这两行信息,分别如下:Microsoft Visual Studio Solution File, Format Version 10.00# Visual Studio 2008 把标记绿色地方改为:11.00和2010;第二步:以记事本方式打开该项目的工程文件,也就是后缀为原创 2016-02-24 11:34:51 · 497 阅读 · 0 评论 -
vb.net防止WebBrowser在新窗口中打…
在日常的开发中,大家有时需要用WebBrowser加载URL,来实现某些功能。而这时,我们就不希望所打开的页面中的链接,在新窗口中打开,因为这样的话,实际上是用系统默认的浏览器打开了,从而脱离了你的WebBrowser,也就不能被你所控制了。要解决这个问题,可以使用下面的方法:假设WebBrowser的Name是 webBrowser1添加以下代码Private Sub WebBrows原创 2016-02-24 11:37:53 · 2317 阅读 · 0 评论 -
vb.net如何使用代码给DataGridView…
vb.net如何使用代码给DataGridView添加按钮,以下代码将在表格最后一列添加一个“掉站管理原因”按钮 Dim btnEdit As NewDataGridViewButtonColumn() btnEdit.Name = "btnEdit" btnEdit.HeaderText = "掉站原因管理" btnEdit.Text =原创 2016-02-24 11:39:46 · 3294 阅读 · 0 评论 -
2013年05月06日
ComboBox组件如何绑定数据库可以在winform里根据向导完成,但是灵活性较差,下面介绍combobox使用代码绑定显示数据库字段。 Dim sqlconstr As String =getSqlConstr() '定义并获取SQL连接字符串 Dim customersTableAdapter As New SqlDataAdapter("Select C原创 2016-02-24 11:39:51 · 293 阅读 · 0 评论 -
DataGridViewButtonColumn的使用 —…
.Net的DataGridView控件中,提供了一种列的类型,叫 DataGridViewButtonColumn ,这种列类型是展示为一个按钮,可以给button赋予相应的text,并且,此button可以用来做处理事件的判断依据。在正式开始介绍使用方法之前,我们先要进行一个概念性的说明:DataGridViewButtonColumn,虽然在UI展现上,是一个BUTTON的样子,但是原创 2016-02-24 11:39:56 · 7008 阅读 · 0 评论 -
telnet协议内容提取
选项协商是Telnet协议最复杂的部分,总共有39个选项用于配置本地和远程主机间的工作模式。当一方要执行某个选项时需向另一端发出请求,若对方接受该选项,则选项在两端同时起作用,否则两端保持原来的模式。Telnet的命令格式如表2.1、表2.2所示。IAC是Telnet协议中的保留码,双方用IAC确定收到的字节是数据还是命令,Telnet协议的命令是至少包含两个字符(IAC和命令码)的字节序列,选项原创 2016-02-24 11:40:38 · 4198 阅读 · 1 评论 -
Excel“工程不可查看”及VBA工程密码…
一、Excel“工程不可查看”两种实现方法及破解关于Excel宏编程中,要用到一些技巧,如破解Excel宏加密。今天我对一个Excel宏编程中进行日期限制进行了破解。 方法一(共用级锁定) 1、先对excel档进行一般的vbaproject”工程密码保护。 2、打开要保护的档,选择∶工具--->保护--->保护并共用活页簿--->以追踪修订方式共用-->输入密码-->保存档。原创 2016-02-24 11:40:46 · 25706 阅读 · 0 评论 -
vba给数组赋值
'向VBA数组中写入数据 '1、按编号(标)写入和读取 Sub t1() '写入一维数组 Dim x As Integer Dim arr(1 To 10) arr(2) = 190 arr(10) = 5 End Sub Sub t2()'向二维数组写入数据和读取 Dim x As Integer, y原创 2016-02-24 11:41:05 · 83277 阅读 · 0 评论 -
AppUpdater组件自动更新 [转]
AppUpdater组件是可以更新的,主要的问题在于,要把服务端的虚拟目录配置,访问权限设置 "目录浏览".Smart Client开发: 使用AppUpdater组件使用AppUpdater组件要用到下面这些文件:大家可以在http://windowsforms.net/downloads/GDN/dotnetupdater.zip 中下载文件名 功能描述AppStart.exe原创 2016-02-24 11:43:20 · 1061 阅读 · 0 评论 -
判断QQ是否在线方法(接口)
由于程序需要,需要检查QQ号码在线不,以前看道集中webqq接口都是返回在线状态图片,这个我我没用,今天百度了一下发现QQ有一个接口可以判断某个号码是否在线,而且可以批量处理很方便,居然不能识别隐身的,哈哈,具体接口如下:http://webpresence.qq.com/getonline?Type=1&123456:117947428:414729078:343211:6789321:99原创 2016-02-24 11:37:35 · 8887 阅读 · 3 评论 -
C#处理json数据
vb太苦逼了,很多资料都没有,没办法弄个C#的来学习一下,写的很好的。 JSON(全称为JavaScript Object Notation)是一种轻量级的数据交换格式。它是基于JavaScript语法标准的一个子集。JSON采用完全独立于语言的文本格式,可以很容易在各种网络、平台和程序之间传输。JSON的语法很简单,易于人阅读和编写,同时也易于机器解析和生成。JSON与XML的比较原创 2016-02-24 11:37:22 · 362 阅读 · 0 评论 -
.net六种汉字代码转换(gbk_utf8_u…
.net六种汉字代码转换(gbk_utf8_unicode)private void button1_Click(object sender, EventArgs e) { //汉字转为Unicode编码: string hz= textBox1.Text.ToString(); byte[]b=Enco原创 2016-02-24 11:35:24 · 3418 阅读 · 0 评论 -
vb.net http post的两种方法
剛剛看到一段簡短的程式是使用vb.net 開發應用程式來對網站使用POST的方式傳送資料Dim web As New System.Net.WebClient()web.Headers.Add("Content-Type","application/x-www-form-urlencoded")Dim d As Byte() =System.Text.Encoding.ASCII.Get原创 2016-02-24 11:36:15 · 15302 阅读 · 0 评论 -
linq快速比较两个列表
Sub compareLists(ByVallst1 As String(), ByVal lst2 As String()) ‘通过对话框获取两个药对比文件的数据到两个列表。 Dim ofdg1 As New OpenFileDialog Dim ofdg2 As New OpenFileDialog Dim path1 As St原创 2016-02-24 11:36:21 · 1167 阅读 · 0 评论 -
VS2010中程序打包封装步骤
VS2010中程序打包封装步骤【图解】因为学习的要求,我需要把自己的程序进行打包封装,开始也是苦恼,没有找到很好的办法,但并没有放弃,终于发现了一个差不多的文章,于是摸索着进行,可喜的是是成功了,下面和大家分享一下。http://maxcola.blog.163.com/blog/static/197164083201241372347367/原创 2016-02-24 11:36:41 · 1502 阅读 · 0 评论 -
vs2010 .vb如何生成类库(DLL)
vs2010 vb如何生成类库(DLL)1.打开VS2010,文件,新建项目-visual basic -windows-类库.vb如何生成类库(DLL)" TITLE="vs2010 .vb如何生成类库(DLL)" />2.把已经调试编写好的类库拷贝到当前类文件中,保存3.设置根命名空间,编程时imports引用的是命名空间的名字,不是类名,所以,要定义好自己的命名空间名字和根命名原创 2016-02-24 11:36:47 · 6156 阅读 · 0 评论 -
VS 2010令人恼火的Bug:开着…
VS2010令人恼火的Bug:开着远程桌面,Ctrl+C和Ctrl+V都会失效注:2010年12月8日发布的Visual Studio 2010 Service Pack 1Beta解决了该问题。上次遇到VS2010中尴尬的代码窗口缩放功能,今天确认VS 2010存在一个令人恼火的Bug:如果你的电脑开着对另外一台电脑的远程桌面连接,你在本机使用VS2010写代码时,如果Ctrl原创 2016-02-24 11:36:56 · 1034 阅读 · 0 评论 -
vb.net 判断文件编码的方法
vb.net 判断文件编码的三种方法使用方法:GetEncoding(文件名)' 读取文本文件的内容 ' ' 文件名 ' 文件编码 ' 文件内容 Public FunctionReadFile(ByVal fileName As String) As String If File.Exists(fileName) Then原创 2016-02-24 11:37:00 · 3899 阅读 · 0 评论 -
SMTP判断邮箱是否存在,检查email地…
判断一个Email是否存在的类,现在VB代码真的太少了,C#原版弄过来吧,具体录下,反正编译后的类,vb.net也是可以直接引用的嘛,要不就自己转换一下代码。在以往的编程中,比如编写用户的资料时,有时需要确认用户输入的Email是否真实有效,以前我们最多只能做到验证Email是否包含了某些特殊的字符,比如"@",".",".com"等,做到的只是判断了Email的合法性,证明用户填写的Em原创 2016-02-24 11:37:06 · 7874 阅读 · 1 评论