MMOwned - World of Warcraft Exploits, Hacks, Bots and Guides  
Homepage Register FAQ Members Mark Forums Read Advertise Marketplace FPSowned


Go Back   MMOwned - World of Warcraft Exploits, Hacks, Bots and Guides > Programming > Programming section > VB
Reload this Page [Question] link combo box to button
VB Discussions about VB programming

Reply
 
LinkBack Thread Tools
[Question] link combo box to button
(#1)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
Question [Question] link combo box to button - 10-08-2008

OK wots to code to make Button Start or woteva the selection made in the combo box

eg u select a thing in the box and you press start and a new window comes up or an application starts that was connected to the app. and to make it different for each thing in the combo box

2+rep for the first people that helps with exaclly what i need. nothing left out. Still need help

[Only registered and activated users can see links. ] <<<<<< Download link for the program so far. PLZ HELP ME FIX IT LOL
Antivirus;Version;Last Update;Result
AhnLab-V3;2008.10.3.2;2008.10.08;-
AntiVir;7.8.1.34;2008.10.08;-
Authentium;5.1.0.4;2008.10.08;-
Avast;4.8.1248.0;2008.10.08;-
AVG;8.0.0.161;2008.10.09;-
BitDefender;7.2;2008.10.08;-
CAT-QuickHeal;9.50;2008.10.08;-
ClamAV;0.93.1;2008.10.08;-
DrWeb;4.44.0.09170;2008.10.08;-
eSafe;7.0.17.0;2008.10.08;-
eTrust-Vet;31.6.6134;2008.10.07;-
Ewido;4.0;2008.10.08;-
F-Prot;4.4.4.56;2008.10.08;-
F-Secure;8.0.14332.0;2008.10.08;-
Fortinet;3.113.0.0;2008.10.08;-
GData;19;2008.10.09;-
Ikarus;T3.1.1.34.0;2008.10.09;-
K7AntiVirus;7.10.488;2008.10.08;-
Kaspersky;7.0.0.125;2008.10.08;-
McAfee;5400;2008.10.07;-
Microsoft;1.4005;2008.10.08;-
NOD32;3504;2008.10.08;-
Norman;5.80.02;2008.10.07;-
Panda;9.0.0.4;2008.10.09;-
PCTools;4.4.2.0;2008.10.08;-
Prevx1;V2;2008.10.09;-
Rising;20.65.22.00;2008.10.08;-
SecureWeb-Gateway;6.7.6;2008.10.08;-
Sophos;4.34.0;2008.10.09;-
Sunbelt;3.1.1708.1;2008.10.08;-
Symantec;10;2008.10.08;-
TheHacker;6.3.1.0.103;2008.10.07;-
TrendMicro;8.700.0.1004;2008.10.08;-
VBA32;3.12.8.6;2008.10.07;-
ViRobot;2008.10.8.1412;2008.10.08;-
VirusBuster;4.5.11.0;2008.10.08;-

Additional information
File size: 1565184 bytes
MD5...: 0d139ef76892af3bfc40908f3c080e05
SHA1..: 176782f83bb6863f04aa4c543429030627d939de
SHA256: b6a011225093cfeba7606a0a940834b38e7a7ce0977f58da66b9a214e975c239
SHA512: 1faeacf2b1adddde8202633c57740462199979f0fc9e2770283dd6b7cd2bc731<br>83640992d2be b6b55f7c01197a669fd9ce3fd213259d3c6597b63b1e44e1536c
PEiD..: -
TrID..: File type identification<br>Generic CIL Executable (.NET, Mono, etc.) (94.8%)<br>Generic Win/DOS Executable (2.5%)<br>DOS Executable Generic (2.5%)<br>Autodesk FLIC Image File (extensions: flc, fli, cel) (0.0%)
PEInfo: PE Structure information<br><br>( base data )<br>entrypointaddress.: 0x50156e<br>timedatestamp.....: 0x48ed3f2c (Wed Oct 08 23:15:56 2008)<br>machinetype.......: 0x14c (I386)<br><br>( 3 sections )<br>name viradd virsiz rawdsiz ntrpy md5<br>.text 0x2000 0xff574 0xff600 4.70 0f73d8b3bda960c59c1963bcc019ba4d<br>.rsrc 0x102000 0x7e748 0x7e800 4.67 afcca32bb8449d8d45530bdb4ca574c6<br>.reloc 0x182000 0xc 0x200 0.10 f36ed7d677b252a5dc4c32d2a55e4e1c<br><br>( 1 imports ) <br>&gt; mscoree.dll: _CorExeMain<br><br>( 0 exports ) <br>



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.

Last edited by Anthonyrox8; 10-08-2008 at 08:51 PM..
Reply With Quote

Donate to remove ads.
(#2)
Old
ReidE96's Avatar
ReidE96 is Offline
Contributor
Rep Power: 3
Reputation: 266
ReidE96 is a jewel in the roughReidE96 is a jewel in the roughReidE96 is a jewel in the rough
 
Posts: 758
Join Date: Dec 2006
Location: Scotland
10-08-2008

Code:
Private Sub Button_Click() Handles Buttonnamegoeshere.Click
      Select Case ComboBox.Text
      Case Is value1
            System.Diagnostics.Process.Start("C:program.exe")
      Case Is value2
            Form2.Show
      End Select
End Sub
Rinse and repeat until you have a Case Is check for each item in your list, and an action for each. The System.Diagnostics bit will run a program.


Reply With Quote
(#3)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

ty for this rep 2



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#4)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

uh still need help im learning and i keep getting errors the ones in red are the errors
Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click
          Select Case ComboBox1
                  Case Is value1
                              Window2.show()
                  Case Is value2

              End Select
        End Sub
End Class



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#5)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

I'm guessing Window2 is a new form, if it is you have to declare it, so before Select Case, do

Dim Window2 as new Window2




Reply With Quote
(#6)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

Ok i did that but i still get errors on

Code:
Public Class Form2

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click
        Dim Form1 As New Form1
        Select Case ComboBox1
                    Case Is Value1

                             Form1.show()


        End Select
    End Sub
End Class



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.

Last edited by Anthonyrox8; 10-08-2008 at 08:22 PM..
Reply With Quote
(#7)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

Value1 has to be declared somewhere, so maybe a global variable, or if you have a case in a listbox, the name of the text would be the case. so
Case "item"
<put action code here>
Case "item2"
<put action code here>
etc.




Reply With Quote
(#8)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

uh sorry how do i declare value1 im new to Vb



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#9)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

I'm guessing you're using strings, so if you have value one, matching up with the first combo box item, I would say.

Dim value1 As String = ComboBox1.Items.IndexOf(0)
then just increase the values so the next item would be
Dim value2 As String = ComboBox1.Items.IndexOf(1)
and so on.




Reply With Quote
(#10)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

nvm try this
Code:
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim Form1 As New Form1

        Select Case ComboBox1.SelectedItem
            Case ComboBox1.Items.IndexOf(0)
                Form1.Show()




        End Select
    End Sub




Reply With Quote
(#11)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

cool ill try that but i gtg now +rep 2 ill be back like in 4 days going on a mini holiday cya



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#12)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

uh i tried it and got this Conversion from string "Shutdown" to type 'Double' is not valid.



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#13)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

Hmm, thanks for the rep, as well as I didn't have any errors with that code.




Reply With Quote
(#14)
Old
Anthonyrox8's Avatar
Anthonyrox8 is Offline
Knight-Lieutenant
Rep Power: 2
Reputation: 19
Anthonyrox8 is on a distinguished road
 
Posts: 251
Join Date: Aug 2007
Location: Australia
10-08-2008

no it has no errors on it
its only when u run the program and press the start button



ADMIN for Sydney WoW ~ 3.0.3 Server coming soon.
Reply With Quote
(#15)
Old
The Maffyx is Offline
Lieutenant Commander
Rep Power: 2
Reputation: 67
The Maffyx will become famous soon enough
 
Posts: 668
Join Date: Feb 2007
10-08-2008

Ah I see now I was making it too complicated. Try this:
Instead of text, text2, fill in what you have for your combobox options
Code:
        Dim Form1 As New Form1

        Select Case ComboBox1.SelectedItem
            Case "text"
                Form1.Show()
            Case "text2"
                MessageBox.Show("asdf")




        End Select




Reply With Quote
Reply

Thread Tools

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 On
HTML code is Off
Trackbacks are Off
Pingbacks are Off
Refbacks are On



Powered by vBulletin® Version 3.7.4
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO 3.2.0
vBulletin Skin developed by: vBStyles.com


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361