vb.net - This is an assignment I have to turn in. I am missing something about the function calculation -



vb.net - This is an assignment I have to turn in. I am missing something about the function calculation -

i have 3 test scores lowest score dropped. function used calculate final grade , grade has converted number letter. have done can trying figure out , create sure function written correctly.

'i set these @ public class used throughout programme dim test1 double dim test2 double dim test3 double dim pupil string dim result1 string dim total string function semestergrade(byval t1 double, byval t2 double, byval t3 double) double 'this function determines test scores , drops lowest score calculation if t1 < t2 , t1 < t3 total = cstr(((t2 + t3) / 2)) elseif t2 < t3 , t2 < t1 total = cstr(((test1 + test3) / 2)) elseif t3 < t2 , t3 < t1 total = cstr(((t1 + t2) / 2)) 'i added if statement calculate if scores same because programme not give me right output elseif t1 = t2 , t2 = t3 total = cstr((t1 + t2 + t3) / 3) end if 'this returns result function homecoming cdbl(total) end function private sub btndetermine_click(byval sender system.object, byval e system.eventargs) handles btndetermine.click dim result string 'these pull info textboxes test1 = cdbl(txtfirst.text) test2 = cdbl(txtsecond.text) test3 = cdbl(txtthird.text) pupil = txtname.text.toupper 'this how utilize function calculation result = cstr((semestergrade(test1, test2, test3))) 'this convert number score letter if cdbl(total) >= 90 result1 = ("a") elseif cdbl(total) >= 80 result1 = "b" elseif cdbl(total) >= 70 result1 = "c" elseif cdbl(total) >= 60 result1 = "d" elseif cdbl(total) < 60 result1 = "f" end if 'this output result txtresult.text = pupil & ": " & result1 end sub end class

the problem calling function variable , comparing variable. replace below part , retry;

'this how utilize function calculation result = (semestergrade(test1, test2, test3)) 'this convert number score letter if result >= 90 result1 = ("a") elseifresult >= 80 result1 = "b" elseif result >= 70 result1 = "c" elseif result >= 60 result1 = "d" elseif result < 60 result1 = "f" end if

vb.net visual-studio-2010

Comments

Post a Comment

Popular posts from this blog

Delphi change the assembly code of a running process -

Delphi change the assembly code of a running process - i'm trying alter address 00741fa5 has push test.009e721c . alter push test.009e71c8 . procedure callback; asm force $9e71c8 end; procedure tform2.btn1click(sender: tobject); var ppid :dword; pprocess : cardinal; begin getwindowthreadprocessid(findwindow(nil,pchar('test')), @ppid); pprocess := openprocess(process_all_access, false, ppid); injectasm(pprocess, $741fa5, 10, integer(@callback), 0); end; here injectasm function (with error checking) function injectasm(process: longword; injectaddress, injectsize, codeaddress, codesize : integer): pointer; var csize, rsize : integer; replaced : array of byte; jmp : array [0..4] of byte; jmpaddress : integer; nopv : byte; : integer; nbr: ulong_ptr; begin //injectsize must equal or greater 5, because need space our //(far) jmp wwxxyyzz instruction //if there's no space, inject in place of few instructions if injectsize ...
Read more

json - Hibernate and Jackson (java.lang.IllegalStateException: Cannot call sendError() after the response has been committed) -

json - Hibernate and Jackson (java.lang.IllegalStateException: Cannot call sendError() after the response has been committed) - hello have problem hibernate , jackson. have 2 pojos @entity @table(name = "users") public class user implements serializable { static final long serialversionuid = 4235637833262722256l; @id @generatedvalue private int id; @column(name = "creation_date") private date creationdate; @column(name = "first_name") private string firstname; @column(name = "last_name") private string lastname; @version @column(name = "version") private int version; @column(name = "e_mail") private string email; @column(name = "enabled") private boolean enabled; @column(name = "login") private string login; @column(name = "password") private string password; @jsonmanagedreference("role") @onetomany(mappedby = "user", cascade = cascadetype.all,fetch = fetchtyp...
Read more

C++ 11 "class" keyword -

C++ 11 "class" keyword - i've started using c++ 11 little bit more , have few questions on special uses of class keyword. know it's used declare class, there's 2 instances have seen don't understand: method<class t>(); and class class_name *var; why precede typename keyword class in first example, , keyword pointer in sec example? that known elaborated type specifier , necessary when class name "shadowed" or "hidden" , need explicit. class t { }; // love of god don't t t; t t2; if compiler smart, give these warnings: main.cpp:15:5: error: must utilize 'class' tag refer type 't' in scope t t2; ^ class main.cpp:14:7: note: class 't' hidden non-type declaration of 't' here t t; ^ if class not defined, deed forwards declaration. for example: template <typename t> void method() { using type = typename t::value_type; } method...
Read more