fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel
fout in form designer bij poker spel fout in form designer bij poker spel
fout in form designer bij poker spel
Go Back  Xtreme Visual Basic Talk > > > fout in form designer bij poker spel


Reply
 
Thread Tools Display Modes
  #1  
Old 11-26-2009, 04:44 PM
SmoothCrim SmoothCrim is offline
Newcomer
 
Join Date: Nov 2009
Posts: 1
Default fout in form designer bij poker spel


Hallo, ik maak een soort van pokerspelletje, en heb stukjes idee gebruikt van andere spelletjes maar ik heb 1 probleem, het voorbeeld was gemaakt in VB6 en ik maakte het in VB.NET (2008). nu is er het probleem dat bij de formdesigner, er een paar arrays zijn die in mijn vb blijkbaar niet lijken te kloppen. hier is het stukje codeHet onderlijnde is het probleem)
Visual Basic code:
Code:
    Public WithEvents btnVast As Microsoft.VisualBasic.Compatibility.VB6.ButtonArray
    Public WithEvents imgKaart As Microsoft.VisualBasic.Compatibility.VB6.PictureBoxArray
    Public WithEvents imgVast As Microsoft.VisualBasic.Compatibility.VB6.PictureBoxArray
en in de "echte" programmacode ziet het er zo uit:
Visual Basic code:
Code:
    Private Sub btnDeel_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles btnDeel.Click
        txtStatus.Text = ""
        If Beurt = 1 Then
            Beurt = 2
            Voordeel = Voordeel - 1
            txtVoordeel.Text = CStr(Voordeel)
            Call shuffle()
            Call deal()
            For x = 1 To 5
                btnVast(x).Enabled = True
            Next x
            Exit Sub
        End If
        If Beurt = 2 Then
            Beurt = 1
            Call deal()
            Call check()
            For x = 1 To 5
                btnVast(x).Enabled = False
            Next x
en voor de images ook:
Visual Basic code:
Code:
    Sub deal()
        If Beurt = 1 Then
            spelendeKaart = 1
        Else
            spelendeKaart = 6
        End If
        For x = 1 To 5
            If Vast(x) = "" Then
                imgKaart(x).Image = System.Drawing.Image.FromFile(My.Application.Info.DirectoryPath & "\images\" & boekKaart(spelendeKaart) & ".gif")
                spelerKaart(x) = boekKaart(spelendeKaart)
                spelendeKaart = spelendeKaart + 1
            Else
                imgVast(x).Visible = False
                Vast(x) = ""
            End If
        Next x
    End Sub

    Private Sub btnVast_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles btnVast.click
        Dim Index As Short = btnVast.GetIndex(eventSender)
        If Vast(Index) = "" Then
            Vast(Index) = "true"
            imgVast(Index).Visible = True
        Else
            Vast(Index) = ""
            imgVast(Index).Visible = False
        End If
    End Sub

Alvast bedankt

Last edited by Cerian Knight; 11-26-2009 at 09:36 PM. Reason: added code tags
Reply With Quote
  #2  
Old 11-26-2009, 07:06 PM
Iceplug's Avatar
Iceplugfout in form designer bij poker spel Iceplug is offline
MetaCenturion

Retired Moderator
* Guru *
 
Join Date: Aug 2001
Location: Iowa, USA
Posts: 16,583
Default

Sorry, but you have to speak in English here.
I don't know what you are saying, but looks like you are talking about control arrays.
Control Arrays in .NET:
http://www.xtremevbtalk.com/showthread.php?t=174835
__________________

Iceplug, USN
Quadrill 1 Quadrill 2 (full) Quadrill 3 JumpCross .NET Website is ALIVE! - DL Platform Tour for VB.NET! Posting Guidelines Hint: Specify your location in your user cp profile if you want compassion!
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off

Forum Jump

Advertisement:





Free Publications
The ASP.NET 2.0 Anthology
101 Essential Tips, Tricks & Hacks - Free 156 Page Preview. Learn the most practical features and best approaches for ASP.NET.
subscribe
Programmers Heaven C# School Book -Free 338 Page eBook
The Programmers Heaven C# School book covers the .NET framework and the C# language.
subscribe
Build Your Own ASP.NET 3.5 Web Site Using C# & VB, 3rd Edition - Free 219 Page Preview!
This comprehensive step-by-step guide will help get your database-driven ASP.NET web site up and running in no time..
subscribe
fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel fout in form designer bij poker spel
fout in form designer bij poker spel
fout in form designer bij poker spel
 
fout in form designer bij poker spel
fout in form designer bij poker spel
 
-->