如何用api实现vb代码text1.seltext=.... [问题点数:0分]

Bbs1
本版专家分:10
结帖率 100%
Bbs5
本版专家分:3629
Blank
蓝花 2000年11月 VB大版内专家分月排行榜第三
Bbs5
本版专家分:3629
Blank
蓝花 2000年11月 VB大版内专家分月排行榜第三
Bbs7
本版专家分:14519
Blank
黄花 2002年7月 VB大版内专家分月排行榜第二
2002年2月 VB大版内专家分月排行榜第二
其他相关推荐
VB病毒编写的详细教程(内附vb经典小病毒代码)
VB病毒编写的详细教程(内附vb经典小病毒代码).zip 你值得拥有! ps:有些教程是在百度搜的,希望大家喜欢。
如何用JSTL实现分页
如何用JSTL实现分页 如何用JSTL实现分页 如何用JSTL实现分页 如何用JSTL实现分页 如何用JSTL实现分页
用VB+API实现网页下载和数据提交功能。
其实如果是单纯的下载网页,代码可以更简单,但俺这段代码不仅可以下载WEB页面,同时还可以向WEB页传递参数,完全可以替换XMLHTTP的GET功能,俺本来还想加上POST功能的,后来项目中不需要,所以就没加了,想了解WININET API的朋友,应该依此作一些扩展。Option Explicit* *************************************
如何用VB做个英语词典
如何用VB做个英语词典
用VB做扫雷附全部代码
用VB做扫雷游戏的一个简单论文 1. For...Next循环应用 在游戏设计上,利用了两个二维数组分别记录地雷的分布状况及地雷区及表面探测情形。利用数据循环的对比,不但速度快,而且在设计阶段,程序的架构比较清楚。 2.Load及Unload动态增加或删除组件 利用Load及Unload指令,可动态新增及删除组件。在游戏的雷区,依照使用者自定义的地图类型,布置未探测的地雷方块。加载组件后,通过Image组件的Move属性,将组件布置于预定的位置。Move函数的原型如下: 组件. Move X坐标,[Y坐标],[组件宽度][组件高度] 再配合双循环的变量值,可以控制组件布置于窗体的方向及方式。 3.MouseDown与MouseUp事件 在游戏过程中,利用鼠标所发出的信息了解使用者的意图,进而做出相应的动作。在MouseDown与MouseUp事件中,可以捕捉鼠标所按下或放开的按键为何、鼠标光标在该组件上的坐标及是否同时按下辅助键等。用Button参数值表示鼠标上的按钮数值。其意义如下: 1:左键 2:右键 4:中央键 若同时按下不止一个按键时,则传回数值为按键数相加。例如同时按下左键及右键,则Button值为1+2=3. 在本游戏中,利用右键的MouseDown事件标示“已标示”方块,利用左键的MouseDown事件,标示使用者准备按下的方块,利用左键的MouseUp事件确定翻开的方块。
vb简单实现运算符优先级的计算器
尝试写了一个计算器,VB大作业。从来没有接触过vb语言,只能硬着头皮上了。所幸窗体设计与C#相似。 设计了一个非常简易的计算器(其中利用栈实现了运算符优先级) 【界面如下】 组成包括Label控件2个,其中一个用来显示数学表达式,一个显示当前操作数字; 按钮17个,分别为10个数字0~9,小数点,四则运算按钮,等号按钮,清零按钮;   【设计思路】 一开始实现的是只能操作
一个求24点所有可能解的VB源代码及程序实现
求24点的VB的不多。网上求一种解的代码多,但是求所有解的代码和程序更不多。最近花了2天做了一个求24点所有解的VB小程序。
VB代码实现屏幕截图(Screenshot功能)
采用的模拟按键的方法实现,根据网上的代码改的
VB教程:组合框控件的设计与实现
随着计算机技术和网络技术的高速发展以及形式多样、数量庞大的数字化教学资源的出现,网络辅助教学得到越来越广泛的应用。如何有效的开展网络辅助教学活动逐渐成为高校教育信息化建设所关注的重要课题,网络辅助教学平台的建设已成为解决这一课题的基础和关键。本文针对当前高校程序设计类课程传统教学模式的弊端,以建构主义学习理论、自主学习理论等学习理论作为理论基础,以教学系统设计理论和软件工程理论作为理论支撑,根据本校《Visual Basic程序设计》课程(以下简称VB)的教学实际情况,确定了《VB程序设计》网络辅助教学平台的指导思想和系统框架 在对已有的VB案例程序和试题进行整理归类的基础上,开发出了一批新的案例程序,搜集、整理、建立起了按知识点划分的较完整的试题库,通过重组、整理、收集和开发等手段建立起了较完整的《VB程序设计》网络辅助教学平台的资源库,最终开发出了 《VB程序设计》网络辅助教学平台并投入使用;在设计理念上提出了案例程序──任务驱动教学法,并在教学过程中得到了检验,取得了良好的教学效果。论文首先介绍了设计和开发网络辅助教学平台的理论基础以及相关技术,并在理论的指导下对《VB程序设计》课程进行网络环境下的教学系统设计,利用ASP.NET2.0技术和VisualStudio.NET 2008作为开发环境,用Microsoft SQL Server 2000做后台数据库 构建了基于B/S模式的网络辅助教学平台并投入应用,以期弥补传统教学模式的不足,充分利用各种教学资源,调动学生的学习积极性,优化课堂教学。 文中还对开发网络辅助教学平台的必要性进行了分析和论述,对平台设计进行详细的需求分析,提出总体设计方案,对平台关键模块的实现过程进行了描述和分析,开发、整理和完善教学资源库,完成平台测试和应用工作,并通过实践应用对网络辅助教学平台进行分析、评价和反思 以验证所构建的平台在教学中的实际效果,从而证明所构建的基于B/S模式的网络辅助教学平台的实用性,最终实现为学校教学和自治区精品课程提供一套切实可行的网络教学平台,具有一定的现实意义和实践意义。
VB定时关机代码
  VB定时关机代码 简单的VB定时 关机 记时开始的时候可以发出声音 新建一个窗体FROM1 和一个 按钮 Command1 添加 一个 Timer1 控件 和 Label1
VB判断输入的数据是否符合要求
VB判断输入的数据是否符合要求,很常见的表单程序,当需要输入多种类型的时候,我们总是要给程序添加判断,以确定用户的输入是...
日历(用vb做的简单日历)
功能介绍: 双击某日会弹出一个以这一日命名的笔记本作为日志的记录,单击“古城”则退出。 还有很多功能可以添加,例如翻页等。 这些给你们自己发挥想象力慢慢去添加吧。 有兴趣可以去我博客留言。http://ccp330.blog.163.com
Python网络数据采集
本书采用简洁强大的Python语言,介绍了网络数据采集,并为采集新式网络中的各种数据类型提供了全面的指导。第1部分重点介绍网络数据采集的基本原理:如何用Python从网络服务器请求信息,如何对服务器的响应进行基本处理,以及如何以自动化手段与网站进行交互。第二部分介绍如何用网络爬虫测试网站,自动化处理,以及如何通过更多的方式接入网络。
百度语音识别api调用 python
最近在处理语音检索相关的事。 其中用到语音识别,调用的是讯飞与百度的api,前者使用js是实现,后者用python3实现(因为自己使用python)环境:python3.5 centos 7流程整个百度语音识别rest api 使用分为三部分: 1 (申请操作)创建应用,获取应用的 API Key 以及 Secret Key。 2 (程序实现)通过已知的 应用的 API Key 以及 Se
应用VB语言程序生成十个随机数
1.在窗体的适当位置创建一个commandbutton,并在其属性窗口中将caption改为“生成数”。 2.在窗体中双击“生成数”,并在弹出的对话框中输入如下代码: Private Sub Command1_Click() Cls Dim n As Integer Dim wzs(10) As Integer n = 1 While n wzs(n) = Int(Rnd * 1
在VB中利用API进行串口通信
一般来说,在VB中编写串口通讯程序,首先考虑到是使用MSComm控件,可是该控件不能设置超时,而且对许多内部的参数进行了隐藏,从而不能满足有些具体的工作。而使用API进行串口通信,大多是使用VC,很少见到完整的VB代码,为此,我编写了这个模块。    同时,由于串口通信是基于字节流的,为方便程序设计,我还编写了三个简单的辅助函数,并写了一个详细的测试代码。    如果读者有好的建议
考试系统--选择题(VB6.0代码编写)
考试系统--选择题(VB6.0代码编写) 考试系统--选择题 QQ223857666勾月
计算机图形学实现多边形裁剪
#include <graphics.h>, line(left,top,right,top); line(left,bottom,right,bottom); line(left,top,left,bottom); line(right,top,right,bottom); //绘制边框和裁剪图形
给初学者:VB如何操作WEB页的浏览提交———一:在百度中自动搜索
         最近写了点东西,关于网页的自动提交等问题,不会写就上网找,发现代码比较乱,没有什么条理,虽然自己的程序写完了,但是不敢独享,斗胆班门弄斧一下,高手莫xiào !闲话少说,来点正经的,首先简单叙述一下网页上常见的我们用到的东东。        首先就是一些控件,我们要填写的东西,选择的选项,下拉列表等等。一、获取网页源代码:一般用右键查看即可,当然也有些不行的,另类方法有很
[VB.NET]请问,在Button_Click里,弹出新窗口的代码怎么样写
<!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--><script type="text/javascript"
VB6实现界面与功能代码分离
在网页看到过纯理论的文章,在摸索了N久之后,终于用VB6实现。 1、找一个olelib.tlb的文件,网上有下。2、新建VB工程,加入webbrowser控件,引用上面的文件。3、FORM1上加上WebBrowser1。切换至代码。4、窗体代码(PS:代码我一律不解释。)Option ExplicitImplements IDocHostUIHandlerDim msh
老外的一个为VB.NET和VB提供WIN32 API在线查询和用法的站,给VB.NET的朋友推荐下
老外的一个为VB.NET和VB提供WIN32 API在线查询和用法的站,给VB.NET的朋友推荐下 以前用VB做开发的时候有个VB WIN32API手册(window api函数手册),CHM格式的,查起来挺方便的,基本上把每个API的分类都归类好了,查的时候可以从分类找到对应的API函数,也可以通过快速检索,输入前几个API函数字母就能查到,对开发WINDOWS平台下的程序,查询起来还挺方便的,能提高开发效率 现在改用VB.NET开发的时候,虽然.NET框架提供了很强的接口,但有些东西还得需要用原始的Wi
百度翻译新版API的VB实现代码
Public Const BAIDU_APP_ID = "XXXXXXXXXXXXXXXXXXXXX" '在百度申请后得到 Public Const BAIDU_APP_KEY = "XXXXXXXXXXXXXXXXXXXXXX" '在百度申请后得到 Public Type MD5_CTX dwNUMa As Long dwNUMb As Long
利用vb编程科学计算器的代码
利用vb编程科学计算器的代码,需要用的就取走,欢迎光临~!
EXCEL VB简单使用
Excel启用vb编辑,要在选项中自定义功能区把开发工具加上。 上次简单使用vb处理一些excel数据,现学了一下。把代码存着,以后备用。' 定义按钮点击事件 Private Sub CommandButton1_Click() ' 选择当前工作簿1 Worksheets(1).Select ' 如果处理多数据时,就false掉excel的实时更新 Applicat
VB如何用API录音
想做个IP电话,需要从声卡录音,程序一边录音一边将数据交给以送模块发送出去。rn找了几个录音的控件,但它们都是录音后写硬盘,再从硬盘中读出声音数据的,太慢。rn哪位老大知道如何在VB是用API录音。rn技术需求:不写盘,一边录,一边将数据移交给其他的功能模块。rn网上有类似的源码,但看不懂。rnrn ----------------------------------------------- rn 我编了三年程序 只用过VB rn 我用了三年VB 只会WINSOCK和加密rn http://www.offca.com/gps/iphonebbs/rn **********中国网络程序开发联盟欢迎你**********rn -----------------------------------------------rn
VB编程:代码实现窗体居中显示-59
Private Sub Form_Load()     Me.Move (Screen.Width - Me.Width) / 2, (Screen.Height - Me.Height) / 2 End Sub 可以在属性中设置,不过可以把这个保存到模板里,就不用每次设置了。 ...
VB精确延时API
'延时 Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Load() '延时1秒=1000毫秒 sleep(1000) End Sub
vb编写的简单学生成绩查询系统
vb编写的简单学生成绩查询系统 Sub pingbi3() Form10.Command4.Visible = False End Sub Sub pingbi1() Form2.修改.Visible = False Form2.添加.Visible = False Form2.删除.Visible = False End Sub Sub pingbi2() Form10.Command2.Visible = False End Sub Private Sub 管理员_Click() Unload Me Form9.Show pingbi3 End Sub Private Sub 取消_Click() End End Sub Private Sub 退出_Click() End End Sub Private Sub 学生_Click() Unload Me Form10.Visible = True pingbi1 pingbi2 Form10.Command4.Visible = True End Sub
用VB放烟花 源代码
用VB放烟花 源代码
VB中三种排序方法
用冒泡法,选择法,比较法三种方法对一组数进行排序。
【零一】如何用代码爬抓电商数据(附淘宝API调用实例)
http://bbs.paidai.com/topic/218843
如何用VB编写OPC客户端程序
如何用VB编写OPC客户端程序,很全,很好用。
【转】用VB操作Excel详解
用VB操作Excel详解 一、 VB读写EXCEL表: VB本身提自动化功能可以读写EXCEL表,其方法如下: 1、在工程中引用MicrosoftExcel 类型库: 从"工程"菜单中选择"引用"栏;选择Microsoft Excel 9.0 Object Library
VB6使用API实现串口通信
    需要和客户的产品通讯,但波特率是非常规的,MScomm无法实现,原有的软件框架和条件又不能转用VC开发底层,于是用VB6调用API实现了这个通讯功能,虽然在VB6下这个程序还是单进程的,但实现了异步非阻塞的通信,性能相当稳定,下面是测试程序代码 Private Sub cmdSend_Click()Sub cmdSend_Click()    定义文件读写属性结构    Di
VB6下接口的实现
一、接口的实现1、创建一ActiveX Dll Project,命名为ICom2、添加一类(接口),命名为IDog,设置一下属性和方法:Public Property Get Name() As StringEnd PropertyPublic Property Let Name(ByVal vNewValue As String)End PropertyPubli
如何用VB实现?
在VFP中的代码:rnSELE 1rnUSE DATABASE\DB1rnCOPY to tmprnrnSELE 2rnUSE DATABASE\DB2rnZAPrnAPPE from tmprnGo toprn其中:DB1和DB2都是库里已存在的表。rnrn请问tmp一定是已经存在的表吗??rn请问如何将这段代码用VB 实现??
精彩编程与编程技巧-如何用VB建立快捷方式...
精彩编程与编程技巧-如何用VB建立快捷方式 ...
VBwinsock简单连接TCP
VB如何用WINSOCK连接TCP原码,简单的原程序
vb.net 调用DLL
vb.net 调用DLL 描述如何用vb调用DLL
delphi如何用socket实现远程文件的传递
delphi如何用socket实现远程文件的传递,delphi如何用socket实现远程文件的传递
精彩编程与编程技巧-如何用VB在桌面建立快捷方式...
精彩编程与编程技巧-如何用VB在桌面建立快捷方式 ...
在VB编程中,如何实现加入声音
添加一个WindowsMediaPlayer控件放到窗体里,然后写代码: Private Sub Command1_Click() WindowsMediaPlayer1.URL = "123.mp3" '这句代码的意思是播放程序所在文件夹中的123.mp3 'URL后面添地址,可以是网址 第一种Private Sub Form_Load()  Set a = CreateObje
C#中如何使用VB中的debug.print
System.Diagnostics.Debug.Write(j + "/n"); 结果显示在[即时窗口]
如何用vb创建一个不能删除,重命名,移动的文件夹?
如何用vb创建一个不能删除,重命名,移动的文件夹?
编程小技巧 --用VB解决时间同步的问题
现在,许多C/S型的应用程序都要求客户机与服务器时间同步,大多数程序员用存储过程来解决这一问题,但存储过程编写起来有一定的难度。我在摸索中找到了一种方法,可以很好的解决这个问题。Windows XP/2000中有一个命令:nettime。这个命令是用来读取服务器的时间,将客户机的系统时间设置为服务器的时间。以后当我们需要调用服务器时间的时候,可以直接读取本地时间,而读取本地时间对我们来说是很容易的...
VB动态添加执行代码完整版(一)
VB6动态添加代码的教程演示以及下载地址,为那些喜欢用脚本拓展程序功能的新手而写,其他人士也可以看看. 源码可以在我的CSDN下载中心下载: 最新更新: http://download.csdn.net/source/2619000 最旧文件: http://download.csdn.net/source/2617537
vb编写的word 2007及以上文档转换成2003文档
利用vb编写的word2007文档与word2003文档之间的转换程序 主要是学习如何用vb连接word,如何用vb保word文档。 还有就是vb皮肤设置的问题,里面有一个vb皮肤。 有兴趣的人可以看看。
企业员工资料管理系统(vb源码)
企业员工资料管理系统(vb源码)
如何用VB建立数据库
最佳答案Visual Basic作为应用程序的开发“利器”也表现在数据库应用程序的开发上,它良好的界面和强大的控件功能使数据库编程变得简单多了。但即便如此,数据库应用程序的开发仍然算得上是VB编程中的难点,这是因为你不仅要熟悉VB中关于数据库编程方面的知识(当然这是十分简单的)还要了解数据库的知识。所以我们先介绍一下数据库的基本知识,算是学习数据库编程前的热身运动吧! 一、热身运动 首
VB接口的使用方法
【接口定义】接口就是指只包含虚成员的虚类。 (1)虚类,表明了接口是不能够被直接实例化的。也就是说,接口只是一个抽象概念。比如我们说车可以跑,人可以跑,马可以跑。我们可以看到实例化的车、人、马。但是我们可以定义一个“会跑的物质”。它可以是车,也可以使人、马,但是我们却不能说“这个东西就是一个会跑得物质,但是它并不是车、人或者马。” (2)只包含虚成员,表明了接口只是说明了它具有什么样的功能,可
精彩编程与编程技巧-如何用API播放CD...
精彩编程与编程技巧-如何用API播放CD ...
VB中九九乘法表的实现
VB打印九九乘法表。
VB 制作仪表盘
Private Sub Timer1_Timer() Const pi = 3.14 Const r = 1400 '表盘半径r Dim i As Long Dim pich As Long '高 Dim picw As Long '宽 Dim a As Single '刻度变量a Dim b As Single '指针变量b Pic
用VB设计“投票评选”程序的简单方法
简介:正逢2005年年末,国内各媒体都掀起了“2005年度XXXX投票评选”的热潮,就拿CCTV央视来说,各种命题的“投票评选”活动就不下十多项;对这样题目在编程中如何实现呢?我想主要从三个方面入手;第一,解决好参加评比候选人数据装入;第二,采集好投票人有效点击次数的相关信息;第三,确保参加评比候选人获票数与投票人的投出票数的一致性。掌握好这三点后,其它问题就会迎刃而解。使用Delphi、PB、V
VB 获取一个文件的创建、修改、访问时间
在VB中获取一个文件的创建、修改、访问时间代码。
【Tesseract-OCR】在VS2010环境下调用API方法—简单快速之总结
做字符识别,不能不了解google的Tesseract-OCR,但是如何在自己的工程中使用其API倒是语焉不详,官网上倒是很详尽地也很啰嗦地介绍如何重新编译生成适合自己平台的lib和dll,经过近些天的不断搜索和尝试,可算是找了些门路。尤其感谢以下作者的分享带给我的帮助和启发: cxf7394373的 字符识别Google开源Tesseract-ocr的DLL调用方法 夏梦c的Te
用VB实现循环队列算法收藏
    在日常代码编制时,许多人会忽略一些最基本的算法,导致代码冗余,思路不清楚。我曾经至少两次在CSDN里遇到这类问题:我想在页面的右边显示一个列表,列表长度为20,新加入一个用户后,显示在列表开头,再加入的用户,显示在这个用户的下边,当用户数量超过20后,挤掉最前面的那一位,第二位加入的用户成了第一位,依次循环,保证列表最多显示20位用户。当然,实际问题可能与此有些出入,比如Coder是想显示
VB如何使用计时器?
李国帅 取自日志,可能是转载的 20050912在vb.net中例子1Option Strict Off Option Explicit On Friend Class frmAnimateLabel Inherits System.Windows.Forms.Form 'and in the form............ Private Sub frmAnimateL
如何用VB来实现以下代码
下面的代码来自dreammaster(天涯),请问用相应VB如何写?如果判断的不是性别,而是一个日期字段(格式为yyyy-mm-dd),当该日期距现在的日期超过N天,要对该日期字段进行变色处理,又该如何进行处理?rnrn<%@ Register TagPrefix="iewc" Namespace="Microsoft.Web.UI.WebControls" Assembly="Microsoft.Web.UI.WebControls, Version=1.0.2.116, Culture=neutral, PublicKeyToken=31bf3856ad364e35" %>rnrn<%@ Page language="c#" Codebehind="CheckTest.aspx.cs" AutoEventWireup="true" Inherits="Learn.CheckTest" %>rnrnrnrnrnrn rnrn CheckTestrnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn rnrn <%# DataBinder.Eval(Container.DataItem,"Sex") %> rnrn rnrn rnrn rnrn rnrn rnrn rnrnrn
关闭
关闭