首次接触VB,以下就先进行VB中的排序问题                   Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer Dim e As Integer Dim f As Integer Dim g As Integer Dim h As Integer Dim i As Integer Dim j As Integer Dim k As Integer Dim l As Integer Dim m…

java Collection中的排序问题 这里讨论list.set.map的排序,包括按照map的value进行排序. 1)list排序 list排序可以直接采用Collections的sort方法,也可以使用Arrays的sort方法,归根结底Collections就是调用Arrays的sort方法. public static <T> void sort(List<T> list, Comparator<? super T> c) {     Object[] a…

小工具:天气查询   开发一个天气查询的工具主要由两步构成,一是数据的获取,二是数据的展示.  一.数据获取 数据获取又可以分为使用其它公司提供的API和手动抓取其它网站数据. 1. 某公司提供的API 可以从阿里云的云市场中查找,可以找到免费的API,并且提供不同语言的示例,实在不会还可以向客服咨询... 回想当初使用A公司提供的API,使用B公司的APPCODE,还理直气壮的去问A的客服“我照你们示例写的为什么还调用失败”??? 2.其它网站数据抓取 抓取数据源网站为中央气象台(http:/…

释义 &(Ampersand)是英语单字and之代表符号,亦可用作中文中的“和”.“与”之代表符号.这个符号源于拉丁文的et的连写. 可读做 ampersand,即 "and per se and",意思是 "and [the symbol which] by itself [is] and". '+'常见运算方法(几乎所有高级语言)1)数字 + 数字 :执行数学加法.例如 11 + 22 = 332)字符串 + 字符串 : 字符串连接.例如 "1…

Private Sub numDuration_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles numDuration.KeyUp numDuration.Value = numDuration.Value End Sub Private Sub numDuration_ValueChanged(ByVal sender As Object, ByVal e As System…

Sub可以理解为执行一个过车,一个操作. Function在执行完过后,还要返回一个结果. Sub:过程:Function:函数,可以带返回值. 语法: Sub SubName(参数1,参数2,...) ... End Sub Function FunctionName(参数1,参数2,...) ... FunctionName=返回值 End Function 调用时: Sub 只能用: SubName(参数1,参数2,...)              变量=FunctionName(参数1…

一.API是什么? 这个我本来不想说的,不过也许你知道其它人不知道,这里为了照顾一下新手,不得不说些废话,请大家谅解. Win32 API即为Microsoft 32位平台的应用程序编程接口(Application Programming Interface).所有在Win32平台上运行的应用程序都可以调用这些函数. 使用Win32 API,应用程序可以充分挖掘Windows的32位操作系统的潜力.Mircrosoft的所有32位平台都支持统一的API,包括函数.结构.消息.宏及接口.使用 Wi…

函数调用的参数传递有"值传递"和"引用传递"两种传递方式.如果采用"值传递",在函数内部改变了参数的值,主调程序的对应变量的值不会改变:如果采用"引用传递",在函数内部改变了参数的值,主调函数对应变量的值也会发生相应的改变."值传递"的实质传递一个变量的"值拷贝","引用传递"的实质是传递一个变量的"地址".在VB中ByRef表示引用传递,ByVa…

动态数据交换(dde)是windows应用程序间通讯的基本方法之一,在动态数据交换的过程中,提供数据和服务的应用程序称为服务器,请求数据或服务的应用程序则称为客户. dde交谈是由客户程序启动的.如果得到服务器程序的响应便可在两个应用程序之间建立起一条数据通道,开始进行信息的动态交换和传递.一个windows应用程序可以是一个程序的客户,同时也可以是另一个程序的服务器.本文将介绍如何用visual basic来编写dde服务器和客户程序. vb中的dde事件 当动态数据交换启动时,会产生若干事件…

字符串运算符和字符串表达式 字符串运算符的作用是将两个字符串连接成一个字符串,经常形象的叫做连接符. 在VB中就提供了两种连接用的字符串运算符 “&”.“+” 例如  “VB”+“编程入门” 就等同于“VB编程入门” “VB”&“编程入门” 就等同于“VB编程入门” 说明:  在字符串数据后面使用“&” 时,应该在运算符和字符串之间加一个空格  "A" & "B" 二不是"A"&"B"…

经常看到有些VB的例子中直接用个CreateObject就可调用系统功能(大多是COM对象),像用户设定,网络设定等等.虽然C#中可以通过使用VB的命名空间的方法来调用CreateObject函数,但是这样比较没什么用,因为生成的对象的所带有的方法都不能使用.C#中还可以直接用添加引用的方式来调用一些对象,前提是你知道该添加哪个引用.当我上网搜索,已经搜索到很多VB的成功用CreateObject调用的例子,C#的例子却很难找到的时候,就干脆用类似VB的方法算了,很简单.免得继续在网络中大海捞针…

昨天使Linq To SQLite 支持VB,今天在VB中写了几条Linq语句,发现了几个问题: 1.在Linq To SQLite中的Linq语句查询后并不是得到的匿名数据类,而是将Linq转换为SQL语言?例如: Dim tempProvince = From cust In db.AddressProvinces Select cust 执行后得到的tempProvince并不是一个匿名数据类,而是: 所以,Linq To SQlite查询执行后的结果不能直接绑定控件,而是要.ToList…

上午解决了在C#中利用Nuget包使用SQLite数据库和Linq to SQLite,但是最后生成的是C#的cs类文件,对于我这熟悉VB而对C#白痴的来说怎么能行呢? 于是下午接着研究,既然生成的是C#的cs类文件,无法直接在VB中使用,那么我们就把生成的cs类文件直接编译成DLL文件,然后在VB中引用,不就行了吗? 1.在VB中执行上面文章中的操作,到第9步,得到cs文件,需要注意的是:在VB中要选择“显示所有文件”才能看到生成的cs类文件: 2.双击打开cs文件,复制其中的所有代码. 3.…

/r/n  能在邮件中进行换行, 在VB中使用 ASCII码的 chr(10).chr(13) 就能使VB发送邮件实现换行…

在VB中,连接ACCESS数据库的方法主要有以下三种 使用ADO对象,通过编写代码訪问数据库 Connection 对象 ODBC数据源 使用ADO Data 控件高速创建数据库连接 有三种连接方法 Data Link文件 使用ODBC数据源名称 使用连接字符串 使用数据环境设计器创建数据库连接 首先加入�环境引用. 然后找到数据源进行连接 不管是哪一种连接,都是先有一个路径,通向要连接的数据源,和数据源建立关系,在连接.就好比从北京到上海,能够做汽车,能够做火车,还能够做飞机,汽车走快速,火车…

VB中的Dictionary对象 Dictionary对象不是VBA或Visual Basic实时语言的具体存在的部分,它是存在于Microsoft Scripting Runtime Library(SCRRUN.DLL)中的一个对象. 为了在应用程序中使用Dictionary对象,就必须利用Reference对话框增加一个项目级的引用到Scripting Runtime Library. 核心归纳:1.更换键名,用obj.key("xx")="newxx"2.更…

VB中DateDiff 函数使用方法 DateDiff (interval, Date1 , Date2[,firstweekofyear[,firstweekofyear]])  返回一个Variant(long) 的值,表示两个指定日期间的时间间隔数目 interval:设定两个日期之间的期间计算之单位.譬如 >interval="m" 表示计算的单位为月. >interval 的设定值如: yyyy > Year 年 q Quarter 季 m Month 月…

原文:MEF框架在Silverlight中应用(15) MEF框架在Silverlight中应用 代码下载 MEF框架是微软提供的一个插件框架.应用概括为一句话:输入,输出,组合.下面是具体在Silverlight中应用中的关键代码. 步骤 1.Client端建立3个Silverlight项目.   MEFSilverLight4(主项目,组装部件)   SilverlightApplication1(部件)   SilverlightApplication2(部件) 2.Server建立一个测…

本文发表在<微型机与应用>杂志2001年第3期. 基于VB中WINSOCK控件的网上象棋系统的实现 马根峰1   ,  孙艳2  , 王平1 (1.重庆邮电学院自动化学院,重庆,400065:2. 铁道部第十九工程局四处,内蒙 通辽,028000 )  摘要     本文首先介绍了Visual Basic中的WINSOCK控件的使用方法,然后深入探讨了网上象棋系统的设计思想及其实现过程. 关键词    WINSOCK控件:TCP:UDP 中图分类号: 文献标识码: 1      引言 Micr…

今天无意中发现可以替代VB中的Any 在API声明中可以使用<MarshalAs(UnmanagedType.AsAny)> VB中声明的API Declare Function SendMessage& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) 在vb.net可以这…

关于VB中的冒号,给许多人的印象都是:“一行可书写几句语句”.这么说是对的,但是有一种情况是不对的,那就是在条件语句中.这也是做一个VB项目升级的时候遇到,因为这个问题我查了好长时间程序,一直在找VB的中的效果是如何实现的呢?现在发现那是一个非常大的bug.我觉得这不是程序员的错误,应该是VB语法上的漏洞.如果有理解不对的地方欢迎大家指教. 看一个例子吧: 1 If Row1 = -1 Then Row1 = 0: If Row2 = -1 Then Row2 = .MaxRows 我们一般的理…

vb中sortedList集合了数组和散列表的特征,可以像数组,ArrayList等索引获取值,也可以像hashtable,hashmap等散列表通过键值对获取值…

今天碰到一个问题,登陆的时候,如果不需要验证手机号为空,则不去验证手机号 因为登陆的时候所有的验证信息都存放在一个数组里 Dim CheckUserInfo() As String ={UserBirthday, SecEmail, UserMob, UserSex, RealNameFirst, RealName, CheckCardID, CheckCardType, Contactemail,Contactmobile} vb中的remove方法不好使,或者不会用... 就去百度了一个方法…

vb中执行查询后,一般要判断是否为空,只要执行的查询执行了select,都可以用rs.eof 或者 rs.recordcount来判断, 但是,如果执行的sql中加了逻辑判断,导致没有执行任何select语句,则用rs.eof 或者rs.crcordcount来判断,系统就会提示 对象关闭时无法操作. eg1: delare @a int select @a 说明:如果是执行该脚本,用rs.eof进行判断时,系统就会报对象关闭错误,因为没有执行任何select查询,没有返回任何内容. eg2:…

dim a() as long dim b() as bytecopymemory b(0),byval "1234",4 copymemory byval varptr(a(0)),1234,4 在 VB 中处于安全考虑,不能直接访问内存,但你可以使用 CopyMemory(RtlMoveMemory) 的 API 来复制指定区域的内存,其具体声明如下:Declare Sub CopyMemory Lib "kernel32" Alias "RtlMov…

VB中Excel 2010的导入导出操作 编写人:左丘文 2015-4-11 近来这已是第二篇在讨论VB的相关问题,今天在这里,我想与大家一起分享一下在VB中如何从Excel中导入数据和导出数据到Excel(程序支持excel2010),在此做个小结,以供参考.有兴趣的同学,可以一同探讨与学习一下,否则就略过吧.   1. 程序导入导出操作介面: 2. 从excel导入数据代码: ) Then , ) = , ) = , ) =  Then).Value =  To rs.Fields.coun…

--- 一．VB中资源文件的分类 ---- 通常将资源分为两类:1.字符串资源,包括菜单和文本中使用的字符串,如"Hello World"等:2.二进制资源,如位图(.BMP),图标(.ICO),光标(.CUR),声音(.WAV)和动画(.AVI)等.对于不同的资源,要用不同的调入函数,这在下面会介绍. ---- 二．资源文件的建立 ---- 采用如下步骤来建立资源文件: ---- 1．启动VB6.0企业版,新建一个标准 Exe 工程,即工程1,有一个缺省窗体,form1.如果采用应用…

格式:InputBox(pronpt[,title][,default][,xpos,ypos]).其中的pronpt为窗口的提示词,title为输入窗口的标题,default为输入窗口的默认内容,xpos,ypos为窗口距离屏幕左边,上边的距离. 说明 如果同时提供了Helpfile与Context,用户可以按F1来查看与Context相应的帮助主题.某些主应用程序(支持使用Visual Basic for Applications的应用程序),例如Microsoft Excel,会在对话框中…

请教下,VB中Sstab控件,如何隐藏选项卡呢? SSTab1.TabVisible(1) = False object.TabVisible(tab) [ = boolean ] tab 数值表达式,它指定应成为可视或隐藏形式的选项卡. SSTab1.TabVisible(index) = False index是选项卡的索引值…

Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数. Trim Trim(string) 将字符串前后的空格去掉 Ltrim Ltrim(string) 将字符串前面的空格去掉 Rtrim Rtrim(string) 将字符串后面的空格去掉 Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 Left Left…