I put comments on the average output since I kept getting error messages about that. My out keeps saying:
Maximum value: 33
Minimum value: 33
what am I doing wrong?
Option Explicit On
Option Strict On
[Code]...
I'm working on a function to return a exponential average and there are a lot of examples of exponential moving averages but they all start with a moving average that is just the mean as a lead in to calculating the continuing moving average. I needed just a exponential average of a value set. After Googling my Bing off I still haven't seen anything so here is my attempt at a basic exponential average. Is this correct? Are there any errors? I have seen some text about adding a smoothing value to change the curve of the exponential average but not how that would be implemented.
[Code]...
OK, so I've been given an assignment due for Monday, which was to create a console program which allows the user to enter an unknown quantity of numbers, then have the Mean, Median and Mode averages displayed of said group of numbers.
So far I've managed to get the Mean and Median to work, for both odd and even quantities of variables. I am however stuck on getting it to calculate the modal average! I don't really know how to approach this, would a structure with two fields, variable and quantity of variable, work?
Below is the code, I haven't made it display discrete of continuous data yet, I'm leaving that for the end.
Module Module1
Sub Main()
Start:
'Declare Variables
[Code].....
I imagine this is quite elementary for most of you, I unfortunately received no replies what-so-ever to my last thread...
PS: Why isn't there an option for UK in the two letter country codes?
"I need to create a program that will allow the user to enter in 10 test grades from a class. I need to store these grades into an array, and use a loop to add up the total. Then I'll need to output the average, and the letter grade for the average using:
90 - 100 A
80 - 89 B
70 - 79 C
60 - 69 D
Below 60 F"
That's all it needs to do. Here is some code that shows you that the only thing I know how to do is (allow the user to enter in 10 test grades from a class.) The rest I'm so lost on and have a crappy instructor. This assignment is due tomorrow, but the instructor is not available over the weekend.
Here is my This is all I have:
Dim MyNumbers(9) As Integer
Dim Total As Integer
Dim i As Integer
[Code]....
here is my problem. i have to enter two grades, each grade should be an integer between 0 and 100 inclusive. Calculate the average of the two grades. If the average is greater than or equal to 90, display "Grade is an A!". It goes down the line for "if average is _______, display " ______is a/n __!" I get the last part and I know how to figure an average...but i am not sure how to type it in code. He did an elseif example, but it wasn't with 2 numbers and didn't have to average anything. So I don't know how to write that code....is there anywhere to look to find it? Here is what I have so far.............
Module Module1
Sub Main()
Dim grade, sum, average As Double
[code].....
Using VB.NET write a program that can calculate the grade of a student based on his or her marks in five subjects as input according to the following rules:
Grade A: For average between 100 and 80 (inclusive)
Grade B: For average between 79 and 65 (inclusive)
Grade C: For average between 64 and 40 (inclusive)
[code].....
The idea of this program is to calculate and find total and average for 3 Students automatically. That is when the first data is entered and click on button the total and average of first student should be displayed in listbox. And we should be able to enter second data. Bu the problem is it is just printing the first average and total thrice.
Dim a As String
Dim tot, avg, N As Single
Dim I As Integer
For I = 1 To 3
tot = Val(TextBox2.Text) + Val(TextBox3.Text) + Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text)
[Code] .....
need to make sure I got everything right for my Calculate Button in displaying the Total and Average.
Option Explicit On
Option Strict On
Public Class Grades
[code]....
My problem is mostly in the Calculate Button, what is CStr? I already used that because I set my Explicit On and that suggested it. Also when I debug I enter my 3 grades and click calculate, 0 is displayed in both my Total and Average Label box.For the Average, how would I display it to 2 decimal places?How would I set a parameter for the exam scores to be between 0-100?Would it be Try/Catch? And where would I place that coding?How do I convert my textboxes to integers?
Im having a problem getting my calculations to work. I need to find the average letters per word.
Private Sub btnCount_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCount.Click
'Determine word count and average letters / word in the sentence
[Code].....
I'm having a problem creating a function for calculating an average. I need to divide the sum of a column of integers by the number of rows in that column. These integers are generated by a datediff command and their values are assigned to textboxes in a report. The results can only be whole numbers, no decimal points.
I'm pretty new to this so if this is an obvious question please excuse my ignorance. If you need any more information to address my question please let me know.
I want to include an average in a column where the average ignores zero values in a report cell where the column may have
17
19
0
[code].....
I want 16, not 11 so (17 + 19 + 12 + 13 + 19) / 5 not (17 + 19 + 0 + 0 + 12 + 13 + 19) / 7 Something like this if it would work.
=SUM(Fields!fieldname.Value) / Count(iif(Fields!count_cycle_per_hour.Value >= 0,Fields!fieldname.Value,0))
Essentially just average everything in the column NOT a zero?
I am making this for a homework assignment and i need to calculate the average for values entered in textbox1 and place them in other textboxes. I dont understand how to do this with numbers all placed in the same spot. here is my code thus far:
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
End Sub
[Code].....
I'm doing an assignment for class which is basically a simple program that takes 12 monthly temperatures and averages them. But I also need to round the average to the nearest tenth. I am not particularly good at programming or math and don't know how I would fit this into my code. I am Including My program thus far. I put in bold and italic where the calculation takes place.
Private Sub btnEmterTemperature_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEmterTemperature.Click
'FOR BUTTON CLICK EVENT "ENTER TEMPERATURE"
[Code].....
I'm trying to calculate the rolling average in a crystal report. I have got 4 weeks in a month, and I have calculated the average for each week so long. Now I want to calculate a rolling average. eg:
For week1: rolling average = (week1Average)/1
For week2: rolling average = (week1Average + week2Average)/2
For week3: rolling average = (week1Average + week2Average + week3Average)/3
etc.
The problem with the code below is that, it is not looping through,therefore the rolling average for each week is the same as its average value wich is not correct.
Dim i, weekNum as number
Dim tot as double
weekNum =Distinctcount({ItemRating.WeekNo})
[Code].....
I wrote the following generic LINQ extension for calculating weighted average in Visual Basic 2010:
<Extension()>
Function WeightedAverage(Of T)(ByVal source As IEnumerable(Of T),
ByVal selectorValue As Func(Of T, Integer),
ByVal selectorWeight As Func(Of T, Integer)) As Double
Dim weightedValueSum As Double
Dim weightSum As Integer
[Code] .....
How can I call this function as an Aggregate function of another LINQ query? I tried it in the following way:
Dim q1 = From jd In oContext.JobDatas
Where jd.Year = 2011
Select jd
Dim q2 = Aggregate num In q1 Into WeightedAverage(num.AvSalary, num.NumPosHolder)
The Visual Basic 2010 editor is telling me that the second query (q2) of the following code is not valid statement. On the comma between the first an second argument it's saying: ")" required.
I'm in a computer science class, and we are writing simple programs using Visual Basic 2008. I am really inept when it comes to this, as I have never done it before. I need to write a program that: "Asks the user for 5 numbers and computes the average. It then displays the average with an appropriate message before the average."
I have been really close with this, but I can't get the numbers to add up, then divide by 5, and display a pop up message.
Trying to get the user to put 3 numbers in 3 text boxes and get the average.Private Sub btnAverage_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAverage.Click
Dim a As Integer = CInt(txtone.Text)
Dim b As Integer = CInt(txtTwo.Text)
Dim c As Integer = CInt(txtThree.Text)
[code].....
i am trying to get the average of an array of numbers. There could be up to 999 indexes (I picked a large array because of the the numbers of entries the array could have). As you can see I have managed to get the program to calculate the Sum of the in the array, but I am struggling with getting the average.Say, for example, I enter three sets of 90's, I get 3. How do I get an average?(BTW I have programmed it so the numbers go into an List Box, so this is why you see no code to make up the array or to where the array is printing the values).
Dim Sum As Integer
Dim SumCount As Integer
Dim AverageCount As Integer
[code].....
i'm working on something to get the average color from an image and the code i have puts all the rgb values into a byte array, so the values are being stored as (r,g,b,r,g,b,r,g,b,r,g,b,r,g,b,etc). how would i loop through each r value to add them to another array to then be able to calculate the average (and so forth for g and b as well).
View 4 Repliestrying to give an average of an array in VB MVS2008. I tried using a sample code online but the averages it gives me are completely off. If I enter three ages (20) it gives me an average of 0.6, instead of 20. Here's the code:
Spoiler
Public Class Form1
Dim Names(100) As String
Dim Ages(100) As Integer
[code]....
I'm still learning visual basic and I'm kind of stuck. I'm getting the wrong output when I test my data. I'm trying to sum array data and get an average from it. When I print out the average it's way above what it should be. When I enter these numbers 32500, 23000, 38210 I should get an average of 31236.67 but the number I get as the average is 46855.
[Code]...
My assignment was to compute design a {Loop, Array } that user inputs grades and calculates the average, Im stuck on the part of computing avg but i
Module Module1
Sub Main()
'Declare Array called Grades with 4 Elements
[code].....
i created an array of 100 cells, and the user inputs the value into them now i have to find the average of the array but not all of the cells are used how do i go to the last value, instead of the last cell? [code]
View 1 RepliesI was working on some code in VB.NET 2008 and somehow got a bunch of new functions to pop up in intellisense on a datarow array. I saw find, findfirst, sort, average, and lots more. They had an icon next to them in intellisense when I saw them. Then I went and changed some of the code and now I can't get them to come back. I have used 2005 and 2003 for a long time, but still pretty new to 2008.
View 1 RepliesI'm working with an API, for this I'm using this particular call: [URL]
If i use this, I will get all the .price values:
For i = 0 To .bets.Length - 1
With .bets(i)
Print(.price)
End With
Next
Can I calc the average .price value? I will need to sum all the values as well.
I am trying to program a noise reduction algorithm that works with a set of datapoints in a VB.NET DataTable after being helped with my other question. Basically, I want to take two integers, a coordinate value (yCoord for example) and a threshold smoothing value (NoiseThresh), and take the average of the values in the range of (yCoord - NoiseThresh, yCoord + NoiseThresh) and store that number into an array. I'd repeat that process for each column (in this example) and end up with a one-dimensional array of average values. My questions are:
1) Did anything I just say make any sense ;), and
2) Can anyone help me with the code? I've got very little experience working with databases.
[Code]...
I have a question regarding average and max values. I am new at programming. I have 6 text boxes with generated numbers in them. I need the max number to show up in one text box and the average to show up in the other.Sometimes not all six boxes will be used so I can't just do textbox1 + textbox2 + textbox3 + textbox4 +textbox5 + textbox6 /6 = average and as for max I have no clue how to do that.
View 4 Repliesi need it urgently for this code. i have data input to richtextbox and i want to average up the data? how to do this?
View 6 RepliesHeres my code so far:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Subject As Integer
Subject = InputBox("How many products")
[code]...
Only "0" appears in the TextBox2 and not the average number.
Heres my [code]...
For example if I enter in 45, 45 and 89; I should get 55.75. But instead all I get is 55. How do I get the percentage?