Good morning sirs and ma'ams,
I am trying to maximize an mdichild within an mdiparent then setting its maximizedbox property to false such that:
frm.windowstate = formwindowstate.maximized
frm.maximizedbox = false
But, the maximizedbox/"restorebox" resets to true after the...
Sorry but the youtube site is banned here at work so, I am unable to see what exactly it is you want. Anyways, creating a login form is relatively simple in vb 2005. All you have to do is right-click your project in the solutions explorer then select add>windows form. In the dialog box that...
'Assuming the 4 forms are already shown within your mdiParent
Private Sub TabControl1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
Select Case TabControl1.SelectedIndex
Private Sub GingerDoesEmAll()
Dim dv As DataView = dt.DefaultView
Dim dr As DataRowView
dv.Sort = "User"
Dim pos As Integer = dv.Find(txtUser.Text)
If pos > -1 Then
dr = dv.Item(pos)
dr = dv.AddNew()...
private sub something()
dim discountinteger as integer = 0
for each customer in ???
if discount > 30 and [code to ensure counting for only once per customer] then
discountinteger = discountinteger + 1
note: alternatively, if you have a datasource for your customers, you...
'assuming that your datasources and dataview has already been set up
dv.sort = "dataproperty1, dataproperty2, ... ASC"
'this will sort the specified dataproperties ascending (use DESC to sort descending)
the rowsadded is fired everytime a row is written onto your grid. that means while the fill does what it usually does, each record read from your database is inserted into your grid. you can check this by placing a msgbox(grid.count) to show how many rows have been written onto your grid.
I think Windows has restrictions over running exe's in shared folders. Microsoft has disabled this feature due to security reasons. Imagine if an exe can be started from a shared folder, hackers can breach your company's security like a sitting duck. Though I don't know if exceptions can be...
'assuming that you have already set your listbox's datasource to bsnames
private sub txt1.textchanged()
if txt1.text = "" then
bsnames.filter = "Names='" & txt1.text & "'"
I've already did a similar thing on my lottery numbers generator. It always get 6 different numbers from 1 to 45. What I did was a random-then-compare-approach such as after doing a random for the next result, I check to see if it is equal to the previous then do a random if necessary. For your...
To add items in the combobox during design-time just see the Collections property.
To add a new item in the combobox through code, enter cbo1.items.additem("item")
To remove an item, cbo1.items.remove("item")
'Assuming all controls are not binded
Private Sub 1btnDoesEmAll_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 1btnDoesEmAll.Click
Dim pos as Integer
pos = bsUserAccounts.Find(User, txtUser.Text)
If pos > 0 then
bsUserAccounts.Position = pos...
To bind the form to your keystrokes, search about the property KeyPreview.
To add the minimize and maximize buttons beside the exit button, set the MinimizeBox or MaximizeBox properties.
To add your personal button, you might have to draw your own form.