.net - System.TypeInitializationException FORM access to Class -


i'm working on project need call class create , manage excel file. undefined reasons can't call function form. return exception : system.typeinitializationexception. i've check class don't see wrong.

the form want call excel_management class :

imports system.diagnostics imports system.windows.forms  public class proc_form  private excel_manage = new excel_management public shared ok boolean = new boolean   if my.settings.check_directory = false             if folderbrowserdialog1.showdialog = dialogresult.ok                 my.settings.path = folderbrowserdialog1.selectedpath                 my.settings.check_directory = true                 'my.settings.save()                 msgbox(my.settings.path)                 excel_manage.check_excel()         end if

the excel_management class :

imports microsoft.office.interop imports microsoft.office.interop.excel imports system.windows.forms imports system.text.regularexpressions imports system.string  public class excel_management     public shared appexcel excel.application = new excel.application     public shared wsexcel excel.worksheet = new excel.worksheet     public shared wbexcel excel.workbook = new excel.workbook     public shared file_name string = "name" & datetime.now.tostring("yyyy") & ".xls"     public shared sheet_name string = "s " & datepart(dateinterval.weekofyear, now())     public shared check_test boolean = false     public shared excel_check new proc_form     public shared misvalue object = system.reflection.missing.value     public shared message, title, defaultvalue string     public shared myvalue object = new object     public shared integer = 1     public shared match match = regex.match(myvalue, "[^a-z0-9]")  shared sub check_excel()         if appexcel nothing             msgbox("no excel detected !")             return         else             create_excel()         end if     end sub

can see issue code not allowing me access excel class?

thank in advance.

i think issue can't create new excel.workbook way doing since it's interface.

try instead:

public shared wbexcel excel.workbook = appexcel.workbooks.add(system.reflection.missing.value)

from here: strange error on excel workbook input, or 1 of other solutions question.

also, regex.match can't match on object. don't know myvalue is, 1 option depending on might be:

regex.match(myvalue.tostring, "[^a-z0-9]")

finally, these errors readily apparent if debugger in visual studio break on them. go "debug" menu > "exceptions..." , put checkmark next "common language runtime exceptions" in "thrown" column. should debug other errors.


Comments

Post a Comment

Popular posts from this blog

Sort a complex associative array in PHP -

this question has answer here: php sort array subarray value 5 answers i have associative array in php like: $newarray1 = array ( [producta] => array ( [link] => http://sanjosespartan.com/blog/products/agile-java-development/ [visitcount] => 4 ) [productd] => array ( [link] => http://sanjosespartan.com/blog/products/intro-to-go/ [visitcount] => 1 ) [productg] => array ( [link] => http://sanjosespartan.com/blog/products/node-js-for-developers/ [visitcount] => 1 ) [productb] => array ( [link] => http://sanjosespartan.com/blog/products/beginning-mysql/ [visitcount] => 1 ) [productc] => array ( [link] => http://sanjosespartan.com/blog/products/computer-networks/ [visitcount] => 1 ) ...
Read more

vb.net - How to ignore if a cell is empty nothing -

how use roscolor() ignore value (like empty cell) ? color row if value upper 5 when there nothing in cell, want ignore roscolor() apply, how? public sub roscolor() integer = 0 quotedatagridview1.rows.count() - 1 step +1 dim val integer val = quotedatagridview1.rows(i).cells(3).value if val = vbempty quotedatagridview1.rows(i).defaultcellstyle.backcolor = color.white elseif val < 5 quotedatagridview1.rows(i).defaultcellstyle.backcolor = color.red elseif val > 5 , val < 10 quotedatagridview1.rows(i).defaultcellstyle.backcolor = color.lightyellow end if next end sub you can check empty value following public sub roscolor() integer = 0 quotedatagridview1.rows.count() - 1 step +1 dim val = quotedatagridview1.rows(i).cells(3).value if isdbnull(val) or val nothing quotedatagridview1.rows(i).defaultcellstyle.backcolor = color.white ...
Read more

recursion - Can every recursive algorithm be improved with dynamic programming? -

i first year undergraduate csc student looking competitive programming. recursion involves defining , solving sub problems. understand, top down dynamic programming (dp) involves memoizing solutions sub problems reduce time complexity of algorithm. can top down dp used improve efficiency of every recursive algorithm overlapping sub problems? dp fail work , how can identify this? the short answer is: yes. however, there constraints. obvious 1 recursive calls must overlap. i.e. during execution of algorithm, recursive function must called multiple times same parameters. lets truncate recursion tree memoization. can use memoization reduce number of calls. however, reduction of calls comes price. need store results somewhere. next obvious constraint need have enough memory. comes not-so obvious constraint. memory access requires time. first need find result stored , maybe copy location. in cases, might faster let recursion calculate result instead of loading somewher...
Read more