I'm trying to make code that inserts something into a textbox. However, it appears the insert and remove code isn't working. Here's the
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim a As Integer = TextBox2.SelectionStart
[Code]....
Hi
I could sure use some help. In a form of a push in the right direction. I am tryig to remove all multiple tcode (stock name) and add (if tcode is "B" add the shares and if tcode is "S" subtract the shares) them together in just one line of text in a label and if the shares add up to 0 after subtracting the shares bought and sold than don't add it to the the label.The following are my total trasactions for id# 111
tid , tcode , ttype , tshares , tprice
111 frd B 500 $300.00
111 frd S 100 $320.00 (500- 100 = 400)
111 frd S 100 $250.00 (400 - 100 = 300)
When I hit the summary button it should display
tid , tcode , tshares , tprice
111 frd 300 $275.00
I know I am only working with total shares(tshares), Im not sure how to put it so it will read only one line of the frd stock. I think I have to subtract each stock as it goes in a loop but I am not sure how to apply it to my code. I already used a loop to read each line, I think I need a for loop somewhere. I tried puting it in different locations but it will not work..here my code.
Private Sub btnSummary_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSummary.Click
Dim tid As String = ""
Dim tcode As String = ""
[code]....
This was sort of discussed in another topic i made, but it went a little off topic, so i'm making a new thread. Anyways
vb
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim archiveHandle As IntPtr
Dim archiveName As String = "C:Users#DesktopWarcraft IIIwar3.mpq"
[code]....
Notes:I Also have a feeling it has to do with the flags on MpqAddFileToArchive, because i'm using 0 but the documentation has flags like MAFA_COMPRESS, though i have no idea how to use them?
What I am trying to do is have a class where the functions of the same name are both instance functions and shared functions.
Public Shared Function Get...(byval xx as xx)
and
Public Function Get...
The Public Function uses a Property xx created in the constructor, whereas the Shared Function has the parameters (byval xx as xx).
1. I copy file xxx.yy from my C: drive to drive F: , which is a USB memory stick, and then execute the following code to get the date from both files:
[Code]...
I figured out my more recent issue, which took me 2 days all because my string functions are giving errors in VBScript using MSScriptControl, but any function that returns another datatype value is returning correctly.
[Code]...
I am using the following lines and am not able to concatenate the needed values, why it is not working.
Dim rxBuffer As String = " "
Dim rxData As String = " "
Dim rxDataStringBuilder As New StringBuilder[code].....
1) Is it possible to access the Excel mathematical functions without actually opening Excel?
I was thinking of through a DLL WinAPI call or maybe a delegate function or smaller program?
2) Does anyone know of a MS link or area that gives instruction on "how to" use every function of every Windows DLL at all?
Or for all those that Microsoft have chosen to document online at least.
While converting types, I have found myself using both VB functions and BCL Convert.To* methods.
E.g.)
Cstr() vs. Convert.ToString()
CInt() vs. Convert.ToInt32()
CDbl() vs. Convert.ToInt64()
etc...
Are there any subtle differences that should be noted?
Is there a way to see exactly what the functions are doing. What i mean is there a way to see the class? I know what it does, i just want to know the code.
For example the function: Membership.FindUsersByName()
On my project, If I do String.Contains, Even if its positively true (Made a MsgBox Popup) It returns false! My Code:
Dim bad As Boolean = False
For Each item As String In adlist
If e.Url.Contains(item) Then
[code].....
DB="Source={SQL Server};Server=CALVINRUKA-PCSQLCALVIN;DataSource=DWDSCalTables;Uid=sa;PWD=;Trusted-Connection=Yes;"
I using SQL Server 2008 R2 to connect with HTML page. I trying to connect HTML page with login to SQL Database. I have try called the Source but didnt work.
I am reading a text file and I need to replace a few areas with new text that I marked with {0}, {1}, {2}, {3}, {4}, {5}, {6}. So I load in the text, save it to a string variable, and then use String.Replace but it's not working.
For i As Integer = 0 To 6
fileText.Replace("{" & i & "}", DisplayStudentData(i))
Next[code].....
I put all the data items into an array, then did this after loading the text file:
fileText = String.Format(fileText, dArr(0), dArr(1), dArr(2), dArr(3), dArr(4), dArr(5), dArr(6))
Is this a good way of doing it?
I am trying to display a number, stored in a dataset as a string, as a phone number. I have a label that Binds to a value but doesn't display the format that I passed as an arg:
<asp:Label ID="lbl005108002" runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "phone number", "{0:(###) ###-####}") %>'></asp:Label>
As a test I tried to pass the formated string into the dataitem but that didn't work either. Is there something else I need to do in order to use this function?
m_Row("phone number") = String.Format("{0:(###) ###-####}", value)
The value displays in both cases as: 04152543926
I have the following connection string set:
[Code]...
I have a hard coded connection string that DOES work just fine-
Public urlMySQLDatabase1 As String = "Server=170.200.80.90;port=3300;Database=DatabaseName;Uid=UserID;Pwd=Password;"
[code]......
why my format string(fmtstr) will not work. Here is my code.
[Code]...
I have a SQL query string that gets the top 5 records from a database however 3 variables are passed with the sql query that gets specific data.[code]
View 5 RepliesI have the below code that if there is no .wav file in the current directory then it goes to the default windowsmedia directory to play a random .wav file.
But for some reason if there is no file in the current folder it will not go to the windowsmedia folder, do I have something wrong?
Dim FileNames As String() = System.IO.Directory.GetFiles(".", "*.wav")
Dim FileNames2 As String() = System.IO.Directory.GetFiles("C:WindowsMedia", "*.wav")
[Code]....
What am I doing wrong here?
[Code]...
Update 1 This is the original string: This is what it looks like after my VB code: As you can see, the http: part is added, however the backslashes haven't been touched. Update 2 It has something to do with the slashes. Because when I replace other characters (for example a with @), then the replaced string is shown correctly. But not the slashes
Here's my code
Dim RefsUpdate As String() = Session("Refs").Split("-"C)
Dim PaymentsPassedUpdate As String() = Session("PaymentsPassed").Split("-"C)
[code].....
Or there's another way to make it, without adding a Connection String?
View 3 RepliesI am trying to check if a string is numeric but in vain. here is my code:
If Val(fnumField.Text.Trim) > 0 Or fnumField.Text.Trim = "0" Or Val(phnField.Text.Trim) > 0 Or phnField.Text.Trim = "0" Or Val(ophnField.Text.Trim) > 0 Or _
ophnField.Text.Trim = "0" Or Val(treeField.Text.Trim) > 0 Or treeField.Text.Trim = "0" Then
[code].....
I am facing a really very interesting problem with string.
My code is
[Code]....
But when I comment those lines (which are uncommented in code above) its working fine.
I am taking value in filepath variable from file dialog's FileName property.
EDIT: I have also compared the values of variable stropt and strwithpara with "IF" condition and found those are same.
vb.net
[Code]...
"The Vodafone Warriors under 20 side has lost in the last minute of their Toyota Cup final's match just moments ago.<br> <br> A Warriors Media release will be post as soon as it's sent." Can someone see why this would not work?
I have started researching Reactive extensions and I would like to know how to do the following (ill try and keep it simple):
1) have a list of string (or any other type)
2) when an item is added to the said list, do something with it...
Guess im just kinda stuck where to start :/
I am using VBNET2008 and SQL SERVER 2000.I tried to create this SQL string to retrieve CustomerID and a CustomerID and Name together but it's not working.Here are the SQL String that is not working.
Dim strsql As String = ""
strsql &= "Select CustomerID, "
strsql &= " ( CustomerID & " - " & CompanyName ) as [Companyname]"
strsql &= " From TestCustomers Order by CompanyName"
This is the error message"Conversion from string "Select CustomerID, CustomerID & " to type 'Double' is not valid.
Cause by this SQL String coding:
strsql &= " CustomerID & " - " & CompanyName as [Companyname]"
I am using the NORTHWIND DatacBase in SQL SERVER 2000 and the table is Customers
Public Function TitleCase(ByVal strIn As String)
Dim result As String = ""
Dim culture As New CultureInfo("en", False)
Dim tInfo As TextInfo = culture.TextInfo()
result = tInfo.ToTitleCase(strIn)
Return result
End Function
If I input "TEST" into the function above. The output is "TEST". Ideally it would output "Test". I also tried the code snippets from this post to no avail: Use of ToTitleCase.
I am using Virtual Basic with ASP.NET in Visual Studio 2008. I am using Webmethod to communicate from/to the server with the client. Data can be queried and returned in small amount, but when I try get a relatively large amount of data, it's returning me a Server 500 error. My data is 226561 character long, so it's not that large, but it's relatively larger than my other working testing set, which are about 10k character long.
JavaScript:
PageMethods.my_func("context", success);
function success(result, userContext, methodName) {
[code].....
My Requirment is to Leave Blank space to the right of the each Lable (String) in Chart in SSRS.
Using Custom VB.NET Function, i want to Pass String Lable to VB.NET Function and then Function Return String with Padding Blank Space to the right of String.
Example :Lable String is : "United States of America"
My Lable output should be : "United States of America "
How can we achieve ?
Let me know if you need mor information.
is there any other way to achieve this ?