15,991,453 members
Sign in
Sign in
Email
Password
Forgot your password?
Sign in with
home
articles
Browse Topics
>
Latest Articles
Top Articles
Posting/Update Guidelines
Article Help Forum
Submit an article or tip
Import GitHub Project
Import your Blog
quick answers
Q&A
Ask a Question
View Unanswered Questions
View All Questions
View C# questions
View C++ questions
View Javascript questions
View Visual Basic questions
View .NET questions
discussions
forums
CodeProject.AI Server
All Message Boards...
Application Lifecycle
>
Running a Business
Sales / Marketing
Collaboration / Beta Testing
Work Issues
Design and Architecture
Artificial Intelligence
ASP.NET
JavaScript
Internet of Things
C / C++ / MFC
>
ATL / WTL / STL
Managed C++/CLI
C#
Free Tools
Objective-C and Swift
Database
Hardware & Devices
>
System Admin
Hosting and Servers
Java
Linux Programming
Python
.NET (Core and Framework)
Android
iOS
Mobile
WPF
Visual Basic
Web Development
Site Bugs / Suggestions
Spam and Abuse Watch
features
features
Competitions
News
The Insider Newsletter
The Daily Build Newsletter
Newsletter archive
Surveys
CodeProject Stuff
community
lounge
Who's Who
Most Valuable Professionals
The Lounge
The CodeProject Blog
Where I Am: Member Photos
The Insider News
The Weird & The Wonderful
help
?
What is 'CodeProject'?
General FAQ
Ask a Question
Bugs and Suggestions
Article Help Forum
About Us
Search within:
Articles
Quick Answers
Messages
Comments by Bensingh (Top 33 by date)
Bensingh
21-Oct-15 6:37am
View
Can You Pls Give some exaple
Bensingh
20-Oct-15 3:48am
View
Me itself fixed the solution is
Dim Sql As New OleDbCommand("SELECT Plannr, Titel1 From TblPlannenLijst where Titel1 Like '%" & Txt_Titel.Text & "%' And Soort='01 Company_BIK' order by Plannr", dbConnection)
Need to change the syntax
Bensingh
20-Oct-15 2:09am
View
ya while I have checked in the data base its have the value of 1 row
Bensingh
6-Oct-15 9:32am
View
Deleted
On using this its work Fine on first condition
I have passing Dim s As String =txtbox.text
that I have getting by listbox change value
For the first value its working fine one I have change the list box it got new value to the txtbox but instead of matching it remove all "-" and give as
2015-04-21 VP Checked file
20150414 VP Draft version
20150414 VP Draft version
2015-04-14 VP Draft version
20150414 VP Draft version
2015-04-14 VP Draft version
Please Guide
Bensingh
6-Oct-15 7:24am
View
Please Guide
Bensingh
6-Oct-15 7:24am
View
On using this its work Fine on first condition
I have passing Dim s As String =txtbox.text
that I have getting by listbox change value
For the first value its working fine one I have change the list box it got new value to the txtbox but instead of matching it remove all "-" and give as
2015-04-21 VP Checked file
20150414 VP Draft version
20150414 VP Draft version
2015-04-14 VP Draft version
20150414 VP Draft version
2015-04-14 VP Draft version
Bensingh
30-Sep-15 6:49am
View
Thanks a lot for this nearly 2 hours I have spend
Bensingh
27-Sep-15 10:26am
View
Thanks a lot
Bensingh
27-Sep-15 6:55am
View
Can you please explain this with my above code please how to implement
Bensingh
22-Jun-15 1:02am
View
Yes I need to show a message when adam is type by user need to show that data not available in the options
Bensingh
10-Jun-15 2:20am
View
Thanks a lot.
I'm new to .net sorry if I disturbed a lot
Bensingh
9-Jun-15 23:59pm
View
I need to display it in the text box value as
2015-04-22 JV RM Save your list here
2014-12-28 SV See Word Image in the mail
2014-12-21 SV See word document0
2014-12-15 SV See word
2014-11-09 SV First small items to start programming here. See the pdf in attach
2014-11-09 SV First small items to start programming here
No need of headings aDate aMessage.
Is it possible
Bensingh
9-Jun-15 9:57am
View
How to display the output in a textbox value on button click
Bensingh
9-Jun-15 7:29am
View
need to output as
2015-04-22 JV RM - Save your list here
2014-12-28 SV See Word - Image in the mail
2014-12-21 SV See word document0
2014-12-15 SV See word
2014-11-09 SV First small items to start programming here. See the pdf in attach
2015-01-04 SV I have placed my last version on your computer. If possible start from there
Bensingh
9-Jun-15 7:20am
View
s but we need to remove because the meaning is same if this also removed its most helpful for me
can you please
Bensingh
9-Jun-15 6:44am
View
Ya output as
2015-04-22 JV RM - Save your list here
2014-12-28 SV See Word - Image in the mail
2014-12-21 SV See word document0
2014-12-15 SV See word
2014-11-09 SV First small items to start programming here. See the pdf in attach
2014-11-09 SV First small items to start programming here. See the pdf in attach-
2015-01-04 SV I have placed my last version on your computer. If possible start from there
2014-11-09 SV First small items to start programming here. See the pdf in attach
But in this
You see
2014-11-09 SV First small items to start programming here. See the pdf in attach
2014-11-09 SV First small items to start programming here. See the pdf in attach-
from the above two need to keep one
Bensingh
9-Jun-15 4:56am
View
[EDIT by Maciej Los]
Sub Main
Dim s As String = "2015-04-22 JV RM - Save your list here 2014-12-28 SV See Word - Image in the mail2014-12-21 SV See word document02014-12-15 SV See word2014-11-09 SV First small items to start programming here. See the pdf in attach2014-11-09 SV First small items to start programming here. See the pdf in attach-2014-11-09 SV First small items to start programming here. See the pdf in attach2014-11-09 SV First small items to start programming here. See the pdf in attach-2014-12-15 SV See word2014-11-09 SV First small items to start programming here. See the pdf in attach2014-11-09 SV First small items to start programming here"
Dim searchTerm As New System.Text.RegularExpressions.Regex("(\d{4}-\d{2}-\d{2})")
Dim matches = From match In searchTerm.Matches(s) Select New With { _
match.Value, _
match.Index _
}
Dim matchedValues = From m In matches _
Let RowNo = increment _
Select New With { _
Key .Index = RowNo, _
Key .[Date] = m.Value, _
Key .GetTextFrom = m.Index, _
Key .GetTextLength = matches.Skip(RowNo).Take(1).[Select](Function(a) a.Index - m.Index).FirstOrDefault() _
}
Dim lines As New List(Of String)()
For Each line In matchedValues
Dim sTmp as String = s.Substring(line.GetTextFrom, If(line.GetTextLength = 0, s.Length - line.GetTextFrom, line.GetTextLength))
If Not lines.Contains(sTmp) Then lines.Add(sTmp)
Next
End Sub
' Define other methods and classes here
Public Shared Function increment() As Integer
Static i As Integer
i = i + 1
Return i
End Function
Bensingh
9-Jun-15 4:26am
View
yes is it possible
Bensingh
9-Jun-15 4:17am
View
from our Result #3 (lines)
we need only these
2015-04-22 JV RM - Save your list here
2015-01-04 SV I have placed my last version on your computer. If possible start from there
2014-12-28 SV See Word - Image in the mail
2014-12-21 SV See word document0
2014-12-15 SV See word
2014-11-09 SV First small items to start programming here. See the pdf in attach
Bensingh
9-Jun-15 2:55am
View
los another one help need output as
2015-04-22 JV RM - Save your list here
2015-01-04 SV I have placed my last version on your computer. If possible start from there
2014-12-28 SV See Word - Image in the mail
2014-12-21 SV See word document0
2014-12-15 SV See word
2014-11-09 SV First small items to start programming here. See the pdf in attach
is it possible
Bensingh
28-May-15 4:50am
View
Thanks a lot
Bensingh
28-May-15 2:08am
View
On using this the date get deleted
Bensingh
20-Jan-15 1:18am
View
in that instead of c:\temp\zip its just taking tha value as & path &
Bensingh
17-Dec-14 8:17am
View
CHill60 please guide me
Bensingh
17-Dec-14 8:16am
View
public class NumberToEnglish
{
string[] singleDigit = new string[] { "", "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine" };
string[] tenTeens = new string[] { "Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen" };
string[] tyies = new string[] { "Twenty", "Thirty", "Forty", "Fifty", "Sixty", "Seventy", "Eighty", "Ninety" };
string[] groups = new string[] { "Hundred", "Thousand", "Million", "Billion" };
public string convertNumber(string number)
{
int decimalPart = 0;
int wholePart = 0;
if (number.Contains(".") && int.Parse(number.Split('.')[1]) > 0)
{
wholePart = int.Parse(number.Split('.')[0]);
string deci = number.Split('.')[1];
if (deci.Length > 2) deci = deci.Substring(0, 2);
decimalPart = int.Parse(deci);
return recurParse(wholePart) + " and " +decimalPart+ "/100" ;
}
else
{
wholePart = int.Parse(number.Split('.')[0]);
return recurParse(wholePart);
}
}
string recurParse(int number)
{
string retValue = "";
if (number < 10)
retValue = singleDigit[number];
if (number < 20 && number >= 10)
retValue = tenTeens[number % 10];
if (number < 100 && number >= 20)
retValue = tyies[(number / 10) - 2] + " " + singleDigit[number % 10];
if (number < 1000 && number >= 100)
retValue = recurParse(number / 100) + " " + groups[0] + " " + recurParse(number % 100);
if (number < 1000000 && number >= 1000)
retValue = recurParse(number / 1000) + " " + groups[1] + " " + recurParse(number % 1000);
if (number < 1000000000 && number >= 1000000)
retValue = recurParse(number / 1000000) + " " + groups[2] + " " + recurParse(number % 1000000);
if (number >= 1000000000)
retValue = recurParse(number / 1000000000) + " " + groups[3] + " " + recurParse(number % 1000000000);
return retValue;
}
}
Bensingh
14-Nov-14 5:06am
View
For your link
Bensingh
14-Nov-14 5:06am
View
Thanks Richard
Bensingh
14-Nov-14 4:59am
View
I don't know the class files so asking how to do
I am new to Vb.net
Bensingh
12-Nov-14 7:34am
View
Private Sub Cmd_Openinmap_Click(sender As Object, e As EventArgs) Handles Cmd_Openinmap.Click
Dim Lat As String = Txt_Map_Latitude.Text
Dim Lng As String = Txt_Map_Longitude.Text
Process.Start("http://maps.google.com/?q=lat+lng&t=h&z=17")
End Sub
I have to get the lat and lng values in the url
Bensingh
12-Nov-14 7:28am
View
I am new to .net its not a matter i need the values of the longitude and latitude
what i have given it may add to the process start URl
Bensingh
3-Nov-14 7:19am
View
is it any solution for this
Bensingh
9-Oct-14 5:08am
View
void showprogress()
{
if (reporttype.SelectedValue == "1")
{
pre1.Enabled = true;
pre2.Enabled = true;
pre3.Enabled = true;
pre4.Enabled = true;
pre5.Enabled = true;
pre6.Enabled = true;
pre7.Enabled = true;
pre8.Enabled = true;
pre9.Enabled = true;
pre10.Enabled = true;
pre11.Enabled = true;
pre12.Enabled = true;
pre13.Enabled = true;
curr1.Enabled = true;
curr2.Enabled = true;
curr3.Enabled = true;
curr4.Enabled = true;
curr5.Enabled = true;
curr6.Enabled = true;
curr7.Enabled = true;
curr8.Enabled = true;
curr9.Enabled = true;
curr10.Enabled = true;
curr11.Enabled = true;
curr12.Enabled = true;
curr13.Enabled = true;
curr14.Enabled = true;
curr15.Enabled = true;
}
else
{
pre1.Enabled = false;
pre2.Enabled = false;
pre3.Enabled = false;
pre4.Enabled = false;
pre5.Enabled = false;
pre6.Enabled = false;
pre7.Enabled = false;
pre8.Enabled = false;
pre9.Enabled = false;
pre10.Enabled = false;
pre11.Enabled = false;
pre12.Enabled = false;
pre13.Enabled = false;
pre10.Enabled = false;
curr1.Enabled = false;
curr2.Enabled = false;
curr3.Enabled = false;
curr4.Enabled = false;
curr5.Enabled = false;
curr6.Enabled = false;
curr7.Enabled = false;
curr8.Enabled = false;
curr9.Enabled = false;
curr10.Enabled = false;
curr11.Enabled = false;
curr12.Enabled = false;
curr13.Enabled = false;
curr14.Enabled = true;
curr15.Enabled = true;
}
}
protected void reporttype_SelectedIndexChanged(object sender, EventArgs e)
{
showprogress();
}
Bensingh
9-Oct-14 5:06am
View
Deleted
void showprogress()
{
if (reporttype.SelectedValue == "1")
{
pre1.Enabled = true;
pre2.Enabled = true;
pre3.Enabled = true;
pre4.Enabled = true;
pre5.Enabled = true;
pre6.Enabled = true;
pre7.Enabled = true;
pre8.Enabled = true;
pre9.Enabled = true;
pre10.Enabled = true;
pre11.Enabled = true;
pre12.Enabled = true;
pre13.Enabled = true;
curr1.Enabled = true;
curr2.Enabled = true;
curr3.Enabled = true;
curr4.Enabled = true;
curr5.Enabled = true;
curr6.Enabled = true;
curr7.Enabled = true;
curr8.Enabled = true;
curr9.Enabled = true;
curr10.Enabled = true;
curr11.Enabled = true;
curr12.Enabled = true;
curr13.Enabled = true;
curr14.Enabled = true;
curr15.Enabled = true;
}
else
{
pre1.Enabled = false;
pre2.Enabled = false;
pre3.Enabled = false;
pre4.Enabled = false;
pre5.Enabled = false;
pre6.Enabled = false;
pre7.Enabled = false;
pre8.Enabled = false;
pre9.Enabled = false;
pre10.Enabled = false;
pre11.Enabled = false;
pre12.Enabled = false;
pre13.Enabled = false;
pre10.Enabled = false;
curr1.Enabled = false;
curr2.Enabled = false;
curr3.Enabled = false;
curr4.Enabled = false;
curr5.Enabled = false;
curr6.Enabled = false;
curr7.Enabled = false;
curr8.Enabled = false;
curr9.Enabled = false;
curr10.Enabled = false;
curr11.Enabled = false;
curr12.Enabled = false;
curr13.Enabled = false;
curr14.Enabled = true;
curr15.Enabled = true;
}
}
protected void reporttype_SelectedIndexChanged(object sender, EventArgs e)
{
showprogress();
}
Show More