导航:首页 > 科创数据 > vb获取股票软件数据格式

vb获取股票软件数据格式

发布时间:2021-07-28 17:58:55

『壹』 股票软件如何开发的用什么语言数据的获得方式

K-JAVA功能可以做移动商务、移动办公 、信息点播、股票、外汇、地址簿、日历、文件管理 、天气预报等;

股票软件使用的是JAVA语言,该可以跨平台运行,软件开发商可以很容易的开发应用程序;股票行情软件是基于Java计算机编程语言上的,也就是K-JAVA即J2ME软件平台,专门用于嵌入式设备的JAVA软件。

Java包含了一种计算机编程语言和一个平台,随着K-Java技术的不断完善与发展,发展商们将对具有K-Java功能的手机用户提供更还更全面的服务。如: 互动游戏、互动新闻 、增强手机连接到无线网络后进行数据交换的安全性、 载以Java语言写成的内容、遥控家用电器。

软件开发商以K-Java编程语言为手机开发应用程序,可以提供,游戏,个人信息处理,股票,电子地图等服务程序。 Java有许多值得称道的优点,如简单、面向对象、分布式、解释性、可靠、安全、结构中立性、可移植性、高性能、多线程、动态性等。

『贰』 VB如何读取股票大盘数据,20秒更新一次,并动态的显示到文本框中,请高手帮忙

这个要连接数据库的。。

『叁』 如何用VB做股票数据接收系的源代码

报价方,在开盘时共同商定价位,再实时的价位是因市场交易,自动变化的

『肆』 C语言或者VB怎么实现从别的程序获得数据

你这需要进程间通信机制。
以你举的例子来说,你的“自动提示系统”和股票软件之间,需要能够互相通信,或者说互相调用对方的接口。你的例子里,不太可能实现的是,股票软件不太可能提供接口给你的软件。
具体要实现进程间通信的话,有一些现成的框架,比如CORBA。
CORBA是为了解决分布式计算而设计的协议,有一些公司的产品(比如orbix)实现了这个协议。
使用CORBA架构互相通信的进程可以不在一台机器上,可以应用在网络环境。
使用CORBA这样的协议,程序还是比较复杂的。

『伍』 用VB 读取通达信实时股票数据(现价,涨幅)

关键是接口

我估计现在没有免费的接口了!!!

所以你想自己编程获取实时数据,几乎不可能了!!!

总之,没有有效的网络实时数据支持,这是开源股软的最致命的地方!!!

『陆』 VB如何读取数据

Private Sub Command1_Click()
Open "c:\1.txt" For Binary As #1
Dim s As String, s1() As String, s2() As String
Dim i As Integer, arr() As Integer

s = StrConv(InputB(LOF(1), 1), vbUnicode)
Close #1

While InStr(s, " ") '空格处理
s = Replace(s, " ", " ")
Wend
s1 = Split(s, vbCrLf) '分行处理

ReDim arr(UBound(s1), 1) '定义n行2列的数组(根据文本行)
For i = 0 To UBound(s1)
s2 = Split(s1(i)) '不定列的分割

arr(i, 0) = s2(2) '第3列,如果是第11列改为10即可
arr(i, 1) = s2(3) '第4列,如果是第12列改为11即可
Next

For i = 0 To UBound(arr, 1) '显示数组数据
For j = 0 To 1
Print arr(i, j);
Next
Print
Next

End Sub

VB6专家网络Hi群1358368

『柒』 VB怎么对数据格式输出

使用format函数
format(1,"@@@@@@@@@@@@")
format(0.125,"@@@@@@@0.000")

『捌』 vb6 中如何读取文件文件中的日期时间序列和相应数据,文件格式如下:

你要达到什么样的结果?

如果是这样的要求,我建议使用数据库文件。

当然,你这样也可以的,问题你上面的数据包括 几点 --- 几点的,到表格里,不要这样的格式了?
我先告诉你如何读取文本文件吧!

Option Explicit
Private Sub Command1_Click()
Dim LStr As String
Dim d() As String
Dim i As Integer
Open "c:\ssk2.txt" For Input As #1
Do While Not EOF(1) ' 循环至文件尾
Line Input #1, LStr '读入一行
d = Split(LStr, " ") '以一个西文空格为分隔符号,把一行分离到数组里
For i = 0 To UBound(d)
Print d(i); " "; '输出显示
Next i
Print
Loop
Close #1 ' 关闭文件。
End Sub

『玖』 用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转换股票数据的问题

大智慧股票数据
每个记录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获取股票软件数据格式相关的资料

热点内容
姜慧恩演的片 浏览:924
最新带挠脚心的电影 浏览:117
刘智苑健身是什么电影 浏览:294
韩国恐怖电影失踪免费观看 浏览:899
韩剧电影免费看伦理 浏览:373
韩国最好看的三极推荐 浏览:503
两个男人一起做鸭子的电影 浏览:745
国产恐怖片反派带着面具拿着菜刀 浏览:522
可可托海 电影 浏览:472
池恩瑞的作品 浏览:18
巨猫电影 浏览:178
吃人奶 片段 浏览:168
啄木鸟电影都有哪些 浏览:298
江湖左手谁演的 浏览:670
部队题材电影军人可以去影院免费看吗 浏览:564
章子怡 床戏 浏览:718
结婚过的男女电影 浏览:163
床戏影视 浏览:182
想看片却找不到网站 浏览:724
国语电影免费在线 浏览:808