[ASP.NET] Geldautomaat - knoppen - n00b - Softwareontwikkeling

dinsdag 17 december 2002 14:48

Acties:

Neerlandici.

Topicstarter

Ik zit met het volgende probleem:

Ben in ASP.NET (VB code) een geldautomaat aan het nabootsen.
In een textbox verschijnen de cijfers die gekoppeld zijn aan de knoppen (0-9)
Nu zit ik met het probleem dat wanneer er een pincode van 4 cijfers wordt ingevuld deze cijfers 1 voor 1 verschijnen in de textbox en niet alle vier tegelijk.

Dit is uiteindelijk wel de bedoeling. Hoe maak ik deze betrekkelijk makkelijke aanpassing in onderstaande code?

code:

Sub Button1_Click(sender As Object, e As EventArgs)
TextBox1.Text = "1"
End Sub

Sub Button2_Click(sender As Object, e As EventArgs)
TextBox1.Text = "2"
End Sub

Sub Button3_Click(sender As Object, e As EventArgs)
TextBox1.Text = "3"
End Sub

etc. etc.

Je brengt me helemaal van mijn abrikoos.

dinsdag 17 december 2002 14:51

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Visual Basic .NET:

1	TextBox1.Text &= "1"

[ Voor 25% gewijzigd door gorgi_19 op 17-12-2002 14:51 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 17 december 2002 14:52

Acties:

Verwijderd

De pinautomaten die ik ken laten gelijk een sterretje zien bij elke toetsaanslag....

Je kunt trouwens efficiënter programmeren dan tien keer dezelfde code aan een knop hangen...

[ Voor 61% gewijzigd door Verwijderd op 17-12-2002 14:54 ]

dinsdag 17 december 2002 14:53

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Verwijderd schreef op 17 december 2002 @ 14:52:
In het KeyDown event vang je de ingevoerde (getal)waardes op in een string en als de string een lengte heeft van vier vul je'm in in de tekstbox...

Maar, de pinautomaten die ik ken laten gelijk een sterretje zien bij elke toetsaanslag....

Het is asp.net, geen Winforms.....

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 17 december 2002 14:54

Acties:

Majestic

Neerlandici.

Topicstarter

Deze textbox1 wordt niet in de VB code met name benoemd.
Alleen in het HTMl gedeelte:

code:

1	<asp:TextBox id="TextBox1" runat="server" BorderStyle="Solid" BorderWidth="1px"></asp:TextBox>

Je brengt me helemaal van mijn abrikoos.

dinsdag 17 december 2002 14:55

Acties:

Verwijderd

Het is asp.net, geen Winforms.....

Oops, verkeerd gelezen!

dinsdag 17 december 2002 14:55

Acties:

Majestic

Neerlandici.

Topicstarter

Maar, de pinautomaten die ik ken laten gelijk een sterretje zien bij elke toetsaanslag....

Maar dit is ook een hele bijzondere pinautomaat

Nee serieus, hij kan ook meer dan alleen pincodes invullen, hij moet ook rekeningnummers kunnen weergeven / in kunnen toetsen.

Je brengt me helemaal van mijn abrikoos.

dinsdag 17 december 2002 14:56

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Of ik snap je probleem niet, of ik heb net het antwoord gegeven (&-gebruiken)

Als ik het niet snap, zou je dan met wat voorbeelden kunnen verduidelijken?

Verder vraag ik me af of je dit met VB.Net moet oplossen en het niet makkelijker gaat met Javascript, en alleen het resultaat (de 4 cijfers) als post terugstuurt.

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 17 december 2002 14:58

Acties:

Majestic

Neerlandici.

Topicstarter

Het is een specifieke VB opdracht dus zonder Java, dit terzijde.

Waar plaats ik de TextBox1.Text &= "1" code?
Voor het gemak, de hele code tot dusverre:

code:

<%@ Page Language="VB" %>
<script runat="server">
    
    TextBox1.Text &= "1"
    
    Sub Button1_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "1"
    End Sub
    
    Sub Button2_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "2"
    End Sub
    
    Sub Button3_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "3"
    End Sub
    
    Sub Button4_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "4"
    End Sub
    
    Sub Button5_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "5"
    End Sub
    
    Sub Button6_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "6"
    End Sub
    
    Sub Button7_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "7"
    End Sub
    
    Sub Button8_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "8"
    End Sub
    
    Sub Button9_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "9"
    End Sub
    
    Sub Button11_Click(sender As Object, e As EventArgs)
    TextBox1.Text = "0"
    End Sub

</script>
<html>
<head>
</head>
<body>
    <form runat="server">
        <p align="center">
            <asp:TextBox id="TextBox1" runat="server" BorderStyle="Solid" BorderWidth="1px"></asp:TextBox>
        </p>
        <p align="center">
            <asp:Button id="Button1" onclick="Button1_Click" runat="server" Text="1" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button2" onclick="Button2_Click" runat="server" Text="2" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button3" onclick="Button3_Click" runat="server" Text="3" BorderStyle="Solid" BackColor="White"></asp:Button>
        </p>
        <p align="center">
            <asp:Button id="Button4" onclick="Button4_Click" runat="server" Text="4" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button5" onclick="Button5_Click" runat="server" Text="5" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button6" onclick="Button6_Click" runat="server" Text="6" BorderStyle="Solid" BackColor="White"></asp:Button>
        </p>
        <p align="center">
            <asp:Button id="Button7" onclick="Button7_Click" runat="server" Text="7" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button8" onclick="Button8_Click" runat="server" Text="8" BorderStyle="Solid" BackColor="White"></asp:Button>
            <asp:Button id="Button9" onclick="Button9_Click" runat="server" Text="9" BorderStyle="Solid" BackColor="White"></asp:Button>
        </p>
        <p align="center">
            <asp:Button id="Button11" onclick="Button11_Click" runat="server" Text="0" BorderStyle="Solid" BackColor="White"></asp:Button>
        </p>
      
    </form>
</body>
</html>

Je brengt me helemaal van mijn abrikoos.

dinsdag 17 december 2002 15:00

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Ik zal er eentje voordoen..

code:

1
2
3

    Sub Button1_Click(sender As Object, e As EventArgs)
    TextBox1.Text &= "1"
    End Sub

En voordat hier heel veel mensen (terecht..

) gaan flippen: Javascript != Java.

Als je toch bezig bent, maak dan gelijk een clear all en / of clear last en een postback knopje..

[ Voor 43% gewijzigd door gorgi_19 op 17-12-2002 15:02 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 17 december 2002 15:03

Acties:

Majestic

Neerlandici.

Topicstarter

Bedankt! it works

Zal in het vervolg ook over Javascript spreken.
Mijn welgemeende excuses

Clear all / Clear last klinkt aanlokkelijk.
Mag ik vragen hoe dit er uit gaat zien?

Je brengt me helemaal van mijn abrikoos.

dinsdag 17 december 2002 15:06

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

ClearAll:

code:

1	Textbox1.Text = ""

Clearlast:

code:

1
2
3

If Len(Textbox1.Text) > 0 Then
TextBox1.Text = Left(TextBox1.Text,Len(TextBox1.Text)-1))
End if

Of zoiets...

En nog een tip... Kijk eens de quickstarts van www.ASP.Net

Over je probleem: zie ook
[rml]gorgi_19 in "[ ASP] File system object, controle file "[/rml]

[ Voor 47% gewijzigd door gorgi_19 op 17-12-2002 15:08 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 17 december 2002 15:09

Acties:

Majestic

Neerlandici.

Topicstarter

Bedankt.

Die quickstarts heb ik reeds gedaan.
Misschien ben ik iets te makkelijk over bepaalde zaken heengegaan.

Zal voortaan beter m'n best doen

Je brengt me helemaal van mijn abrikoos.