vbs mysql 读数据库_VBS操作数据库与控件

要是你想选择自己用vbs实现这个要求,需要弄清楚三个问题:

1、怎么用vbs连接数据库

2、怎么查询变量归档

3、怎么用vbs操作控件

第一个问题主要是写好连接字符串,可以看书或者在网上搜教程,很简单。

第三个问题网上也有不少,可以看看控件的方法的注释,但是一般的对控件操作分两种,一是调整控件格式,二是读写数据。

如果表格格式固定,可以直接编辑属性,不用写代码,如果是动态的格式,常用的属性可以参考我下面的代码。

读写操作就是一句话,就是ADO回来的数写进表格。

GName.TextMatrix(行号,列好) = adoRecordset("字段").value

表格调整:

dim GName

set GName = HMIRuntime.screen(画面名).Screenitems(表格名)

dim Fstring

Fstring = “列标题1|列标题2|列标题3”

GName.AllowUserResizing = 1

GName.ScrollBars = 2 ''有无滚动条,横1竖2无0全3

GName.ScrollTrack = True ''滚动条随着改变还是结束后改变,true为随着变

Dim rNum

Dim ii

rNum = 1

For ii = 1 To Len(FString) Step 1

If Mid (FString,ii,1) = "|" Then

rNum = rNum + 1

End If

Next

GName.Cols = rNum ''列数

GName.Rows = RowsNum  ''行数

GName.FormatString = Fstring ''列写列标题

GName.FixedRows = 1 ''固定行数

GName.FixedCols = 0 ''固定列数

GName.WordWrap = True  ''允许自动换行

GName.ColAlignment = 4 ''非固定单元格的对齐方式,居中

GName.ColAlignmentFixed = 4 ''固定单元格的对齐方式,居中

表情包
插入表情
评论将由博主筛选后显示,对所有人可见 | 还能输入1000个字符
相关推荐
©️2020 CSDN 皮肤主题: 数字20 设计师:CSDN官方博客 返回首页