- Strength to Increase Rep
- +0
- Strength to Decrease Rep
- -0
- Upvotes Received
- 3
- Posts with Upvotes
- 3
- Upvoting Members
- 2
- Downvotes Received
- 2
- Posts with Downvotes
- 1
- Downvoting Members
- 2
I had started developing VB6 applications starting from 2003 for Mathematical problems, statistical problems, Financial modules,etc., using my intel Pentium II, 166MHz, 32MB RAM computer. Later Migrated to VS2005 and VS2008 during my engineering ending…
- Interests
- Finite Element Engineering Computational Fluid Dynamics (Aerodynamics) Structural Engineering
- PC Specs
- Lenovo Z560 i5 intel core ideapad nvidia Geforce 1GB graphics memory 4 GB RAM Windows 7
22 Posted Topics
 | [U]Use 'New' Keyword[/U] Private Class MyDAta '----Constructor for class Dim Myval1 as integer Public sub New(Byval A as integer, Byval B as integer) If A>B Then Myval1 = A Else Myval = B End if End Sub End Class Dim A as MyDAta <User defined class> Private sub Button1_click()handle Button1.click … |
| | Hi singlem For checking numbers the following will work \b(?:[0-9]*\.)?[0-9]+\b (?:\d+\.)?\d*(?:e[+\-]?\d+)?|[\s\-\/()+*%=] Check the length of string and backtrack for succession....How many numbers u want to skip like 9999999999, 000000000 etc .... If that is limited then use normal condition statements Rgrds Sam |
 | Hi Manswab Enjoy!!!! My code works on gauss elimination method.....Try using recursion function to solve by Cramer's method, that is more simple [CODE] private void GElimination(ref float[,] A, ref float[] B, ref float[] re, int cb) { // ----Check For Uncertainity :) if (((WA2dt.Mem.Count - 1) <= 0)) { return; … |
| | Hi chellam My suggestion would be [CODE]childform A; // ---ur chld form name // create instance in the open file dialog or during the Mdiparent load A = new childform(); A.richtext1.text = fileText.ToString; //Use A.show() to view and A.hide() to close[/CODE] Rgrds Sam  |
| | Hi Marshall IMO, Change the location of the panel instead of height, Keep the height constant. [CODE] Dim A As New Size(Me.Size) Panel1.Location = New Point(A.Width, A.Height - 500) ' Control the variable A with main for resize event ' Open Up For i = 1 To 500 Panel1.Location = … |
| | Hi Deepan [url]http://msdn.microsoft.com/en-us/library/aa168292%28v=office.11%29.aspx[/url] Very useful tutorial for understanding excel from .net perspective Rgrds Sam  |
| | Hi raaif Try using regex (Regular Expressions) [CODE]private sub InvalidcharsReplacer(Byref SourceString as string) Dim rgPattern = "[\\\/:\*\?""'<>|]" '----Invalid Characters Dim objRegEx As New Regex(rgPattern) SourceString = objRegEx.Replace(SourceString, "") End sub [/CODE] Call this function to your code each time to make sure all the invalid characters are filtered. Read Regular … |
| | hi rino Try using panel instead of picture box.... Try refreshing the inner panel with each key event also specifying the region of the system.drawing.graphics.... If you are planning for rpg like diabolo then use mouse events that would be better with capturing coordinated with each click rgrds Sam |
| | Hi Siddiq Sort with the day format ... For example if the user requires sheduled detail of say Date X which falls in say wednesday.... Now pick out the wednesdays from your fromdate and todate and compare with the dateX ... if u are using date data type it will … |
| | Hi Webxpert Start with VS2008 or VS2010...... If u have experience in programming, it is a matter of days to get well versed in VB. Try to buy this book -> Programming VB .NET: A Guide for Experienced Programmers by Gary Cornel Rgrds Sam  |
| | Hi Khentz As already explained Modules are used to keep procedures (Functions) which is used throughout the entire solution ... For example...Transformation matrix, Rotation matrix etc.. Here is a typical example [CODE] Public Class ObjectHolder Dim A as list (of Mycurves) Private sub CurveInitialize End Sub Private sub CurveTransformAxial End …  |
| | Hi QuickBooksdev I have gone through same case as yours when trying to convert from VB6 to VB.Net I think your references for each forms and the autogenerated code for Tools and forms might have some issues. If u still could see your design view of forms then its ok... … |
| | Hi bestofB You have to declare a binding source to make it happen. Binding source can be liked to Binding navigator, Data Grid View, etc .. using datasource property. Add a binding Source to your form Link the datasource to either your project data source, or any other.. For example, … |
| | Hi Mikejs I prefer MDImain windows form which is your main parent form whereas declare other forms with their MDIparent as your main form For example, Form2.Mdiparent = form1 '-- say you can change ur dockstyle also if u need Form2.dock = DockStyle.Fill Take for example the MSPaint application, There … |
| | Hi Brissac Based on my understanding from your Q ... You might have a list of object holding the coordinates of rectangle with color .. Go thro the following [CODE]Imports System.Drawing Public Class Form1 Dim ColouredRect As List(Of GridRect) Private Class GridRect Dim _RectLocation As System.Drawing.Point Dim _RectColour As System.Drawing.Pen … |
| | Hi Oneryavuz I think u r looking for intelli-zoom procedure as like AUTOCAD... U have to keep the Mainpic(ie., ur panel) always focused using Mainpic.Focus in key events.. [CODE] '--Note: Mainpic is a panel Private Sub mainpic_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles mainpic.MouseWheel Dim xw, yw As … |
| | Hi TungNk1993 Circle buttons instead of standard rectangular shaped buttons is quite complicated but for standard rectangular shaped button, it is simple using system.drawing.drawing2d [CODE] Dim linGrBrush As System.Drawing.Drawing2D.LinearGradientBrush Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load '----Standard Color for the button...always it will be in … |
 | Hi TIPSynergy I think this might help Private Sub ListView1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView1.MouseDoubleClick ListView1.SelectedItems(0).BeginEdit() End Sub Make sure that Listview1.labeledit property is set to true Rgrds Sam |
| | Hi Hueikar Use the following code for using savefiledialog Private Sub SaveAsToolStripMenuItem_Click(ByVal sender As Object, ByVal e As EventArgs) Handles SaveToolStripMenuItem.Click, SaveToolStripButton.Click Dim sfd = New SaveFileDialog sfd.DefaultExt = ".cbf" '--You can change the format type sfd.Filter = "(Your) Object Files (*.cbf)|*.cbf" '----Same as the DefaultExt sfd.ShowDialog() If sfd.FileName <> … |
| | Hi Jefro When Form2 is closing it will trigger the following Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing '---In this module write the following Form1.close Form3.close '- and so on End Sub I prefer u to use MDImain and child windows which will make ur … |
| | Hi Dakaboguy, Your connection string for bridging to ACE OLEDB 12 seems ok.. I think the cause might be as described by ken However check the retrieval cmd = New OleDbCommand(<commandtext>,<connection>) Rgds, Sam |
| | Hi ProGee The following code uses serialization...with this technique u can save any serialized objects of a class holds ur game data. [code] Imports System.IO Imports System.Collections.Specialized Imports System.Runtime.Serialization.Formatters.Binary <Serialize> _ Public class Example '--Your class holds game data ' Your Datas End class [/code] Dim mem As New List(Of … |
The End.