JRA IPAT投票ソフト シンプルぱっと260日間無料試用可能 ダウンロードはこちらJRA IPAT投票ソフト シンプルぱっと2

FrontPage > simplepat2/api

シンプルぱっと2APIを利用するVB6サンプルコード

プロパティの利用とオブジェクトの生成

Dim spat As Object

Private Sub Form_Load()
Dim txt As String

    Set spat = CreateObject("SimplePat2.API")
    txt = "ID:" + CStr(spat.UserAccount()) + vbCrLf
    txt = txt + "Bank:" + CStr(spat.BankAccount) + vbCrLf
    txt = txt + "購入:" + CStr(spat.TodayPurchase) + vbCrLf
    txt = txt + "払い戻し:" + CStr(spat.TodayPayment) + vbCrLf
    
    Text1.Text = txt

End Sub

シンプルぱっと2の終了

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

    spat.Quit
    Set spat = Nothing

End Sub

開催情報の取得

Private Sub Command1_Click()

    spat.GetKaisaiInfo

End Sub
HOME | 特徴 | 活用事例 | ダウンロード | ご購入 | サポート | 問い合わせ | プライバシーポリシー | サイトについて
COPYRIGHT By.Syotaro Yoshida,2002-2008 All Right Reserved.