-
VB6用WebBrowser获取HTML
所属栏目:[大数据] 日期:2020-12-16 热度:194
在WebBrowser的DocumentComplete事件中: 1: Dim HTML As HTMLDocument 2: Dim strData As String 3: Set HTML = WebBrowser1.Document 4: strData = HTML.documentElement.innerHTML 其中 strData就是返回的HTML代码。WebBrowser1就是 WebBrowser对象 本文[详细]
-
VB规定,消息类的调用函数只能放在模块内,即函数preWinProc只能
所属栏目:[大数据] 日期:2020-12-16 热度:190
VB规定,消息类的调用函数只能放在模块内,即函数preWinProc只能放在模块内,否则必将出错。所以,除非你不用消息类语句,否则你不得不使用模块。[详细]
-
03-02 创建和编辑AutoCAD实体(二) 创建对象(2)
所属栏目:[大数据] 日期:2020-12-16 热度:122
4、Create Point Objects创建点对象 Point objects can be useful,for example,as node or reference points that you can snap to and offset objects from. Youcan set the style of the point and its size relative to the screen or inabsolute units.[详细]
-
VB程序员 情书
所属栏目:[大数据] 日期:2020-12-16 热度:161
if you.isMM()then me.ROSE2(you) if you.isSINGLE() and you.isPRETTY() then me.INVITE(you) if me.success then me.haveAGREATVALENTINE(me and you) me.happy you.happy endif endif else me.sayHELLO2(you) me.sayBYE2(you) endif[详细]
-
vb 操作文件下载
所属栏目:[大数据] 日期:2020-12-16 热度:69
Private Sub DownLoad(ByVal filePath As String) Dim Fi As New FileInfo(filePath)'filePath文件路径 If Fi.Exists Then Dim fs As New FileStream(filePath,FileMode.Open) Dim bytes As Byte() = New Byte(CInt(fs.Length) - 1) {} fs.Read(bytes,bytes.[详细]
-
vb 判断控件是否有焦点和控件类型
所属栏目:[大数据] 日期:2020-12-16 热度:142
(窗体中一个timer,两个label) Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long,ByVal hWndInsertAfter As Long,ByVal x As Long,ByVal y As Long,ByVal cx As Long,ByVal cy As Long,ByVal wFlags As Long) As LongPrivate Declar[详细]
-
Mapgis6.7 林相图自动注记
所属栏目:[大数据] 日期:2020-12-16 热度:122
林业行业制作林相图是一件比较复杂的事。Mapgis注释和子图分别对应arcmap中的标注和符号,区文件填充颜色对应arcmap中的渲染。由于mapgis中上注释文本和子图号都只能手工一个个去上。如果能结合arcmap出图的强大功能,由arcmap负责制图,mapgis负责出图,这[详细]
-
vb.net 操作barcode
所属栏目:[大数据] 日期:2020-12-16 热度:129
xlsheet.Shapes.Item("BarCodeCtrl1").OLEFormat.Object.Object.Value = "" 在vb或者vba下面是不需要item的[详细]
-
03-03 创建和编辑AutoCAD实体(三) 使用选择集(1)
所属栏目:[大数据] 日期:2020-12-16 热度:81
Work with Selection Sets使用选择集 A selection set can consist of a single object,or it can be a more complex grouping: for example,the set of objects on a certain layer. A selection set is created by requesting a user to select an object[详细]
-
CSDN认证专家博客地址
所属栏目:[大数据] 日期:2020-12-16 热度:109
http://blog.csdn.net/21aspnet 不得不承认,人家这里的资料与文献真的很强大,也很丰富 --------------------------------------------------- 有用的.NET开发资料 http://blog.csdn.net/rickjelly2004 他们两的资料很全的,看看吧! http://blog.csdn.net/li[详细]
-
CodeModel的范例:一个为项目所有相关类添加工厂方法的AddIn
所属栏目:[大数据] 日期:2020-12-16 热度:118
1、问题描述 对一个程序做 性能 优化 ,发现程序里会大量创建动态对象,是影响性能的一个瓶颈。程序里都是采用Activator.CreateInstance(Type)的方法,记得在codeproject看过一篇文章(原文在此:Dynamic Objects,Factories,and Runtime Machines to Boost Pe[详细]
-
VB和C#的自动实现属性
所属栏目:[大数据] 日期:2020-12-16 热度:68
C#在3.0版本中添加了自动实现属性,但是当时Visual Basic还没有与之匹配的特性。即将 发布 的.NET 4.0版本中,VB在该领域迎头赶上,但却有所不同。C#中,自动实现属性可以这样编写,如下所示: public string FirstName {get; set;} 复制代码 Visual Basic则[详细]
-
关闭pc beep
所属栏目:[大数据] 日期:2020-12-16 热度:187
最近要用linux系统做点事情,被讨厌的嘀嘀声吵死了,转一个关于关闭嘀嘀声的日志,红字的方法已测试有效。其他未试过~ 当电脑对我嘟嘟嚷的时候,我真的觉得很讨厌。我常常在 shell 里面使用 Tab-补全来节省大量的输入时间,但是我受不了扬声器没完没了的嘟嘟[详细]
-
VB的MSHFlexGrid控件点击表头排序的实现
所属栏目:[大数据] 日期:2020-12-16 热度:195
网上搜索了下实现的代码看着头晕 自己根据搜索到的信息写了下表头排序的实现 首先假设要排序的控件名称为grid1 然后在工程的全局模块定义一个integer数组 Private SortInfo() As Integer 然后在绑定grid1数据的地方重定义下这个数组 redim sortinfo(grid1.co[详细]
-
VB.NET中使用代表对方法异步调用
所属栏目:[大数据] 日期:2020-12-16 热度:163
VB.NET中使用代表对方法异步调用 按照我们常规的思维方式,计算机应该是干完一件事,然后再干下一件。用术语来说,这种执行任务的方式叫做同步执行(Synchronous Execution)。既然这样,那么为什么要引入异步执行的概念呢? 目录 为什么要使用异步调用 实现[详细]
-
用VB执行带输入输出的存储过程
所属栏目:[大数据] 日期:2020-12-16 热度:179
Dim backvalue As Integer '返回值Dim adocmd As New ADODB.Commandadocmd.ActiveConnection = CurrentProject.Connectionadocmd.CommandType = adCmdStoredProcadocmd.CommandText = "test01" 'test01 为存储过程名 adocmd.Parameters.Item("@parameter1").[详细]
-
VB清空窗体内所有文本框(其他控件同理)
所属栏目:[大数据] 日期:2020-12-16 热度:199
text1.text="" text2.text="" ........... ......... 上面那种方法太费事了 Dim ctrl As Control For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Then '是否为文本框TextBox ctrl.Text = "" End If Next 代码很简单 很好理解 但着实给我们带来了很[详细]
-
VB计算时间间隔
所属栏目:[大数据] 日期:2020-12-16 热度:65
DateDiff( interval,date1,date2 [ ,firstdayofweek [, firstweekofyear ]]) 参数含义: interval 必要。字符串表达式,表示用来计算 date1 和 date2 的时间差的时间间隔 Date1 date2 必要; Variant ( Date )。计算中要用到的两个日期。 Date1开始时间 date[详细]
-
vb shell
所属栏目:[大数据] 日期:2020-12-16 热度:196
http://free.logomaker.cn/tools/icoMaker.aspx http://minisite.qq.com/others08/index.htm /Shell "control.exe" " timedate.cpl"/ onegreen。net/cr173./rixler.coqianniao http://www.mndsoft.com/blog/[详细]
-
易语言扩展VB6,让她更强大。
所属栏目:[大数据] 日期:2020-12-16 热度:190
VB6要实现一些特殊功能,比如要实现图片格式的转换等等需要下载第三方组件或者编写复杂的算法和调用API 但现在你有了更好的选择就是通过第三方程序设计语言编写你自己需要的功能库,然后再调用。 易语言是一个非常简单且接近于VB的语言,从他的变量声明来看[详细]
-
vb.net异步查询方式一
所属栏目:[大数据] 日期:2020-12-16 热度:103
Imports System.Data.SqlClient Imports System.Threading Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click BindData() End Sub Private Sub BindData() Dim ConStr As St[详细]
-
VB6.0生成的文件简介(VB快速入门基础)
所属栏目:[大数据] 日期:2020-12-16 热度:84
对于VB,我们并不陌生,而对于它生成的文件,可能却是一知半解。首先,我先介绍VB有哪些文件。 1. Vbp 文件:即 V isual B asic P roject,就是一个VB工程概括文件。在我们保存工程后,会生成很多的文件,但是我们只需要双击Vbp文件就能打开整个工程。 2.Frm[详细]
-
VB开发动态链接库DLL和标准API DLL方法和常见问题
所属栏目:[大数据] 日期:2020-12-16 热度:59
问题汇总: 1、 不能调DLL里的Sub编译错误:不能找到方法或数据成员.把ActiveX DLL工程添加到标准EXE工程后就不会出错了..单独打开标准EXE工程调用生成的DLL就出错, 2、. 调用自己编写的DLL为什么不用像调API函数那样如:Public Declare Function GetPrivatePr[详细]
-
vb 载入自己目录的音乐
所属栏目:[大数据] 日期:2020-12-16 热度:139
要在任何机器上都能播放,需要把那首歌通过资源文件,加入你的EXE文件里. 运行时释放临时文件,关闭前删除临时文件. 工具 = VB资源编辑器 = "添加自定义资源"按钮(倒数第二) = 选择你要播放的歌曲 此时 VB资源编辑器 里有一个 "CUSTOM" 项,其下有资源 "101". D[详细]
-
VB中如何把资源器的文件释放出来,并且允许。。如把1.bat载入资
所属栏目:[大数据] 日期:2020-12-16 热度:123
VB中如何把资源器的文件释放出来,并且允许。。如把1.bat载入资源编辑器,为101.如何点击command1释放在C盘的根目录下。同时并运行1.bat Dim temp() As Byte temp = LoadResData(101,"CUSTOM") 'ico Open "c:1.bat" For Binary As #1 Put #1,1,temp() Close[详细]
