|
I need to seach to see if something is in an array and i for the life of me cant figure it out
the array i have is :
Dim department As String() = {"PR", "AD", "CI", "GC", "MK", "ED", "FI", "IT", "HR", "DC", "UN"}
What im trying to do is somthing like
for each userrow as datarow
if department.find(userrow"department"),????) = -1 then (not found)
then
UserRow("department") = "UN"
end if
next
but i just cant get the search to work
What im doing now instead
<br />
For Each UserRow As DataRowView In Me.userbindingsource<br />
Select Case UserRow("department").ToString<br />
Case Is = "PR"<br />
Case Is = "AD"<br />
Case Is = "CI"<br />
Case Is = "GC"<br />
Case Is = "MK"<br />
Case Is = "ED"<br />
Case Is = "FI"<br />
Case Is = "IT"<br />
Case Is = "HR"<br />
Case Is = "DC"<br />
Case Is = "UN"<br />
Case Else<br />
MessageBox.Show(UserRow("Name") & " Has An Invalid Department")<br />
UserRow("department") = "UN"<br />
End Select<br />
Next UserRow<br />
-- modified at 16:27 Sunday 16th July, 2006
|
|
|
|
|
You need to use the Array.IndexOf method and pass it the name of the array and the item you wish to find.
To search the department array you provided in your post for, say, "HR", you would do this:
dim i as Integer = Array.IndexOf(department,"HR")
The i variable would then contain the index of the item, or -1 if it was not found.
Hope this helps,
Keith
|
|
|
|
|
|
Hi there.
You should loop through the array and try to find a match...
Example:
Dim strSearchString As String = " un " ' String to search for...
Dim strArray As String() = {"PR", "AD", "CI", "GC", "MK", "ED", "FI", "IT", "HR", "DC", "UN"} ' Array of strings
Dim intLoop As Integer
Dim mflgFound As Boolean
For intLoop = 0 To UBound(strArray)
If UCase(Trim(strArray(intLoop))) = UCase(Trim(strSearchString)) Then ' Trim and uppercase strings to ensure match
mflgFound = True
Exit For
End If
Next
A programmer's life is good... or is it?? Ek dink nie so nie!
|
|
|
|
|
Hello All,
I have an application in VB.NET 2003, I want to import a delimiter text file into SQL Server. How do I go about doing this with vb.net code?
Please help me out!
regards
Mubashir
|
|
|
|
|
hi Mubashir,
its not clear what kind of process would u like to proceed. assuming you want to insert the data into table from file.try using BULK INSERT statement available on sql server2000. If you want to exec a select query stored in a text file there is no straight method to procede. i've manipulated some different approach for that,
assuming you have entere some "select * from Products" in a text file called test.txt. the steps involved are as,
Declare @cmd varchar(100)
Declare @sqlcmd varchar(2000)
set @cmd = 'type e:\test.txt'
CREATE TABLE #temptable (id int identity(1,1), string VARCHAR(4000))
Insert #temptable
exec master..xp_cmdshell @cmd
Declare @Max int, @Min int
select @sqlcmd=string from #temptable
Drop Table #temptable
Exec(@sqlcmd)
stay smart
|
|
|
|
|
can we add icon to mainmenu control in windows form? how?
thanks. is there a sub or function like "mainmenu.items(x).icon=(filename)... "
|
|
|
|
|
When you sy main menu, are you referring to a menustrip that you have placed on the form.
Posted by The ANZAC
|
|
|
|
|
yes, i am.. i dont know how to add icon to it.
|
|
|
|
|
i dont know about VB.NET.But in VB6 you need to use this API function:
Declare Function ModifyMenu Lib "user32" Alias "ModifyMenuA" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long, ByVal wIDNewItem As Long, ByVal lpString As Any) As Long
This is how you use it in VB6
Get the handle of the form's menu<br />
hMenu = GetMenu(Me.hWnd)<br />
'Get the handle of the form's submenu<br />
hSubMenu = GetSubMenu(hMenu, 0)<br />
<br />
'Change first item (index=0)<br />
picBitmaps(0).Picture = picBitmaps(0).Image<br />
lngID = GetMenuItemID(hSubMenu, 0)<br />
Call ModifyMenu(hMenu, lngID, MF_BITMAP, lngID, CLng(picBitmaps(0).Picture))<br />
i heard VB.NET has some API inbuilt.So look it up OK!
hope i helped
Gideon
|
|
|
|
|
ok, i will try it out, thankz for the info..
Ghost
|
|
|
|
|
I NEED HELP IN VB.NET CAN ANYONE HELP ME PLEASE
I NEED TO SEND A VIDEO FILE THROUGH THE INTERNET USING AN ADSL CONNECTIONS
CAN ANY ONE HELP ME WITH THAT
THX A LOT
YOUR,
MAY
|
|
|
|
|
First, read this[^].
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
HELLO,
i need some help please
i need to send a video file through the internet using an ADSL connection, can anyone help me please??
yours
may
|
|
|
|
|
The type of connection doesn't matter. What does matter is how your sending this file. Is your application a server, streaming the file to a Media Player, or are you trying to upload this file to a web server, FTP server, ...???
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
I'M TRYING TO UPLOAD THE FILE TO A FTP SERVER
|
|
|
|
|
You could have said that in your original post.
Is there some reason why your YELLING?
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Under the .NET Framework 2.0, you can use the WebFtpRequest[^] class. The link is complete with examples.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
thx
|
|
|
|
|
I'm using VB2005, how to make a string to contain double quotes?
and MORE IMPORTANTLY how to replace an existing string to contain double quotes?
eg. FROM visual basic TO vi"sua"l b"asi"c
I appreciate your help.
|
|
|
|
|
In a string, you specify double quotes by using pairs of them:
Dim str As String = "vi""sua""l b""asi""c"
pedestrian797 wrote: how to replace an existing string to contain double quotes?
Smae as you would any other String Replace operation.
' Replace all occurances of ' with "
newStr = str.Replace("'", """")
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
That's great! Thanks ...
|
|
|
|
|
Hi ,
I have been using SQLHelper.vb provided by Microsoft in DAAB
But looking at the long itrating code ..
IS IT ADVISABLE TO USE SQLHelper.VB FOR Applications With Heavy Data Access Rate
Thanx
Vola !!!!
|
|
|
|
|
Chintan Parikh wrote: IS IT ADVISABLE TO USE SQLHelper.VB FOR Applications With Heavy Data Access Rate
I've never had any problems with it, but then again, that all depends on your definition of "Heavy Data Access Rate"!
You could write a smaller test app against the library, simulating what you think your data transactions are going to be, then run your own benchmarks.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
I have written a program that requires a password to be created when it is first run, this is then encrypted and stored on the computer C:/Test.txt. the next time the program is run you enter your password, which is encrypted and compared against the encrypted password on file, and if they match you can use the program.
I don't think storing the encrypted password as C:/Test.txt is a good thing, so where is the best place to hide it away, and how is it done?
Any help, advice or interesting articles will be welcome.
A Clever Man Knows the Answers,
A Wise Man Knows Where to Find Them.
|
|
|
|