CalcTable1.0

[Rioven]

As Erel and Klaus commented, I have updated the following:

[The files were updated at the beginning of this thread]

-images were imbeded on exe.files
-less one mouse click during input, mouse click on table will focus the textbox and cursor to end of content.
-image buttons were improved(not stretched).
-fixed bugs on condition input(sample2.ct1 also adjusted)
-improved handling of exiting the application.

Please try again, and let me know. Any other comments are welcome
Thank you very much.

[klaus]

Hi Rioven,

At last I have taken time to look at you updated version. I was abroad during 10 days and during the last days I did some other stuff.

In trying it, I many times forgot to click on the check button, probabIy Excel habits. I added one line in the TextBox1_LostFocus routine that valdates the entry directly when clicking on another cell in the table.

Sub textbox1_lostfocus
  If srow<>-1 AND scol<>-1 AND Control("col"&Scol,arraylist).count<>0 Then 'only functions on Desktop
'    Control("col"&Scol,arraylist).item(Srow)=textbox1.Text
'    table1.Cell(table1.ColName(Scol),Srow)=textbox1.Text
    imgm.Visible=false
    imgn.Visible=false	
  End If
  CheckT1_Click
  Sip=false
End Sub

What is he hidden TextBox2 for ? I suspect that it is to get the LostFocus and Focus for TextBox1 work properly.

On top for the filename, I would display only the filename without the path, with long pathnames the field could become too short.
Perhaps another thought, replace the label for the filename by a ComboBox, if the user makes related calculations with different files, he could add the filenames in the ComboBox and then get a quicker access to load them.

For me, to make reading easier, I prefer having upper case characters in long names, like FixTableWidth instead of fixtablewidth. But this is one cosmetic opinion.

I have joined the updated version.

Good job !

Best regards.

[Rioven]

Hi Klaus,
I thank you again for your time.
The problem I have is that particular sub 'textbox1_lostfocus', it works only on desktop. As you can see on my [remarks] on that sub. This is why I have created the hidden textbox2 to make it worked on device. I don't know what are better solutions.
I have taken your additional code line and for desktop inputing could be lot easier using one of door library features that you could type directly on cells.

I agree on your suggestions and probably implemented on my future updates.

I have attached the CalcTable1.2desktop version for easier coding of formula on desktop also another sample conversion I've put together.

Thank you and best regards,