![]() |
|
|
#1 (permalink) |
|
Capo
Join Date: Jun 2007
Location: T-DOT CITY!
Posts: 886
![]() ![]() ![]() ![]() ![]() ![]() |
if anyone has experience or is a real pro, holla at this thread, lol i need some help, my final assignment for a computer class is proper, its just this one lil bug thats pissing me off, ill post the code later on today, thnx in advance
Code:
Private Sub CmbRaptorRoster_Change() Dim strPlayerNames(0 To 13) As String PlayerNames(0) = "Andrea Bargnani" PlayerNames(1) = "Maceo Baston" PlayerNames(2) = "Chris Bosh" PlayerNames(3) = "Primoz Brezec" PlayerNames(4) = "Jose Calderon" PlayerNames(5) = "Carlos Delfino" PlayerNames(6) = "T.J. Ford" PlayerNames(7) = "Jorge Garbajosa" PlayerNames(8) = "Joey Graham" PlayerNames(9) = "Kris Humphries" PlayerNames(10) = "Jason Kapono" PlayerNames(11) = "Jamario Moon" PlayerNames(12) = "Rasho Nesterovic" PlayerNames(13) = "Anthony Parker" End Sub Private Sub cmdExit_Click() Unload Me End Sub Private Sub cmdOk_Click() If strPlayerNames = (0) Then img1.Visible = True lblStats.Caption = "PPG 6.4 RPG 1.4 APG 0.4 EFF 4# " & " Born: Oct26 , 1985 " & " Height 7 - 0 " & " Weight 250 lbs " & " From: Italy " & " Years Pro: 1 " lblStats.BackStyle = 1 ElseIf strPlayerNames = (1) Then img2.Visible = True lblStats.Caption = "PPG 0.0 RPG 0.00 APG 0.0 EFF + 1.00" & " Born: May 29, 1975 " & " Height: 6 - 10 " & " Weight: 230 lbs " & " College: Michigan " & " Years Pro: 2 " lblStats.BackStyle = 1 End If End Sub
__________________
Last edited by JYZE; 06-04-2008 at 02:16 PM.. |
|
|
|
|
|
#2 (permalink) |
|
Capo
Join Date: Jun 2007
Location: T-DOT CITY!
Posts: 886
![]() ![]() ![]() ![]() ![]() ![]() |
bumpin it
__________________
|
|
|
|
![]() |
| Thread Tools | |
| Display Modes | |
|
|