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 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]...
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]...
Im trying to calculate TextBox values, but asnwer = 0. I think strings are too big/long.
Example : TextBox1.Text is 0.2777777777 and TextBox2.text = 60
TextBox3.text = Val(TextBox1.Text) * Val(TextBox2.text)
then TextBox3 Text is 0.
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] .....
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?
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'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].....
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'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 want to know the code for an average of numbers from 1 to a number entered?
View 31 RepliesI 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 have text1=a, text2=b, text3=c, text4=d, text5=e
Now I want to calculate the average of the values,
Here's a simple way
average=(a+b+c+d+e)/5
But what if i have values only in 3 textboxes, that means the code will still divide the sum of the values into 5, that will not be correct!
[code]i need to calculate the item on my datagrid(gallon_qty) but im receiving the error when running it
View 1 RepliesI'm working on a simple miles-per-gallon calculator.
Module Module1
Sub Main()
Dim count As Integer = 0
[code]....
This compiles and works for 1 iteration, after many trials and tribulations . What I need to do is make it run for a user-specified number of iterations (the tankfuls variable) and store those separate results in separate locations in the arrays, then average all of those values at the end (find the overall average MPG).
i have a question on how to add two values of placeholder on different forms. in the forms i put a placeholder for "correct answer" and "wrong answer" so one of this placeholder will have a value of integer. how can i add a value on the first form to the other placeholder of the other form.
View 5 RepliesI have to calculate values of several equations in an application. For example, one these equations could be:
d = a + b*z + c*z (this is what is being displayed to the user, assume that 'a', 'b' and 'c' are provided as textboxes, assume that z is a hardcoded value for now)
Now, the user could enter a=1.5, b= -0.5 and c = -0.6 (or even 'a' could be negative). So, I just tried a sample code for simple values but to no avail...
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
Dim val1, val2, val3_calculated, first, second As String
first = "8"
second = "3"
Dim arr(10) As String
[Code] .....
Error:
But it throws an error saying that I am not using any databind control.
Concerns:
First of all, is it necessary to use this "eval" operator in here? Is there any way to keep "-0.5" with the sign in asp.net using vb?
With the application i'm building i have to do some calculating, ive so far not had to do anything like this so i could use some pointers. Here's the simplist of calculation i have to do, if i could get some help pointing me in the right direction i could probabaly figure the rest out.
It would be Box1value * box2value / 144 = box3 But if box 3 returns a value of less than 2.5 it rounds up. The rounding function is very important to subsequent calculations i will have to make.
So the this simple form would work where the user inputs a number into box one and two and the calulation appears in box 3. Attached is a mockup of the form design.
I have a table called tblComparison - this table has the following columns[code]...
Once the averages for each column are created it needs to save them to tblMonthlyComparison - again the column names in this table are the same so in the fldDate column the program needs to enter 31/12/2011. In fldAverage of this table what we do is take the average that we found above for each column then plus them together and divide them by 5.
I have one text box that contains a value for the "Start Time" and another text box that contains a value for the "End Time."Both of the values are expressed in a format for military time (i.e. 1200, 1300, 1430, etc.).When the "End Time" text box loses focus, I would like the "Elasped Time" (expressed in minutes) to appear in a third text box.Seems easy enough...right?Well the problem I'm having is since the first two numbers in military time are base 24 and the last two numbers are base 60, a standard calculation subtracting the "End Time" from the "Start Time" does not yield an accurate result.
View 3 RepliesI have a monthly forecast showing expense accounts by cost centre so columns headings look like:
Cost Centre, Account Number, Jan, Feb, Mar etc
Using VBA code to automate the process, I need to calculate the total for each month of each account number where the 2 left characters of the cost centre are the same. I have a formula which will calculate this (for one cost centre grouping/account) which looks like this:
=SUMPRODUCT((LEFT('Sheet2'!A6:A5136,2)="BE")*('Sheet2'!C6:C5136=AccountNumber)*('Sheet2'!D6:D5136))
I am not sure whether there is a more efficient way than using a formula like that (at the moment this would be used for 12 months on about 6 cost centre groupings with about 500 accounts each - though this would vary). Its not massive, but could be slow to calculate. I don't think the subtotals command is powerful enough, and I haven't used arrays for a long time (especially for what would appear to need a dynamic, mulch-dimensional array).
I'm trying to calculate an average no from data imported from a text file using streamreader. I'm not sure how the loop should read, and the result (average) I want to hold in a separate variable for future use.[code]...
View 1 RepliesHow to create a new textbox every time previous textbox.text is entered?
View 7 RepliesI am trying to mkae sure that there has been 16 numeric digits entered into the masked textbox. If not show errror message and if so to call the fucnction ValidateLuhn. When calling Validate Luhn i want the program to tell me if the number entered is valid or invalid using the code in the function:
Private Function ValidateLuhn(ByVal value As String) As Boolean
Dim CheckSum As Integer = 0
Dim DoubleFlag As Boolean = (value.Length Mod 2 = 0)
[CODE]...
OK, every time the letter a is entered into a textbox, I want it to enter in as a 1 instead. Help?
View 3 Replies
