Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man beräknar kommissionen Använda Looping

    kan Försäljningsprovision struktureras många olika sätt beroende på bransch och företaget . Utföra denna beräkning inom ett Visual Basic-program är snabb och effektiv . VB ger ett par sätt att loopa igenom en uppsättning data , bearbeta varje objekt en efter en fram till slutet . Programmet kan läsa all input från en fil eller databas , looping igenom uppgifterna en post i taget . Resultatet kan antingen sättas in i en databas tabell för senare rapportgenerering , skrivs till en fil eller skickas till en handledare . Instruktioner
    1

    Öppna en anslutning till antingen en databas eller en extern fil för att hämta in för Visual Basic-programmet . Du kommer att behöva definiera variabler av typ dubbelt för att hålla kommissionen , lön , provision takt och försäljningssiffror för den aktuella månaden .
    2

    Loop genom informationen med hjälp av en " Do While " loop . Om hämta indata från en databas , " Do While Not rstSalesData.EOF " kommer att utföra de kommandon som följer detta uttalande till slutet av postmängden har nåtts . Addera 3

    Hämta de belopp nödvändiga för kommissionens beräkning . En typisk kommissionen kan vara att säljaren erhåller 10 procent av omsättningen över $ 10.000 och 5 procent på omsättningen mindre än $ 10.000 . Först , hämta försäljningsbeloppet för månaden i försäljningen rörlig och lön till lön variabeln . Om beloppet är mer än $ 10.000, kommer kommissionen hastigheten vara 5 procent . Ställ in hastigheten variabeln lika med 0,05 och försäljning variabeln lika med beloppet av försäljningen , $ 4700 till exempel .
    4

    Beräkna kommissionen genom att ta försäljningen variabla tider kommissionen rate.dCommission = dSales * dRate.Get den totala lönen för månaden genom att lägga till " dCommission " till lönen variabeln " dSalary . " Format " dSalary " till två decimaler för att få en korrekt belopp i dollar .
    5

    Avsluta slingan med " loop " . Det slutliga programmet koden ska se ut så här : Gör Även om inte rstSalesData.EOFdSales = rstSalesData.field ( " Försäljning " ) valueIf dSales < 10000 ThendRate = .05 ElsedRate = .10 End IfdSalary = rstSalesData.fields ( " Lön " ) . . valuedCommission = dSales * dRatedSalary = round ( ( dSalary + dCommission ) , 2 ) ' lägg koden här för att uppdatera databasen med dSalary eller skriva till en filerstSalesData.MoveNextLoopThe linje som börjar med en apostrof är en kommentar i Visual Basic . Det är där en funktion kan läggas till antingen spara " dSalary " till en fil eller till databasen innan du går vidare till nästa post .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Visual Basic 6.0 Form Projekt
    ·Hur man öppnar ett formulär i Access Använda Visual …
    ·Hur man skapar en röstbrevlåda i Visual Basic
    ·Hur man skapar ett DSN med en API -kod
    ·Hur anmäler en User Terminal Service på VB.Net
    ·Funktioner I VB.NET
    ·Vad är Data Object Wizard i VB6
    ·Hur konverterar jag BCD till decimal Visual Basic
    ·Hur du kör DOS-kommandon i VB.Net
    ·Konvertera Date Format
    Utvalda artiklarna
    ·Hur dela flera avdelare i JavaScript
    ·Hur får MySQL version i Query
    ·Hur man beräknar NS2 Bandbredd
    ·Fördelar och nackdelar med objektorienterad programmer…
    ·Hur man gör en Slide Down Växla med jQuery
    ·Min GoDaddy Email PHP Form inte fungerar
    ·Hur du kontrollerar om nollvärde i Visual Basic
    ·Hur man skapar en ny mapp programmässigt i Python
    ·Hur man flyttar mellan ramar i Java
    ·Lägga till sökrutor till Examensarbete Navigation Bar…
    Copyright © Dator Kunskap http://www.dator.xyz