⑴ 一半股票軟體那種打出來600xxx然後下面就可以顯示一個股票名稱和代碼的功能能不能在VB控制項實習
這個很簡單的，你首先要建立相應的資料庫，資料庫存有有 中國石化 中國電信 等等信息。然後當你在文本框（假設是TEXT1）中輸入字元的時候取信息：
先引用 DAO ，或者ADO 數據引擎。我這里以DAO為例。
Private Sub Text1_Change()
Dim mMDB As Database
Dim mREC As Recordset
Set mMDB = Workspaces(0).OpenDatabase("資料庫路徑")
Set mREC = mMDB.OpenRecordset("select * from 數據表 where 欄位名稱 like '%" & Text1.Text & "%'")
If mREC.EOF = True Or mREC.BOF = True Then
'如果沒有找到就不處理
Else
'如果找到就顯示吧,至於怎麼顯示，顯示多少，就依程序需要而定了
text2.Text = mREC.Fields("欄位名稱")
'.....其他代碼
End If
End Sub
如果不想使用資料庫，就通過讀取TXT文件或者其他格式文件也可以了。
如果取的信息量小，你甚至可以直接寫在程序里，總之，方法很多
⑵ 如何獲取實時的股票數據
估計你是盤中炒股需要吧？多數股票軟體都有公式系統，例如大智慧、同花順、通達信，都有公式系統，在公式系統中編寫自己的公式，就可以得到自己需要的實時的股票數據了。這些都是免費的。
如果是公司，有專門提供股票行情API介面的，例如微盛的金融實時行情API介面，但這種介面需要程序員才能使用，比較專業。
⑶ 如何編程從免費股票軟體中提取實時數據
自己寫程序的話，一種方法是從已提供的信息源，例如webservice獲取數據。還有種辦法就是去連接提供即時信息的網頁硬解析。
代碼舉例如下：
Created on Thu Jul 23 09:17:27 2015
@author: jet
"""
DAY_PRICE_COLS = ['date', 'open', 'high', 'close', 'low', 'volume',
'chg', '%chg', 'ma5', 'ma10', 'ma20',
'vma5', 'vma10', 'vma20', 'turnover']
DAY_PRICE_URL = '%sapi.finance.%s/%s/?code=%s&type=last'
INDEX_KEY = ['SH', 'SZ', 'HS300', 'SZ50', 'GEB', 'SMEB']
INDEX_LIST = {'SH': 'sh000001', 'SZ': 'sz399001', 'HS300': 'sz399300',
'SZ50': 'sh000016', 'GEB': 'sz399006', 'SMEB': 'sz399005'}
INDEX_DAY_PRICE_COLS= ['date', 'open', 'high', 'close', 'low', 'volume',
'chg', '%chg', 'ma5', 'ma10', 'ma20',
'vma5', 'vma10', 'vma20']
K_TYPE_KEY = ['D', 'W', 'M']
K_TYPE_MIN_KEY = ['5', '15', '30', '60']
K_TYPE = {'D': 'akdaily', 'W': 'akweekly', 'M': 'akmonthly'}
MIN_PRICE_URL = '%sapi.finance.%s/akmin?scode=%s&type=%s'
PAGE_TYPE = {'http': 'http://', 'ftp': 'ftp://'}
PAGE_DOMAIN = {'sina': 'sina.com.cn', 'ifeng': 'ifeng.com'}
URL_ERROR_MSG = '獲取失敗，請檢查網路狀態，或者API埠URL已經不匹配！'
get_hist_data.py
# -*- coding: utf-8 -*-
"""
Created on Thu Jul 23 09:15:40 2015
@author: jet
"""
import const as ct
import pandas as pd
import json
from urllib2 import urlopen,Request
def get_hist_data(code = None, start = None, end = None, ktype = 'D'):
"""
功能:
獲取個股歷史交易數據
--------
輸入:
--------
code:string
股票代碼 比如:601989
start:string
開始日期 格式:YYYY-MM-DD 為空時取到API所提供的最早日期數據
end:string
結束日期 格式:YYYY-MM-DD 為空時取到最近一個交易日數據
ktype:string(default=D, 函數內部自動統一為大寫)
數據類型 D=日K線，W=周K線，M=月K線，5=5分鍾，15=15分鍾
30=30分鍾，60=60分鍾
輸出:
--------
DataFrame
date 日期
open 開盤價
high 最高價
close 收盤價
low 最低價
chg 漲跌額
p_chg 漲跌幅
ma5 5日均價
ma10 10日均價
ma20 20日均價
vma5 5日均量
vma10 10日均量
vma20 20日均量
turnover換手率(指數無此項)
"""
code = code_to_APIcode(code.upper())
ktype = ktype.upper()
url = ''
url = get_url(ktype, code)
print(url)
js = json.loads(ping_API(url))
cols = []
if len(js['record'][0]) == 14:
cols = ct.INDEX_DAY_PRICE_COLS
else:
cols = ct.DAY_PRICE_COLS
df = pd.DataFrame(js['record'], columns=cols)
if ktype in ct.K_TYPE_KEY:
df = df.applymap(lambda x:x.replace(u',', u''))
for col in cols[1:]:
df[col]=df[col].astype(float)
if start is not None:
df = df [df.date >= start]
if end is not None:
df = df[df.date <= end]
df = df.set_index('date')
return df
def code_to_APIcode(code):
"""
功能：
驗證輸入的股票代碼是否正確，若正確則返回API對應使用的股票代碼
"""
print(code)
if code in ct.INDEX_KEY:
return ct.INDEX_LIST[code]
else:
if len(code) != 6:
raise IOError('code input error!')
else:
return 'sh%s'%code if code[:1] in ['5', '6'] else 'sz%s'%code
def get_url(ktype, code):
"""
功能：
驗證輸入的K線類型是否正確，若正確則返回url
"""
if ktype in ct.K_TYPE_KEY:
url = ct.DAY_PRICE_URL % (ct.PAGE_TYPE['http'], ct.PAGE_DOMAIN['ifeng'],
ct.K_TYPE[ktype], code)
return url
elif ktype in ct.K_TYPE_MIN_KEY:
url = ct.MIN_PRICE_URL % (ct.PAGE_TYPE['http'], ct.PAGE_DOMAIN['ifeng'],
code, ktype)
return url
else:
raise IOError('ktype input error!')
def ping_API(url):
"""
功能：
向API發送數據請求，若鏈接正常返回數據
"""
text = ''
try:
req = Request(url)
text = urlopen(req,timeout=10).read()
if len(text) < 15:
raise IOError('no data!')
except Exception as e:
print(e)
else:
return text
#測試入口
print(get_hist_data('601989','2015-07-11','2015-07-22'))
⑷ 在VB.NET中如何使用新浪股票數據介面
基本沒有，你得和人家有合作關系
⑸ 股票軟體如何開發的用什麼語言數據的獲得方式
K-JAVA功能可以做移動商務、移動辦公、信息點播、股票、外匯、地址簿、日歷、文件管理、天氣預報等；
股票軟體戚枝使用的是JAVA語言，該可以跨平台運行，軟體開發商可以很容易的開發應用程序；股票行情軟體是基於Java計算機編程語言上的，也就是K-JAVA即J2ME軟體平台，專門用於嵌入式設備的JAVA軟體。
Java包含了一種計算機編程語言和一個平台，隨著K-Java技術的不斷完善與發展，發展商們將對具有K-Java功能的手機用戶提供更還更全面的絕仔輪服務。如：互動游戲、互動新聞、增強手機連接到無線網路後進行數據交換的安全性、載以Java語言寫成的內容、遙控家用電器。
軟體開發商以K-Java編程語言為手機開發應用程序，可以提供，游並信戲，個人信息處理，股票，電子地圖等服務程序。Java有許多值得稱道的優點，如簡單、面向對象、分布式、解釋性、可靠、安全、結構中立性、可移植性、高性能、多線程、動態性等。
⑹ EXCEL如何用VBA自動獲取每個股票近幾天的漲幅
excel大量獲取數據是比較慢的 你這種得用vb寫dll多線程刷新數據才行 私聊
⑺ vb 獲取股票行情報價
這是頁面內容採集問題,沒啥難度
網上代碼太多了(你可以搜 VB 抓取網頁),以實現基本功能(把頁面 http://www....)的內容抓過來
有了內容,你需要做的僅是截取部分有用內容後在使用正則表達式篩選即可
比如你抓過來的內容是截取部分有用內容後放到了字元串 str
那麼使用下面的函數即可
' 正則求值
Public Function Value(ByVal str As String, ByVal RegexEx As String, ByVal SN As Integer) As String
Try
Dim regex As New Regex(RegexEx)
Dim m As MatchCollection = regex.Matches(str)
Try
Return m(SN).ToString()
Catch
Return ""
End Try
Catch
Return ""
End Try
End Function
你的text1可能是
需要過濾下
dim a as string = Value(str,"...",0).replace("<a>","")
text1.text = a
dim b as string = Value(str,"...",1).replace("<a>","")
text1.text = b
...
順便說下,看股票的話免費軟體一大把,人家比你這個功能更強了,而且更新速度比這個網站更快
⑻ 怎樣用excel 實時讀取 股票日線數據
定量分析的第一步，是獲取數據。
獲取股票歷史行情數據最方便的途徑，就是直接讀取股票行情軟體留在你電腦中的日線數據文件。
但如果不是程序員，電腦里一般不會有VB、VC之類的編程語言。
其實，大家的電腦中一般都有OFFICE。OFFICE中的EXCEL自帶了一個VBA語言的編程環境。功能也很強大。
我用EXCEL里的VBA編寫了一段代碼，讀取通達信股票行情軟體的日線文件。已經測試通過。
代碼如下。與愛好定量分析的朋友分享。
TypeMyType
a1AsLong'標示碼
a2AsLong'日期
a3AsSingle'開盤價
a4AsSingle'最高價
a5AsSingle'最低價
a6AsSingle'收盤價
a7AsSingle'成交金額
a8AsLong'成交量
EndType
Sub按鈕1_Click()
DimFile2AsInteger
DimbAsMyType
File1=FreeFile
Opensh600000.dayForBinaryAccessReadAs#File1i=1DoWhileNotEOF(File1)
Get#File1,,b
Cells(i,1)=b.a1
Cells(i,2)=b.a2
Cells(i,3)=b.a3
Cells(i,4)=b.a4
Cells(i,5)=b.a5
Cells(i,6)=b.a6
⑼ 用VB 讀取通達信實時股票數據(現價，漲幅)
關鍵是介面
我估計現在沒有免費的介面了！！！
所以你想自己編程獲取實時數據，幾乎不可能了！！！
總之，沒有有效的網路實時數據支持，這是開源股軟的最致命的地方！！！