Search:

Try switching it to PNG also make sure image is set to stretch

if you change background here after adding to resources also i think 2010 only takes jpeg
158999

Public Class FrmGame
Dim score As Integer = 0
Dim CardNum As Integer
Dim CardFirst As Integer
Private Sub Options_Load(sender As Object, e As EventArgs) Handles MyBase.Load
...

Public Class FrmOptions
Private Sub MainMenuToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MainMenuToolStripMenuItem.Click
Me.Close()
End Sub
Private Sub...

Public Class Game
Private images As Image() = {My.Resources._1,
My.Resources._2,
My.Resources._3,
...

i cant seem to get it to see values of each card just adds score nomatter value of card in picbox

ok i seem to still have problems getting it to recognize the values of cards it seems to think all cards are higher
Public Class Game
Private images As Image() = {My.Resources._1,
...

I have set option strict on started new fresh form
however still no idea how to get the value of image for olddicethrow

this is my new cleaner code


Public Class Game
Private images...

CURRENT CODE


Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblLife.Text = lives
lblscore.Text = score
...

i tried putting
picRandom.Image = images(dicethrow - 1)

but get
Error BC31429 'picRandom' is ambiguous because multiple kinds of members with this name exist in class...

not sure how to make image match dice


Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblLife.Text = lives
lblscore.Text =...

I have most of the code working now but ive hit a snag

Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblLife.Text = lives
...

i tried inserting PictureBox1.Image = images(randomNumber - 1) but no idea where


Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
...

OK so i have declared the images in an array just need help changing from seeing the number on label to the value of the image and randomizing it each click

Public Class Game
Public Sub...

ok so i finally coded my we high low card game at present it uses 1-13 (1 deck of cards) and i was wondering how would i go about changing this code to display card images instead of numbers

My...

i tried that but it wants

Error BC30451 'Interval' is not declared. It may be inaccessible due to its protection level.

however if i declare it as integer an it stopped work

Public Class Splash
Private tmrSplash As Object

Private Sub Splash_Load(sender As Object, e As EventArgs) Handles MyBase.Load

End Sub

Private Sub Timer1_Tick(sender As...

ty it worked i just had the stop code in wrong place

so i know how to add music to a programme but im not sure how to restrict the music to only play in certain forms of the programme

Public Class Options
Private Sub Button3_Click(sender As...

Thankyou for the help

nm i got it working even added background music/image just need to work out how to have the music only play one 2 of the forms instead of all the time

thanks that worked is there any to have starting lives shown at form launch coz when form launches i see following158419

it was the code he told me to put in on line 22 as error show If lblLife.Text = 0 Then

showed error

System.InvalidCastException
HResult=0x80004002
Message=Conversion from string "lives4" to type 'Double' is not valid.
Source=Microsoft.VisualBasic
StackTrace:
at...

Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
score = score + 1
lblNumber.Text = dicethrow
End Sub

Dim dice As New...

Basically I've got it to stage where score adds up just need to work out how to make them lose lives for incorrect guess results in them losing life from 5-0 then they get a game over message box...

Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
score = score + 1
lblNumber.Text = dicethrow
End Sub

Dim dice As New...

ive tried that but score doesn't seem to remember and increase with each correct guess

Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
...

System.InvalidCastException
HResult=0x80004002
Message=Conversion from string "X" to type 'Double' is not valid.
Source=Microsoft.VisualBasic
StackTrace:
at...

if i move it outside programme doesn't run at all

Error BC30188 Declaration expected. 9 Active
Error BC30188 Declaration expected. 10 Active

ublic Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub

Dim dice As New Random
Dim dicethrow As Integer = dice.Next(1, 101)
Dim...

Public Class Game
Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dice As New Random
Dim dicethrow As Integer = dice.Next(1, 101)
Dim...

then where do i put them i tried mobing them but it didnt work outside i need some 1 to show me

Public Class Game
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dice As New Random
Dim dicethrow As Integer = dice.Next(1, 101)
Dim...

i have declared them outside i thought at top

Public Class Game
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dice As New Random
Dim dicethrow As Integer = dice.Next(1, 101)
Dim...

so far this is what i got but its not working

Public Class Game
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dice As New Random
Dim...

still need help im only a beginner

can u help me with the code then