VB控件教程大全
VB控件教程大全
一、Datagrid控件
DataGrid1.Columns.Remove(0)'删除0号字段
DataGrid1.Columns.Add(0).Caption=”姓名”'标签头
DataGrod1.Columns(0).DataField=”Name”'对应的字段
Adodc1.Refresh
设定DataGrid格式的有用的属性：
BackColor—设定背景颜色。
Font—设定DataGrid的字体信息。字体信息包括使用何种字体、字号，是否粗体，斜体等。
CellPadding—设定HTML表格中单元格内的边距。
CellSpacing—设定HTML表格中单元格之间的间距。
Width—设定HTML表格的宽度(可以以像素、百分比等为单位)
HorizontalAlign—设定表格在页面上的对齐方式(左对齐、右对齐、居中、未设定)
一个使用上述属性而使得表格变得漂亮的例子如下所示。请注意DataGrid的Font属性是一个对象，它
指向了FontInfo类，FontInfo类包括Size,Name,Bold,Italic等属性。为了设定Font对象所指向类的属性，
必须通过连字符(-)完成。这类似于https://www.wendangku.net/doc/164891733.html,和C#语言中表示对象属性的点(.)。
1、使用DataGrid控件
DataGrid控件是一种类似于电子数据表的绑定控件，可以显示一系列行和列来表示Recordset对象的记录和字段。可以使用DataGrid来创建一个允许最终用户阅读和写入到绝大多数数据库的应用程序。
DataGrid控件可以在设计时快速进行配置，只需少量代码或无需代码。当在设计时设置了DataGrid控件的
DataSource属性后，就会用数据源的记录集来自动填充该控件，以及自动设置该控件的列标头。然后您就
可以编辑该网格的列；删除、重新安排、添加列标头、或者调整任意一列的宽度。
在运行时，可以在程序中切换DataSource来察看不同的表，或者可以修改当前数据库的查询，以返回一个不同的记录集合。
注意DataGrid控件与Visual Basic5.0中的DBGrid是代码兼容的，除了一个例外：DataGrid控件不支持DBGrid的“解除绑定模式”概念。DBGrid控件包括在Visual Basic的Tools目录中。
2、可能的用法
查看和编辑在远程或本地数据库中的数据。
与另一个数据绑定的控件（诸如DataList控件）联合使用，使用DataGrid控件来显示一个表的记录，
这个表通过一个公共字段链接到由第二个数据绑定控件所显示的表。
使用DataGrid控件的设计时特性
可以不编写任何代码，只通过使用DataGrid控件的设计时特性来创建一个数据库应用程序。下面的说
明概要地说明了在实现DataGrid控件的典型应用时的一般步骤。完整的循序渐进的指示，请参阅主题“DataGrid方案1:使用DataGrid控件创建一个简单数据库应用程序”。
要在设计时实现一个DataGrid控件
1.为要访问的数据库创建一个Microsoft数据链接(.MDL)文件。请参阅“创建
Northwind OLE DB
数据链接”主题，以获得一个示例。
2.在窗体上放置一个ADO Data控件，并将其ConnectionString属性设置为在第1
步中所创建的
OLE DB数据源。
3.在这个Ado Data控件的RecordSource属性中输入一条将返回一个记
录集的SQL语句。例如，Select*From MyTableName Where CustID=12
4.在窗体上放置一个DataGrid控件，并将其DataSource属性设置为这个
ADO Data控件。
5.右键单击该DataGrid控件，然后单击“检索字段”。
6.右键单击该DataGrid控件，然后单击“编辑”。
7.重新设置该网格的大小、删除或添加网格的列。
8.右键单击该DataGrid控件，然后单击“属性”。
9.使用“属性页”对话框来设置该控件的适当的属性，将该网格配置为所需的外观和行为。
在运行时更改显示的数据
在创建了一个使用设计时特性的网格后，也可以在运行时动态地更改该网格的数据源。下面介绍实现这一功能的通常方法。
3、更改DataSource的RecordSource
更改所显示的数据的最通常方法是改变该DataSource的查询。例如，如果DataGrid控件使用一个ADO
Data控件作为其DataSource，则重写RecordSource和刷新该ADO Data控件都将改变所显示的数据。
''ADO Data控件连接的是Northwind数据库的'Products表。新查询查找所有
'SupplierID=12的记录。
Dim strQuery As String
strQuery="SELECT*FROM Suppliers WHERE SupplierID=12"
Adodc1.RecordSource=strQuery
Adodc1.Refresh
4、更改DataSource
在运行时，可以将DataSource属性重新设置为一个不同的数据源。例如，您可能具有若干个ADO Data
控件，每个控件连接不同的数据库，或设置为不同的RecordSource属性。可以简单地将DataSource从一个ADO Data控件重新设置为另一个ADO Data控件：
''将DataSource重新设置为一个连接到Pubs数据库的、
''使用Authors表的ADO Data控件。
Set DataGrid1.DataSource=adoPubsAuthors
5、重新绑定DataSource
当将DataGrid控件用于一个远程数据库，诸如SQLServer时，可以改变表的结构。例如，可以给这
个表添加一个字段。在这种情形下，可以调用Rebind方法根据新的结构来重新创建该网格。注意，如果已
经在设计时改变了这个列的布局，DataGrid控件将会试图重新创建当前的布局，包括任何空的列。不过，
通过首先调用ClearFields方法，可以强制该网格重新设置所有的列。
从DataGrid返回值
在DataGrid被连接到一个数据库后，可能想要监视用户单击了哪一个单元。可以使用RowColChange 事件——而不是Click事件。如下所示：
Private Sub DataGrid1_RowColChange(LastRow As Variant,ByVal LastCol As Integer)
''显示用户所单击的单元的文字、行和列的信息。
Debug.Print DataGrid1.Text;DataGrid1.Row;DataGrid1.Col
End Sub
6、使用CellText和CellValue方法
当一个列使用NumberFormat属性设置格式后，CellText和CellValue属性是很有用的。NumberFormat
属性不必更改实际的数据格式就可以更改任何包含数字的列的格式。例如，给定一个网格，其中包含一个名为ProductID的、包含整数的列。下面的代码将使DataGrid以"P-0000"的格式来显示数据。换句话说，
尽管在ProductID字段中所包含的实际数值为"3"，但该网格所显示的值将是"P-0003"。
Private Sub Form_Load()
DataGrid1.Columns("ProductID").NumberFormat="P-0000"
End Sub
要返回数据库中所包含的实际值，应使用CellValue方法，如下所示：
Private Sub DataGrid1_RowColChange(LastRow As Variant,ByVal LastCol As Integer)
Debug.Print_
DataGrid1.Columns("ProductID").CellValue(DataGrid1.Bookmark)
End Sub
注意上面所用的CellValue和下面所用的CellText值，都需要将Bookmark属性作为一个参数，功能才正确。
相反地，如果要返回该字段的格式化的值，应使用CellText方法：
Private Sub DataGrid1_RowColChange(LastRow As Variant,ByVal LastCol As Integer) Debug.Print_
DataGrid1.Columns("ProductID").CellText(DataGrid1.Bookmark)
End Sub
注意上面的CellText方法等价于使用DataGrid控件的Text属性。
添加、删除或隐藏列
通过使用Columns集合和Column对象的属性和方法，可以在程序中添加、删除或隐藏列。
添加和删除一列
要在运行时添加一列，可以使用Add方法。如果首先声明一个变量，并将新对象赋给该变量，就可以用简明的代码设置各种属性。
Private Sub AddColumn()
'在最右边的位置添加一列。然后设置其Visible、Width、
'Caption以及Alignment属性。DataField属性则指定
'该列将绑定到哪一个字段。
Dim c As Column
Set c=DataGrid1.Columns.Add(DataGrid1.Columns.Count)
With c
.Visible=True
.Width=1000
.Caption="我的新列"
.DataField=Adodc1.Recordset.Fields("ProductName").Name
.Alignment=dbgRight
End With
End Sub
可以使用方法来删除任意一列。请确保使用ColIndex参数来指定要删除的列。下面的代码将删除被单击的列。
Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)
DataGrid1.Columns.Remove ColIndex
End Sub
隐藏一列
通过将Visible属性设置为False，可以隐藏任意一列。当想要限制用户可以查看或编辑的列时这一功能特别有用。下面的示例在Columns集合中循环，隐藏除少数列之外的所有列。
Private Sub HideColumns()
'使用DataField属性来判别正在测试的是哪一列。
'只显示三列：ProductName、UnitPrice以及
'UnitsInStock。
Dim c As Column
For Each c In DataGrid1.Columns
Select Case c.DataField
Case"ProductName"
c.Visible=True
Case"UnitPrice"
c.Visible=True
Case"UnitsInStock"
c.Visible=True
c.Caption="In Stock"'更改这个列的标头。
Case Else'隐藏其它所有的列。
c.Visible=False
End Select
Next c
End Sub
操作DataGrid视图
一个“拆分”的网格使最终用户对相同的数据可以拥有多个视图。例如，假设有一个由十个字
段组成的大表。在这种情况下，在控件中察看的记录集将有十列宽，除非窗体非常宽，否则用户将
无法同时看见所有列的内容。，而且，假设用户只对第一列和最后一列感兴趣（例如，第一列是名
字，最后一列是电话号码）。为了能同时看到在两端的列（不重新安排列的顺序），可以对网格进
行拆分。
创建一个Split对象
在设计时，可以创建一个拆分，具体步骤是：右键单击网格，单击“编辑”，再单击右键，然
后单击“拆分”。通过右键单击该控件，并单击“属性”来显示“属性页”对话框，可以编辑这个
拆分。可以使用“拆分”选项卡来自定义拆分。要删除一个拆分，右键单击该拆分，并单击“删除”。
在运行时，最终用户也可以通过单击位于这个网格控件的左下边的右边的选项卡，以手工方式
来拆分该网格（除非不允许这个操作），如下图所示：
默认情况下，DataGrid控件包含一个Split对象。防止最终用户添加拆分的代码为：
DataGrid1.Splits(0).AllowSizing=False
在程序中添加和删除拆分
DataGrid控件包含一个Split对象的集合。要在程序中添加拆分，可以使用Add方法，如
下所示：
DataGrid1.Splits.Add1
注意Add方法需要新的拆分索引作为其参数。要添加一个拆分，应将这个索引参数设置为
Splits集合的Count属性值。
使用Split集合的Add方法，可以在程序中按照实际需要添加拆分。由于添加多于两个以上的拆分将使网格很难使用，可以使用该集合的Count属性来限制拆分的数目。
If DataGrid1.Splits.Count<3Then'添加一个拆分。
DataGrid1.Splits.Add DataGrid1.Splits.Count
End If
使拆分同步
当拆分多于一个时，可能希望控制这些拆分如何滚动。例如，在一个具有三个拆分的网格中，可以决定只让第一个和第三个拆分同步，而让中间的拆分独立地滚动。要同步任何两个（或多个）
拆分，只需将每个Split对象的ScrollGroup属性设置为同一个值。
'使第一个和第三个Split对象同步。
With DataGrid1
.Splits(0)
.ScrollGroup=1
.Splits(1).ScrollGroup=2
.Splits(2).ScrollGroup=1
End With
通过设置Scrollbars属性，使同步的拆分组只显示一个滚卷条，从而进一步自定义拆分的外观。
控制Tab键和箭头键的行为
使用WrapCellPointer、TabAcrossSplits以及TabAction属性，可以决定当最终用户按下tab键或箭头键时网格的行为。
在这三个属性中，TabAction属性级别最高，它决定WrapCellPointer和TabAcrossSplits
这两个属性是否能生效。TabAction有三个设置值：ControlNavigation、Column Navigation和
Grid Navigation。当该属性设置为ControlNavigation时，按Tab键根据TabIndex将焦点切换到下一个控件。这一设置优先于WrapCellPointer和TabAcrossSplits。
WrapCellPointer属性决定在任何单个的拆分中tab键和箭头键的行为。如果该属性设置为
True，且当前单元位于最后一列，这时最终用户按tab键则使第一列的下一行变成当前的单元。不过，如果当前单元位于最后一行的最后一列时，这时就没有地方可以“换行”。
TabAcrossSplits属性决定当网格中存在两个或多个拆分时tab和箭头键的行为。如果该属性设置为True，且当前单元位于任何一个拆分的最后一列，则按Tab或箭头键将使当前单元“跳”
到下一个拆分的第一列。当前单元仍保持相同的行位置。
注意如果WrapCellPointer和TabAcrossSplits属性都设置为True，则只有当前单元位于最后一个拆分的最后一列时才会换行。这时当前单元将换到第一个拆分的第一列中的下一行。
自定义列集合
每一个Split对象都有一个Columns属性，允许用户来操作一个Column对象的集合。通过这样做，可以更改每个Split对象的外观。例如，可以用一个拆分包含显示姓氏字段和名字字段的两个列，而第二个拆分则显示电话字段和地址字段。要实现这一目标，需要将其它的每一列的
Visible属性设置为False，如下所示：
'枚举Columns集合，对每一个Column对象的DataField属性
'进行测试。如果测试失败，则隐藏这一列。
Dim i As Integer
'隐藏除ProductName列之外的所有列。
For i=0To DataGrid1.Splits(0).Columns.Count-1
If DataGrid1.Splits(0).Columns(i).DataField<>"ProductName"Then
DataGrid1.Splits(0).Columns(i).Visible=False
End If
Next i
'隐藏除UnitPrice列之外的所有列。
For i=0To DataGrid1.Splits(0).Columns.Count-1
If DataGrid1.Splits(1).Columns(i).DataField<>"UnitPrice"Then
DataGrid1.Splits(1).Columns(i).Visible=False
End If
Next I
使用Bookmarks和SelBookmarks跟踪记录
Bookmarks和SelBookmarks提供了标记记录的一种手段。当编写应用程序中的特定功能（诸如允许最终用户手工地选择多个不相邻的记录，进行所选记录的大批更新）时，这就很有必要。在
这些情形中，需要标记哪些记录已被选择，因此可以使用SelBookmarks集合及其属性。
有两个函数，分别是CellText和CellValue方法，需要标记才能正确执行。
标记用户的选择
SelBookmarks集合包含所有选定的记录的书签。当最终用户手工选择记录时（即在单击时按
住CTRL键），每一个选定的记录的书签都会加入到该集合中。使用标准的循环，用户可以知道已
经选定了什么，也可以保存书签（因为可能需要恢复某个值），以及执行操作：Dim i as Integer'计数器
Dim intCount As Integer
intCount=DataGrid1.SelBookmarks.Count-1
ReDim arrSelBK(intCount)'声明用于保存书签的数组。
For i=0To intCount
ArrSelBK(i)=DataGrid1.SelBookmarks(i)
'在此处执行操作。如果该操作必须被
'取消，则退出该循环，然后使用该数
'组来取消这些更改。
Next i
通过在程序中添加到SelBookmarks集合来选择记录
通过将记录添加到这个集合，也可以在程序中选定记录。例如，可能有一个显示指定的客户所有订货的网格。如果要高亮显示该客户花费超过$100的所有记录，则对记录进行过滤，并将结果
书签添加到SelBookmarks集合。
Dim rs As Recordset
Set rs=Adodc1.Recordset
While Not rs.EOF
If rs!SupplierID=12Then
DataGrid1.SelBookmarks.Add rs.Bookmark
End If
rs.MoveNext
Wend
显示计算结果字段
假设在表中有一个名为"Price"的字段，并且想使用本地税率来计算表中每一项的税费。这就是一个计算结果字段，可以通过修改DataSource的查询来计算这个值，并把这个值返回给DataGrid控件。
要在DataGrid控件中创建一个计算结果字段
1.确认在机器上已为Northwind数据库建立了一个OLE DB数据源；如果还没有创建这样的一个数据源，请按照“创建Northwind的OLE DBData连接”的步骤操作。
2.在窗体上放置一个ADO Data控件和一个DataGrid控件。
3.将ADO Data控件的ConnectionString属性设置为Northwind的数据源。
4.设置ADO Data控件的RecordSource属性。在“属性”窗口中，单击“记录源”并输入Select ProductName,UnitPrice,(UnitPrice*.082)As Tax From Products。
5.将DataGrid控件的DataSource属性设置为这个ADO Data控件。
6.运行该工程。
与类模块一起使用DataGrid控件
如果想要访问以自定义格式或以ODBC驱动程序不直接支持的格式存放的数据，可以创建一个类来封装该数据。然后可以编写该类的自定义函数来检索这些数据。这样该类就变成了一种数据源，
可以被任何数据使用者（如DataGrid控件）使用。
在这个类模块的Initialize事件中，首先通过声明一个作为New ADODB.Recordset的变量，来创建一个ADODB recordset对象。在创建了这个recordset对象后，再添加字段，每个数据源中的每个字段都要加入。然后使用合适的数据填充这个记录集。
注意也可以使用OLEDB示例提供者来创建一个数据源。关于OLEDB示例提供者的详细信息，请参阅“创建带有数据提供方的部件”。
类模块有一个GetDataMember事件，只要当数据使用者（诸如DataGrid控件）需要数据时就产生该事件。在这个事件中，Data参数被设置为在Initialize事件中所创建的recordset对象。
如果要使用这个类模块，应创建一个具有一个DataGrid控件的窗体。在该窗体的Load事件的代码中，将该控件的DataSource属性设置为这个类。
注意数据类模块在设计时是不可用的。例如，如果使用DataGrid控件，则当用户在“属性”
窗口中单击“数据源”时，所有可用的数据源都会出现在一个下拉列表中。但其中不会有这个数据类模块，它只能在代码中设置。
使用类模块创建一个数据源
下面的示例使用一个类模块来创建一个简单数据源。然后通过DataSource属性将DataGrid
控件绑定到该模块。
要创建一个用于DataGrid的类
1.创建一个新的标准Exe工程。
2.给窗体添加一个DataGrid控件。如果DataGrid控件不在“工具箱”中，则在“工程”菜
单中单击“部件”，
再单击“Microsoft DataGrid Control”，然后单击“确定”。
3.在“工程”菜单中，单击“引用”。在“引用”对话框中，单击“MicrosoftActiveX Data Objects2.0Library”。
4.在“工程”菜单中，单击“添加类模块”来给工程添加一个数据类模块。
5.在“工程资源管理器”窗口中，单击并选定“类”图标，并按F4键显示“属性”窗口。
6.在“属性”窗口中，将类的名称更改为NamesData。
7.在“属性”窗口中，单击“DataSourceBehavior”并将该属性更改为vbDataSource。
8.在该类模块的Declarations部分，创建一个ADODB Recordset变量，如下所示：
Option Explicit
Private WithEvents rsNames As ADODB.RecordSet
使用WithEvents关键词来声明该变量，使用户可以对RecordSet对象的事件编程。
9.在该类的Initialize事件中，添加下述代码：
Private Sub Class_Initialize()
'将新的数据成员的名称添加到DataMember集合
'这使其它对象可以看见这些可用的
DataMembersDataMembers.Add"Names"
Set rsNames=New ADODB.RecordSet'设置对象变量。
'创建一个具有两个字段的recordset，并打开该recordset。
'第一个记录具有一个整数的数据类型，第二个记录是一个最大可
'达256个字符的字符串。CursorType被设置为OpenStatic
'——一个可更新的对一组记录的快照。LockType被设置为
'LockOptimistic，以允许对该recordset进行更新。
With rsNames
.Fields.Append"ID",adInteger
.Fields.Append"Name",adBSTR,255
.CursorType=adOpenStatic
.LockType=adLockOptimistic
.Open
End With
Dim i As Integer
For i=1to10'添加十条记录。
rsNames.AddNew
rsNames!ID=i
rsNames!Name="Name"&i
rsNames.Update
Next i
rsNames.MoveFirst'移到该记录集的开始。
End Sub
这部分代码首先创建recordset对象，然后给该对象添加两个字段。代码接着给recordset 添加十条记录。
10.在该类的GetDataMember事件中，添加下述代码：
Private Sub Class_GetDataMember(ByVal DataMember As String,_
Data As Object)
Set Data=rsNames
End Sub
只要发生该事件——即当该类对象被绑定到一个数据使用者，如DataGrid控件时，代码将返回该recordset对象。
11.在Form对象的代码模块中，声明一个数据类的对象变量：
Option Explicit
Private datNames As NamesData'类变量
12.在Form对象的Load事件的代码中，将DataGrid控件的DataSource设置为该类对象。
Private Sub Form_Load()
'创建一个新的NamesData对象
Set datNames=New NamesData
'将这个DataGrid绑定到新的数据源datNames
Set DataGrid1.DataSource=datNames
End Sub
二、访问Hierarchical FlexGrid控件
要在Visual Basic中安装并访问Hierarchical FlexGrid控件，请使用以下步骤。
要安装和访问Hierarchical FlexGrid控件
1.在“工程”菜单中，选择“部件”。出现“部件”对话框。
2.在“控件”选项卡中，选择“Microsoft Hierarchical FlexGrid Control6.0”，然后单击“确定”。MSHFlexGrid控件被添加到Visual Basic工具箱中。
3.在Visual Basic工具箱中，单击MSHFlexGrid控件，然后将其拖到一个Visual Basic窗体上。
VB常用控件的方法详解
VB常用控件的方法详解.txt3努力奋斗，天空依旧美丽，梦想仍然纯真，放飞自我，勇敢地飞翔于梦想的天空，相信自己一定做得更好。4苦忆旧伤泪自落，欣望梦愿笑开颜。5懦弱的人害怕孤独，理智的人懂得享受孤独VB常用控件的方法详解 BASIC是属于高级程序语言的一种，英文名称的全名是"Beginner's All-Purpose Symbolic Instruction Code"，取其首字字母简称"BASIC"，就名称的含意来看，是「适用于初学者的多功能符号指令码」，是一种在计算机发展史上应用最为广泛的程序语言。 微软公司也在MS-DOS时代即推出Quick BASIC，在Windows开始流行的时候，微软公司推出Visual Basic for Windows成为Windows作业环境一枝独秀的易学易用程序语言。 Visual Basic是开发Microsoft Windows 应用程序的最快方法。不论是对Microsoft Windows 应用程序的专业开发者还是初学者来说，Visual Basic 都是一套不可多得的快速开发应用程序。它提供的控件可以轻松的"画"出应用程序的友好界面，使软件的开发工作不再枯燥无味。 在VisualBasic语言中，控件是用户界面的基本要素，是进行可视化程序设计的重要基础，它不仅关系到界面是否友好，还直接关系到程序的运行速度以及整个程序的好坏。每个控件都具有它的属性、方法和事件，要开发一个好的程序，不仅需要掌握控件的属性和事件，也要掌握它的方法。控件具有很多相同的方法，各个控件也有其特有的一些方法。 VisualBasic中的控件分为两种，即标准控件（或内部控件）和ActiveX控件。内部控件是工具箱中的"常驻"控件，始终出现在工具箱里，而ActiveX控件是扩展名为.ocx的文件（在Windows\System文件夹里），它是根据变成需要添加到工具箱里的。 在一般情况下，工具箱里只有标准控件，为了把ActiveX控件添加到工具箱里，可按以下步骤执行： (1)在菜单里选择"工程-部件"，弹出"部件"对话框； (2)在对话框中选择"控件"选项卡，显示ActiveX控件列表； (3)在列表框中找到需要添加的控件名称，单击控件名称左侧的复选框； (4)使用同样的方法选择需要添加的其它控件； (5)单击"确定"按钮，即可将所选ActiveX控件添加到工具箱里。 第一章、标准控件的方法 1.01 窗体(Form)方法 1.02 文本框控件(Text)的方法 1.03 标签控件(Label)的方法 1.04 框架控件(Frame)的方法 1.05 命令按钮控件(Command)的方法 1.06 复选钮控件(Check)的方法 1.07 单选钮控件(Option)的方法 1.08 组合框控件(Combo)的方法 1.09 列表框控件(List)的方法 1.10 滚动条控件(HScrollBar和VScrollBar)的方法 1.11 文件系统(File System)控件的方法 1.12 形状控件(Shape)的方法 1.13 直线控件(Ling)的方法 1.14 图片框控件(Picture)的方法 1.15 图象控件(Image)的方法 1.16 数据控件(Data)的方法
VB WEBBROWSER控件详解
vb+Webbrowser控件详解 2007-12-2218:22 1、获得浏览器信息： Private Sub Command1_Click() WebBrowser1.Navigate"https://www.wendangku.net/doc/164891733.html," End Sub Private Sub Command2_Click() Dim oWindow Dim oNav Set oWindow=WebBrowser1.Document.parentWindow Set oNav=oWindow.navigator Debug.Print https://www.wendangku.net/doc/164891733.html,erAgent Set oWindow=Nothing Set oNav=Nothing End Sub 点击Command1浏览网页，点击Command2在立即窗口中输出浏览器信息。 2、弹出Webbrowser消息窗口 Dim oWindow Set oWindow=WebBrowser1.Document.parentWindow oWindow.confirm"abcd" VB调用webbrowser技巧集2 向Webbrowser中写入HTML内容的几种方法 首先在Form_Load中加入 WebBrowser1.Navigate"about:blank" 确保Webbrowser1可用 方法1： Dim s As String Dim stream As IStream s="" s=s+"" s=s+"" s=s+"
hello world " s=s+"" s=s+" WebBrowser1.Document.Write s 方法2： Dim o Set o=WebBrowser1.Document.selection.createrange Debug.Print o If(Not o Is Nothing)Then o.pasteHTML"哈哈" Set o=Nothing End If 方法3： '插入文本框 Dim o Set o=WebBrowser1.Document.selection.createrange o.execCommand"InsertTextArea",False,"xxx" vb调用Webbrowser技巧集3 1、页面滚动： Private Sub Command2_Click() WebBrowser1.Document.parentwindow.scrollby0,30 End Sub Private Sub Form_Load() WebBrowser1.Navigate"https://www.wendangku.net/doc/164891733.html," End Sub 点击Command2就可以使当前页面向下滚动30像素
VB控件文本框属性详解
自学教材（常用控件的属性）一一1.03、文本框（TextBox ）控件的常 作者：杜 VisualBasic 用属性
False能通过键盘修改文本框的Text属性内容 MaxLe ngth 获得或设置Text属性中所能输入的最大字符输。如果输入的字符数超过MaxLength设定的数目时，系统将不接受超出部分,并且发出警告声。 Mouselc on MousePointer=99时，设疋一个自疋义的鼠标图标Mouse Poin ter MultiLi ne 设置文本框对象是否可以输入多行文字。取值为： True当文本超过控件边界时,自动换行。 False 需要注意的是：若该属性为False时，文本框控件对象的A lignment属性无效。 OLEDragMode 获得或设置该对象是否能作为OLE拖/放源,以及该进程是自动启动，还是在程序控制下启动。取值为： 0 Manual（手动） 1 Automatic（自动） OLEDro pMode 获得或设置该对象是否能作为一个OLE放下目标,以及它是自动发生，还是在程序控制下发生。取值为： 0 No ne（无） 1 Manual（手动） P asswordChar 该属性将文本显示的内容全部改为所设置的内容。他常用于设置密码，如PasswordChar设定为"*",那么无论用户输入什么字符，都只显示"*"。 RightToLeft 文本书与是否自左向右。取值为：True False自右向左 ScrollBoars 设置边框滚动条模式：0无滚动条 1水平滚动条 2垂直滚动条 3水平和垂直滚动条 SelLe ngth 返回或设置选定文本的长度（字符数）。 该属性没有列在属性窗口中，但在程序中可以使用这些属性。 SelStart 返回或设置选定文本的起始位置，如果没有文本被选中，则指出插入点的位置。 该属性没有列在属性窗口中，但在程序中可以使用这些属
VB6.0基本控件的属性教学总结
VB基本控件的属性，方法经及事件 VB基本控件的属性，方法经及事件 VB基本控件的属性，方法经及事件 所有控件都具有的属性： 1、Name: 表示在代码中用来标识一个控件的名字。 2、Enabled: 表示一个控件是否可以响应一个事件，即该控件可不可用。 值为true: 可以响应；值为false: 不可以看见。 3、Visible: 表示一个控件是否可见。值为true:可以看见；值为false: 不可以看见。所有控件都有具有的事件： 1、KeyDown : 当用户按下键盘上一个键时发生的。 2、KeyUp : 在用户松开键盘上按下的键时发生的。 3、KeyPress : 在Key Down和Key Up事件之间发生。 4、MouseDown : 在鼠标被按下时触发的。 5、MouseUp ：在用户松开鼠标键时发生的。 6、Click ：在用户单击鼠标左键时发生的。 7、DblClick ：在用户双击鼠标时发生的。 一、窗体（Form） 属性： 1、Caption: 表示窗体标题栏的文字。 2、BorderStyle: 一般情况下为默认值，若更改为下列值： 1）值为0：没有窗体标题栏 2）值为1：窗体运行之后不能改变大小 3、WindowState: 设置窗体的大小。 3）值为0：窗体正常大小 4）值为1：窗体最小化 值为2：窗体最大化 4、BackColor: 表示窗体的背景颜色 事件： 1、Initialize（初始化事件）: 在窗体加载和显示之前触发，这个事件只触一次。 2、Load（加载事件）: 用来完成窗体显示之前需要完成的动作。 3、Activate/Deactivate (激活/非激活事件)：是用户在同一个应用程序的两个或多个窗体之间移动时触发的。 4、QueryUnload（条件卸载事件）: 决定窗体是如何关闭的。 触发QueryUnload事件时Unload 的参数和因素有： 1）VbFormControlMenu值为0 ：选中窗体控件菜单中的Close命令。 2）VbFormCode值为1 ：从代码中调用Unload 语句。 3）VbAppWindows值为2 ：终止当前的Windows操作系统。 4）VbFormMDIForm值为4 ：因为终止MDI父窗体而导致MDI子窗体的终止。 5、Terminate(终止事件):在窗体的所有实例从内存中清除时发生，只触发一次。方法： 1、Load:加载窗体，但不在屏幕上显示 2、Unload:卸载窗体，既从屏幕上也从内存中清除窗体。 3、Show:加载窗体并在屏幕上显示窗体。Show分为：
vb控件详解系列 第一节commandbutton.doc
AC工作室 Commandbutton是vb中很常用的一个控件，下面来对这个控件的属性进行详细的了解。 1．名称 这个属性将决定按钮在编程代码中的名字，如果改为cmdb1，则双击按钮后出现的代码为： Private Sub cmdb1_Click() End Sub 2.Appearance: 返回或设置一个对象上的控件在运行时的绘图风格，3D或者是平面。Appearance 属性的设置值是：
3. Backcolor： 返回或设置一个对象的背景颜色；当tyle属性设置为0-Standard时，不会显示任何颜色，因为command1button的背景被禁用了，这个属性必须在style属性设置为1-Graphical是才能发挥作用。如下图 Style已经设置为1-Graphical 4.caption 返回或设置对象的标题栏中或图标下面的文本，如果将command1button的caption改为“按钮1”，则会按钮显示出来的名字是“按钮1”。
5．Causesvalidation： 获取或设置一个值，该值指示在单击Button控件时是否执行验证。 6.Default 返回或设置一个值，以确定哪一个CommandButton控件是窗体的缺省命令按钮。 简单点说就是确定这个按钮是否能由Enter键控制，即按下Enter键等于按下了这个按钮。且一个窗体中只能有一个按钮可以将这个属性设置为ture。 7.disabledpicture 返回或设置一个对图片的引用，该图片在控件无效时显示在控件中。即当按钮为Enabled 属性被设置为False 时显示在按钮上面的图片。当tyle属性设置为 0-Standard时，不会显示任何颜色，因为command1button的背景被禁用了，这个属性必须在style属性设置为1-Graphical是才能发挥作用。 8. DownPicture 返回或设置一个对图片的引用，该图片在控件被单击并处于压下状态时显示在控件中。即当按钮被按下时显示在按钮上面的图片。当tyle属性设置为0-Standard 时，不会显示任何颜色，因为command1button的背景被禁用了，这个属性必须在style属性设置为1-Graphical是才能发挥作用。 9．DragIcon 返回或设置图标，它将在拖放按钮操作中作为指针显示。必须将Dragmode设置为1才能正确地显示出来。 10.DragMode 返回或设置一个值，决定拖动模式是手动还是自动。设置为1时按钮才可以相应拖动。 11.enabled 返回或设置一个值，决定一个对象是否响应用户生成事件。当设置为false时按钮不响应任何事件。 12．Font 设置按钮显示的字体。
VB控件treeview用法详解
VB TreeView控件使用详解 (2012-06-16 15:08:16) 转载▼ 分类：VB编程笔记 标签： it 第一小时：学习直接用代码将数据填充到树控件中。 为什么要先学习直接用代码将数据填充到树控件中？因为这种方法是最简单的，代码也最容易理解，学习树控件，先将这个学会，已经掌握了一半，所以先不要急着想怎么将表中的数据填充到树控件中，在第一小时里，树控件和表完全没有关系。 目的：我们要在树控件中建立如下的一个3层级关系 水果 | |__苹果 | |__红富士 | |__国光 | |__葡萄 |__红提子 |__青提子 解释：水果包含2种，一种是苹果，一种是葡萄，苹果又包含2种，一种是红富士，一种是国光，葡萄也如此。 在这里：“爷”是水果，“父”是苹果，葡萄，“子”是红富士，国光，红提子，青提子。概括如下： 爷（只能有一个）：水果 父（这里有2个）：父1：苹果；父2：葡萄 子（这里有4个）：子1：红富士（父1苹果的子）；子2：国光（父1苹果的子）；子3：红提子（父2葡萄的子）；子4：青提子（父2葡萄的子） 1、新建一个窗体，在窗体上放置两个控件，一个是Treeview，一个是Imagelist 如何找到这两个控件？ Treeview控件在“工具箱”的榔头加扳手图标（其他控件）中选“Microsoft Treeview Control,Version 6.0" Imagelist控件在“工具箱”的榔头加扳手图标（其他控件）中选“Microsoft Imagelist Control,Version 6.0" Treeview控件大家都明白干什么用的，Imagelist控件是干什么用呢？原来这个控件是放图标用的，如果你想在树控件中显示图标的，这个图标都将储存在ImageList控件中。 2、设置这两个控件的属性 首先要讲清楚控件的属性设置有2种，一种是设置这个控件在ACCESS中的属性，比如名称等。一种是设置这个控件本身的属性。要设置这个控件在ACCESS中的属性，选中控件后按鼠标右键选“属性”就可以了。跟我们平时设置文本框什么的一样。要设置这个控件本身
VB INET控件
VB Inet控件(又叫Internet Transfer控件)的详细用法 Inet控件也叫Internet Transfer控件，这个控件封装了http协议以及ftp协议，使用起来非常方便。所以大家经常使用。然而大家通常使用的只是其部分功能，接下来我们讲一下它的全部详细功能，看过之后你也许会有眼前一亮的感觉。会猛然觉得我们之前懂得的只是皮毛。 闲话少说，下面开讲： Internet Transfer控件实现了两种广泛使用的Internet协议：超文本传送协议（HyperText Transfer Protocol）(也就是HTTP)和文件传送协议（File Transfer Protocol）(即FTP)。 使用Internet Transfer控件可以通过OpenURL或Execute方法连接到任何使用这两个协议的站点并检索文件。 可以做到的大体方向 在应用程序中添加FTP浏览器。 创建自动从公共FTP站点下载文件的应用程序。 分析World Wide Web站点中的图形引用，并只下载图形。 提供以自定义格式显示从Web页获得的动态数据。 基本操作 Internet Transfer控件的功能依赖于将要使用的协议。由于所支持的两种协议工作起来不尽相同，所能够进行的操作就依赖于正在使用的协议。例如，GetHeader方法只能用于HTTP （HTML文档）协议。 然而，有些过程对两个协议是通用的。最基本的，如果要使用任何一个协议，则必须： 将AccessType属性设置为合法的代理服务器。 用合法的URL调用OpenURL方法。 用合法的URL和协议支持的命令调用Execute方法。 用GetChunk方法从缓冲区获取数据。 设置AccessType属性：使用代理服务器 为了与Internet建立任何形式的连接，必须确定计算机如何连接到Internet上。如果在intranet上，可能需要提供代理服务器才能连接到Internet上。
VB中数据库编程MSHFlexGrid控件用法详解
VB数据库编程中MSHFlexGrid控件用法详解 添加MSHFlexGrid将Name改成flex1 添加text将name改成txtedit Public rs1As New ADODB.Recordset,rs2As New ADODB.Recordset'定义数据集对象Dim i As Integer,j As Integer Sub EditKeyCode(MSHFlexGrid As Control,Edt As Control,KeyCode As Integer,Shift As Integer) '标准编辑控件处理。 Select Case KeyCode Case27'ESC:隐藏焦点并将其返回MSFlexGrid Edt.Visible=False MSHFlexGrid.SetFocus Case13'ENTER将焦点返回MSFlexGrid。 MSHFlexGrid.SetFocus DoEvents If MSHFlexGrid.Col
- VB WEBBROWSER控件详解
- VB控件大全属性详解 图像组合框
- vb+Webbrowser控件详解
- VB常用控件的方法详细讲解
- VB控件大全属性详解 数据组合框
- VB控件大全属性详解 复选框
- VB_winsock控件详解
- VB控件属性详解二label
- VB控件属性详解一form
- VB控件大全属性详解 列表框
- VB控件大全属性详解 图片框
- VB控件大全属性详解 选项卡
- VB控件大全属性详解 图像
- VB控件大全属性详解形状
- VB控件大全属性详解 文本框
- VB控件大全属性详解 形状
- VB控件大全属性详解
- vb控件讲解大全
- VB中数据库编程MSHFlexGrid控件用法详解
- VB控件大全属性详解 数据列表