Script

'''#####################################################################################
'''####     Script Name: Account Balance &Account Type                            ######
'''####     Author     : Laith Ghawi                                              ######
'''####     Website    : www.Hybridsolutions.com                                 ######
'''####     Date       : 08/07/2019 11:20:44                                      ######
'''####     Description:Shows your account balance&Type into a message boxes      ######
'''#####################################################################################

Sample

Public Sub main() 
Dim property_id as VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER      
Dim Info as VTLGeneral.ENUM_ACCOUNTINFO_STRING 
Dim balance as VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE 

balance = VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE.ACCOUNT_BALANCE
Info = VTLGeneral.ENUM_ACCOUNTINFO_STRING.ACCOUNT_FIRST_NAME   
property_id = VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER.ACCOUNT_TRADE_MODE 

ClientCode.AccountInfoInteger(property_id)

IF property_id=1 Then 
GUI.MsgDialog("Demo Account")

ElseIF property_id=2 Then 
GUI.MsgDialog("Contest Account")

ElseIF property_id=3 Then
GUI.MsgDialog("Real Account")

End IF 

GUI.MsgDialog("Account name is: " & ClientCode.AccountInfoString(Info).Tostring())
GUI.MsgDialog("Balance is: " & ClientCode.AccountInfodouble(balance).Tostring())

End Sub 

See Also

• Account Summary
• Account Type
• Add a Label to a Form

Back to VTL Server Script Index