I am new to coding VB so bear with me. I am using VB 2005 Express. I am attempting to code up a small program to use as a calculator of sorts for a game I play, eve Online. I will have multiple calculations that will be done when the user fills in the information and presses the calculate button. I am trying to figure out the best way to go about doing this. So let me explain just what I am trying to do. The program will take an ore and run a calculation to see how much minerals it will give. There is 8 different minerals. Each ore gives off a certain amount of each of the 8 minerals. So I will run a calculation against each mineral for the amount of ore they have. Not really that hard but there is 47 different ores. Right now I am just trying to figure out one ore, then I can replicate it for the rest of them.
So I have set up my combo box, called ore_01. The ore is called Arkonor. I have set up a public dim stating Public Arkonor As String. No under the combo box I have set up:
One of the minerals the ore Arkonor gives is tritanium. So in the public section I have set up Public tritanium As Integer. This variable, tritanium, will have numeric value that will change based on the ore selected. So in the case of our ore Arkonor I set up an if statement in the combo box:Code:Dim ore_01_var As String ore_01_var = ore_01.Text
To test the use of my variable I created this in my calculate button to display our number.Code:If ore_01_var = Arkonor Then tritanium = 300 End If
When I calculate it displays a 0 in the text box. It displays something but not the value I need. If I change the tritanium_unit_value.Text = tritanium to equal a number it will display the number. So there must be an issue with the translation of the variable. I am not really sure though. I am still learning at this point. Any suggestions one where to go?Code:tritanium_unit_value.Text = tritanium
Thanks Spiffy




Reply With Quote