内容提要摘要： The software of visual basic developed by Microsoft corporation is becoming one of the main develop tools at today。 As it's remarkable peculiarity, the Grid control has very great practical and active use。 This topic discusses how to use the grid control of VB to develop pratical software and how to use it conveniently and simply。 微软公司的面对对象的程序开发软件VB(Visual Basic)日益成为当前所流行的主流开发工具。作为其显著的特色之一，VB所提供的网格类控件，在实际的数据库管理系统的开发过程中具有很大的实用性和灵活性。本文旨在讨论在使用VB的实际开发过程中，如何有选择的使用VB所提供的网格类控件以及如何方便、简洁的去使用。
汇摘要： Component-Based Development Virtual Data Management Spread's Calc Engine 构件开发 虚拟数据管理 计算引擎
随着基于构件开发(Component-Based Development)技术的发展，供开发者使用的软件构件越来越多，单就VB中可使用的网格类控件也有许多种。网格类控件常用在数据库管理系统的开发中，用来直观地显示表或视图的二维关系，在对数据的操作上，有些控件也提供了很多 ......
Visual Basic有着强大的数据库存取能力，不仅能够直接支持Ms Access数据库，而且通过其内部安装的ISAM驱动程序使它能间接支持FoxPro、dBASE等外来数据库。本文不仅从VB数据库体系结构的角度探索了VB对这些外来数据库的支持，还结合了一些实例具体阐述了使用数据库存取对象变量的方法实现这些外来数据库的新建、库结构修改、显示及其运行环境设置。
Visual Basic Access, 外来数据库,数据库
正文
存取对象变量库结构作为一个功能较完备的Windows软件开发平台，Visual Basic专业版提供了对数据库应用的强大支持。尤其提供了使用数据控件和绑定控制项，使用数据库存取对象变量（Data Access Object Variable），直接调用ODBC 2.0 API接口函数等三种访问数据库的方法。对其标准内置的Ms Access数据库，它可以提供不弱于专业数据库软件的支持，可以进行完整的数据库维护、操作及其事务处理。在VB中，将非Access数据库称为外来数据库。对于FoxPro、dBASE、Paradox等外来数据库。虽然借助VB的Data Manager 能够对这些数据库进行NEW、OPEN、DESIGN、DELETE等操作，但在应用程序的运行状态中并不能从底层真正实现这些功能。本文从使用数据库存取对象变量的方法出发，实现了非Access� ......
Visual Basic有着强大的数据库存取能力，不仅能够直接支持Ms Access数据库，而且通过其内部安装的ISAM驱动程序使它能间接支持FoxPro、dBASE等外来数据库。本文不仅从VB数据库体系结构的角度探索了VB对这些外来数据库的支持，还结合了一些实例具体阐述了使用数据库存取对象变量的方法实现这些外来数据库的新建、库结构修改、显示及其运行环境设置。
Visual Basic Access, 外来数据库,数据库
正文
存取对象变量库结构作为一个功能较完备的Windows软件开发平台，Visual Basic专业版提供了对数据库应用的强大支持。尤其提供了使用数据控件和绑定控制项，使用数据库存取对象变量（Data Access Object Variable），直接调用ODBC 2.0 API接口函数等三种访问数据库的方法。对其标准内置的Ms Access数据库，它可以提供不弱于专业数据库软件的支持，可以进行完整的数据库维护、操作及其事务处理。在VB中，将非Access数据库称为外来数据库。对于FoxPro、dBASE、Paradox等外来数据库。虽然借助VB的Data Manager 能够对这些数据库进行NEW、OPEN、DESIGN、DELETE等操作，但在应用程序的运行状态中并不能从底层真正实现这些功能。本文从使用数据库存取对象变量的方法出发，实现了非Access� ......
Dim ReturnValue, I
ReturnValue = Shell("Calc.EXE", 1) ' 运行计算器。
AppActivate ReturnValue ' 激活计算器。
For I = 1 To 100 ' 设置计数循环。
SendKeys I & "{+}", True ' 按下按键给计算器
Next I ' 将所有 I 值相加。
SendKeys "=", True ' 取得总合。
SendKeys "%{F4}", True ' 按 ALT+F4 关闭计算器 http://zhidao.baidu.com/question/33428479.html
窗体代码：
前提你得得到你游戏的句柄 hwnd = &H307F8 '把个307f8改为你游戏的句柄就可以了 Spy.exe这个软件可以抓句柄
Private Sub Form_Load()
Dim hwnd As Long
hwnd = &H307F8 'XXXXX表示记事本编辑框的句柄
PostMessage hwnd, WM_KEYDOWN, VK_A, MakeKeyLparam(VK_A, WM_KEYDOWN) '按下A键
PostMessage hwnd, WM_CHAR, Asc("A"), MakeKeyLparam(VK_A, WM_KEYDOWN) '输入字符A
PostMessage hwnd, WM_UP, VK_A, MakeKeyLparam(VK_A, WM_UP) '释放A键
End Sub
模块代码：
Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ......
把鼠标移到屏幕指定位置 如（111.111） 单击一下
再移到屏幕另一指定位置指定位置 如（222.222）单击一下
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Private Sub Command1_Click()
Timer1.Enabled = True
Timer2.Enabled = True
End Sub
Private Sub Form_Load()
Timer1.Interval = 1000
Timer2.Interval = 1000
Timer1.Enabled = False
Timer2.Enabled = False
End Sub
Private Sub Timer1_Timer()
Call SetCursorPos(111, 111) '让鼠标移动到(111,111)
mouse_event MOUSEEVENTF_ABSOLUTE Or MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub
Private Sub Timer2_Timer()
Call SetCursorPos(2222, 2222) '让鼠标移动到(2222,2222)
mouse_event MOUSEEVENTF_ABSOLUTE Or MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVEN ......
十天学会ASP.net之实战系列（C#和Vb.net双版本）
第一天
我认为ASP.NET比ASP难很多，希望大家做好准备。难难在实现同一个效果有很多方法，大家或许会疑惑。十天学会系列教程会清晰的写出各种方法，让大家能少一点坎坷。在ASP里面，大家几乎都是使用VB，数据库嘛，也无非是SQL和ACCESS。在ASP.NET里面，数据库还是这两个但是常用的语言多了一个C#，也是微软推荐的语言，为.NET平台定制的语言。这样ASP.NET就有四种组合：VB+ACCESS，VB+SQL，C#+ACCESS，C#+SQL，本教程会使用C#+ACCESS，兼顾四种来写，让大家对ASP.NET有一个全面的认识。虽然说学习ASP.NET不需要任何ASP基础，但是我觉得如果大家ASP不会，还是先看一下【十天学会ASP教程】，大家所需要了解的不是ASP的程序怎么写，而是怎么构建服务器，怎么使用HTML表单，同时对SQL语句有一个基础和理解，因为在本文里我不会将将一些基础的东西。
废话不多说，开始我们第一天的学习：
学习目的：调试出安装环境
我要申明一点，操作系统就用2000，如果说要学习一个网络语言还不肯多装一个操作系统的话，那我看也不要学习了。
先到网上下载一个MDAC(要是2.7以上的版本才行)，然后安装， ......
十天学会ASP.net之实战系列（C#和Vb.net双版本）
第一天
我认为ASP.NET比ASP难很多，希望大家做好准备。难难在实现同一个效果有很多方法，大家或许会疑惑。十天学会系列教程会清晰的写出各种方法，让大家能少一点坎坷。在ASP里面，大家几乎都是使用VB，数据库嘛，也无非是SQL和ACCESS。在ASP.NET里面，数据库还是这两个但是常用的语言多了一个C#，也是微软推荐的语言，为.NET平台定制的语言。这样ASP.NET就有四种组合：VB+ACCESS，VB+SQL，C#+ACCESS，C#+SQL，本教程会使用C#+ACCESS，兼顾四种来写，让大家对ASP.NET有一个全面的认识。虽然说学习ASP.NET不需要任何ASP基础，但是我觉得如果大家ASP不会，还是先看一下【十天学会ASP教程】，大家所需要了解的不是ASP的程序怎么写，而是怎么构建服务器，怎么使用HTML表单，同时对SQL语句有一个基础和理解，因为在本文里我不会将将一些基础的东西。
废话不多说，开始我们第一天的学习：
学习目的：调试出安装环境
我要申明一点，操作系统就用2000，如果说要学习一个网络语言还不肯多装一个操作系统的话，那我看也不要学习了。
先到网上下载一个MDAC(要是2.7以上的版本才行)，然后安装， ......
十天学会ASP.net之实战系列（C#和Vb.net双版本）
第一天
我认为ASP.NET比ASP难很多，希望大家做好准备。难难在实现同一个效果有很多方法，大家或许会疑惑。十天学会系列教程会清晰的写出各种方法，让大家能少一点坎坷。在ASP里面，大家几乎都是使用VB，数据库嘛，也无非是SQL和ACCESS。在ASP.NET里面，数据库还是这两个但是常用的语言多了一个C#，也是微软推荐的语言，为.NET平台定制的语言。这样ASP.NET就有四种组合：VB+ACCESS，VB+SQL，C#+ACCESS，C#+SQL，本教程会使用C#+ACCESS，兼顾四种来写，让大家对ASP.NET有一个全面的认识。虽然说学习ASP.NET不需要任何ASP基础，但是我觉得如果大家ASP不会，还是先看一下【十天学会ASP教程】，大家所需要了解的不是ASP的程序怎么写，而是怎么构建服务器，怎么使用HTML表单，同时对SQL语句有一个基础和理解，因为在本文里我不会将将一些基础的东西。
废话不多说，开始我们第一天的学习：
学习目的：调试出安装环境
我要申明一点，操作系统就用2000，如果说要学习一个网络语言还不肯多装一个操作系统的话，那我看也不要学习了。
先到网上下载一个MDAC(要是2.7以上的版本才行)，然后安装， ......
今天在做VB项目的时候，使用了ListBox控件来获取一些列表项，用了才发现没有ListView好用，ListView有Items（SelectItem）可以定位到当前的选中项，而ListBox没有；ListView有Tag可以设定选中项的标示，ListBox没有。上网也找不到原因，知道去阅读MSDN和自己测试。
之后终于找到了问题的关键。
事件1：添加ListBox项和对应项的标识
Dim List1 As new ListBox
List1.addItem , , 星期一
List1.ItemData(List1.newIndex) = "1"
List1.addItem , , 星期二
List1.ItemData(List1.newIndex) = "2"
List1.addItem , , 星期三
List1.ItemData(List1.newIndex) = "3"
List1.addItem , , 星期四
List1.ItemData(List1.newIndex) = "4"
Private Sub List1_Click()
If List1.ListIndex = -1 Then
Exit Sub '没有选中任何项，退出方法
End If
Debug.Print List1.ItemData(List1.ListIndex) '打印选中的List1的标识。。可能是"1" "2" " ......
最新文章 : vb