Search results for query: *

I had never seen this: thanks a lot!

Hello. I want to perform the same lines of code whenever a control is modified in a form. V.gr.: Public Class Form1 Dim Inival As Double = NumUpDownInitial.Value Dim Finval As Double = NumUpDownFinal.Value Dim Result As Double Private Sub NumUpDownInitial_ValueChanged(sender...

Hello. I have an application that when executed on certain computers (laptop w8 with VS Express installed and netbook w7 with Microsoft net framework 4.5) appears on a back window - a hidden window - and there is no way for the initial form to be brought to the front. On the other hand, when it...

I am filling two tables in the same form, one of them TableTemp has been deleted at the opening of the form. Thus I can now print the fields I want from the new records.

Hello! I have a form I use to add data and I want to print labels - with my label thermal printer - of only one field from each record I have just added to my database, before closing the form, that is, from first record to last record of the recent added records. I suppose I could fill a table...

Hello. I know this is not the right forum for web issues, but I am used to find help here, so... And you can always re-direct me to the proper forum... To the point: I use Dim sw As StreamWriter = File.CreateText ("E:\web\test1.html") For I = 0 to 90 sw.WriteLine(HT(I,0).ToString) Next...

Hello! I'd like to save a form as an image, even if the form is not active (Hide()). I have seen some code about screen capturing, but I do not know if it would work properly in this case. Thank you for your help.

It looks quite adequate. Thanks a lot.

Hello! I need to drag data from the main form into the subform, and I don't know how to refer to the main form from the subform. I have tried: subfield1 = field1 subfield1 = Me.field1 subfield1 = frm1_field1 subfield1 = frm1.field1 subfield1 = Me.frm1_field1 subfield1 = Form_frm1.field1...

Wooobs! Option Strict On is giving me a lot of problems. V.gr.: oBook = oExcel.Workbooks.Add oSheet.Range("A1").Value = "Time" ... The error goes: Option Strict On doesn't allow run-time binding

1. Thank you very much 2. I do not know why, but I work with Option Strict Off Option Explicit On I turn Strict On 3. I change my code and use the Dim number As Double If Double.TryParse(CStr(Formdgv.dgv1.Rows(x).Cells("Column1").Value), number) AndAlso number < 0.01 Then '... End If 4...

Hello. This is very easy, but not for me! :( I have some numeric fields to compare with a number and act according to the result. But sometimes the field is missing and his value equals "" In that case I have to compare a string ("") with a number, and CDbl does not convert my empty field. I...

"I will never go to bed without learning something new" Thank you.

In this case, I think you are adding numbers, not conditions. So let it as follows: Dim flags = Convert.ToInt32(Pilar1) * 1 + Convert.ToInt32(Pilar2) * 2 + Convert.ToInt32(Pilar3) * 4 + Convert.ToInt32(Pilar4) * 8 Thank you for your very useful hint.

That is what I call "A bit of logic" Thank you very much.

Hello. I have to execute some operations according to some (4) booleans. Let's suppose the normal estate of the booleans is False, and that only one of the four booleans can be True at one time (which is not necesarily true, but the program cannot go ahead with two True values). Should I use...

Application.Exit works in the same application, in the same form, out of a button_click event, out of a Loop, this way: Private Sub btnStop_Click(sender As Object, e As EventArgs) Handles btnStop.Click Application.Exit() End Sub Private Sub Timer1_Tick(ByVal Sender As Object, ByVal e...

The colons were my second option, as the first did not work either. Or at least I could not exit the application on Application.Exit() Thank you. I have a similar case herein: If Booleanfield then MsgBox("Quit") Application.Exit() End if but the application does not exit

Hello. I am having problems with a Case statement, and my application does not stop with the following code: Try ... Catch ex As Exception Select Case MsgBox("message", MsgBoxStyle.YesNoCancel, "caption") Case MsgBoxResult.Yes...

So there is no need to use "Using" here. Thank you for your help.