㈠ 请教会VB的大哥，我想在bartender软件里用VB函数截数据库判断一个取数值。
不知你要的VB什么版本的，下面是VB6的最简实现方法：
Value = "HAO:" & Format(Value, "000000/00/000000/0")
如果是VBScript，就要分别截取再来合并了：
Value = "HAO:" & Mid(Value, 1, 6) & "/" & Mid(Value, 7, 2) & "/" & Mid(Value, 9, 6) & "/" & Mid(Value, 15, 1)
你是说一个函数有AB两个参数，传过去然后判断A是否为1？
function funct1(A as integer,B as integer)
if a = 1 then b=b+1
end function
'如果不是需要函数就是
if a = 1 then b=b+1
有问题再追 满意请采纳
㈡ VB如何读取股票大盘数据，20秒更新一次，并动态的显示到文本框中，请高手帮忙
这个要连接数据库的。。
㈢ 如何在VB6.0中根据设置的时间查询股票的数据，急急急。。。
不可以设置
㈣ 用VB如何直接获取股票实时数据
可以通过调用ChinaStockWebService的服务来实现获取股票的实时数据，代码如下：
publicstring[]getStockInfo(stringstockcode)
{
//stringurl="http://hq.sinajs.cn/list="+stockcode;
//stockcode某只股票的代码
stringurl="http://hq.sinajs.cn/list=sh600683";
WebClientclient=newWebClient();
client.Headers.Add("Content-Type","text/html;charset=gb2312");
Streamdata=client.OpenRead(url);
StreamReaderreader=newStreamReader(data,Encoding.GetEncoding("gb2312"));
strings=reader.ReadToEnd();
reader.Close();
data.Close();
returns.Split(',');
}
㈤ VB读取数据库方法
可以用ADODB，先定义
Dim cnn
As
New
ADODB.Connection
Dim rs
As
New
ADODB.Recordset
这两个cnn用来连接数据库rs用来读取数据库中的值，然后用循环遍历rs将值ADD到listview里面
修改和保存可以做成同一个按钮保存就是遍历listview将数据UPDATE到数据库里面就行！
㈥ vb转换股票数据的问题
大智慧股票数据
每个记录40 byte
格式
long Date 0'相对开头偏移量 byte
long Open=4
long High=8
long Low=12
long Close=16
long Volume=20
不是二进制方式，使用随机方式 Random 读取， 读取以后 价格 /1000 就行了
定义类型
Private Type ddzh
Date As Long
Open As Long
High As Long
Low As Long
Close As Long
Volume As Long
End1 As Long
End2 As Long
End3 As Long
End4 As Long
End Type
Private Type dzh
Date As Long
Open As Single
High As Single
Low As Single
Close As Single
Volume As Long
End Type
用 Get 读取记录到 就可以了
ReDim ddzh(1 To 1) As ddzh
ReDim dzh(1 To 1) As dzh
Open "000001.day" For Random As #1 Len= Len(ddzh(1))
ReDim ddzh(1 To Lof(1)/Len(ddzh(1))) As ddzh
For i = 1 To ReadToTal
Get #1, i, ddzh(i)
Next i
Close #1
读取以后转换到
dzh里就可以了
大福星数据比较好用，分中图都可以读取
㈦ 在VB.NET中如何使用新浪股票数据接口
基本没有，你得和人家有合作关系
㈧ 请教会VB的大哥，我想在bartender软件里用VB函数截取accse数据库的数值，一共十五位，在字符中插入“/”
不知你要的VB什么版本的，下面是VB6的最简实现方法：
Value = "HAO:" & Format(Value, "000000/00/000000/0")
如果是VBScript，就要分别截取再来合并了：
Value = "HAO:" & Mid(Value, 1, 6) & "/" & Mid(Value, 7, 2) & "/" & Mid(Value, 9, 6) & "/" & Mid(Value, 15, 1)
㈨ VB如何从数据库读取指定数据
vb绑定数据方法：
通过datasource属性绑定
比如使用数据库控件
datasource
控件会出现一个下拉框
选择需要绑定的数据控件，然后设置datamember绑定表，datafield绑定具体字段；也可以使用代码绑定
例如
set
list1.datasource=adodc1.recordset
list1.refresh'刷新
㈩ 用VB 读取通达信实时股票数据(现价，涨幅)
可以在http://stock.business.sohu.com/p/pl.php
用VB的 WebBrowser1_DownloadComplete 做。
引用Internet Controls