|
'Counting Values of Database
s = "Select srno from cash"
com = New OleDbCommand(s, con)
con.Open()
dr = com.ExecuteReader
While dr.Read
n = dr(0)
End While
con.Close()
'Selecting Account Type
s = "Select account from cash"
com = New OleDbCommand(s, con)
con.Open()
dr = com.ExecuteReader
While dr.Read()
a = dr(0)
End While
con.Close()
For i = 1 To n
Dim mShowMenuItem As MenuItem
mShowMenuItem = DirectCast(sender, MenuItem)
mShowMenuItem.MenuItems.Clear()
Dim mSubSubMenuItem3 As New MenuItem
mSubSubMenuItem3 = New MenuItem
mSubSubMenuItem3.Index = i
mSubSubMenuItem3.Text = a mSubSubMenuItem3.Enabled = True
mSubSubMenuItem3.Visible = True
AddHandler mSubSubMenuItem3.Click, AddressOf MenuClickHandler
mShowMenuItem.MenuItems.Add(mSubSubMenuItem3)
Next
poonam
|
|
|
|
|
Create a MenuItem object set its properties according to your requirements then add it to your main menu then declare its Click event handler and use AddHandler to connect it with the click event of the created menu item object.
Hope it helps !
AliAmjad(MCP)
|
|
|
|
|
thanx for ur reply.But I don't know how to start.Can u explain it by coding.plz it very urgent.plz help me
poonam
|
|
|
|
|
the below code generating a single menu.it was not working properly.I don't know hw to proceed???
[code]
For i = 1 To n
s = "Select account from cash"
com = New OleDbCommand(s, con)
con.Open()
dr = com.ExecuteReader
While dr.Read()
a = dr(0)
b = a
'End While
'con.Close()
'For i = 1 To n
Dim mShowMenuItem As MenuItem
mShowMenuItem = DirectCast(sender, MenuItem)
mShowMenuItem.MenuItems.Clear()
Dim mSubSubMenuItem As MenuItem
' This second sub menu item causes a problem:
mSubSubMenuItem = New MenuItem
mSubSubMenuItem.Index = i
mSubSubMenuItem.Text = b
mSubSubMenuItem.Enabled = True
mSubSubMenuItem.Visible = True
AddHandler mSubSubMenuItem.Click, AddressOf MenuClickHandler
mShowMenuItem.MenuItems.Add(mSubSubMenuItem)
i = i + 1
End While
con.Close()
Next
poonam
|
|
|
|
|
halllooo
I create report with list...I have 2 list. list1 is main list, list1 have list2.
list1 group by year, in list1 I have textbox sum(SIZE) -> group by year
in list2 group by treeage , in list2 I have textbox, the value is SUM(SIZE)-> group by treeage / SUM(SIZE) group by year.
me problem is, how get data from different list in different group.
|
|
|
|
|
Hi!
In my classic asp page if the session time out and user try to interact with the system it redirect to login page but once it logs in it doesnt redirect to earlier request made by user but need to start from beginning again. is there any way i could redirect to previous requested page.
please help
-- modified at 2:03 Tuesday 30th October, 2007
|
|
|
|
|
This is a question for the ASP.NET Forum. It really doesn't have anything to do with VB or VB.NET.
|
|
|
|
|
DataGridView Help... Manual Loading of ACCESS Records into DataGridView
I have read such an article and code about mannual loading of records from database into datagridview not by means of "DataReader and FOR LOOP" looping process to each rows and cells to put each corresponding value..
instead? he just use an OleDataAdapter to fill a DataTable and set the "DatagridView.AutoGenerateColumns = false" then he set DataGridView.DataSource = DataTable that he made..
for him it works.. but for me i dont know what's lacking in my code.. there's no error occur but the records doesn't display inside my pre-defined column inside my datagridview.. instead? it just generate a blank row with the same rowCount of my table inside my database..
but when i set my DataGridView.AutoGenerateComlumn = true?
then it display on system way.. but not in the way i wanted it to be display inside my custom column inside the datagridview....
here's my sample code...
************
Dim oleDataAdapter1 As OleDbDataAdapter
Dim OleCommandBuilder1 As OleDbCommandBuilder
Dim dbDataSet As New DataSet()
Dim tempDataTable As DataTable = dbDataSet.Tables.Add("tempTable")
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
oleConnection.ConnectionString = dbConnectionString
oleConnection.Open()
oleCommand = New OleDbCommand("Select * From tempTable", oleConnection)
oleDataAdapter1 = New OleDbDataAdapter(oleCommand)
OleCommandBuilder1 = New OleDbCommandBuilder(oleDataAdapter1)
oleDataAdapter1.Fill(tempDataTable)
With DataGridView1
.AutoGenerateColumns = False
.DataSource = tempDataTable
End With
Catch ex As Exception
MsgBox(ex.ToString())
Finally
oleCommand.Connection.Close()
End Try
End Sub
**************
Note:
I have 4 column created inside the datagridview..
columnName(ID,NAME,DATE,AGE) dataType(string,string,date,number)
I know.. you can laugh at me.. just can't figured it out.. ehehe... please help...
Please anyone there who has much deeper experience and knowledge in vb programming who can help me with this??? please.. a lot of appreciation in advance... please...
|
|
|
|
|
What does the column generation code look like?? You're probably missing setting the DataPropertyName for each column. This tells the column which column in the DataSource to bind to.
|
|
|
|
|
Sorry I'am from Mexico, my english es very mistaken.
I need mix Assembly language with VB 2005.
I need get a information of the PC ( RAM, HD size ) with
a aplication assembler and display the information in my
WinForm of Visual Basic 2005.
thanks for your aid !!!
|
|
|
|
|
|
You can't mix assembler into a VB.NET app. Besides, what you want can be accomplished much easier with Windows Manangement Instrumentation (WMI) and the classes in System.Management namespace.
|
|
|
|
|
Sorry.
Can I connect a program of assembly language to my application in VB ?
Scan my PC from the program assembly and connect to ny aplication. is it possible?
sorry, my english is very bad.
Mexico
OrLaNdO HeRReRa
|
|
|
|
|
rammsteinohr wrote: Can I connect a program of assembly language to my application in VB ?
All native machine code is already in machine language. You can write assembly code that is in a .dll and called from .NET. How to do so is beyond a forum post. There is an article around here at CP about it.
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Yeah, it can be done. But how you communicate with that assembly code is entirely up to how that code is written. Without knowing how the assembly code expects you to call it and receive return values, it's impossible to say.
|
|
|
|
|
so, as I can create a DLL in assembly language?
where search Information about it ?
give me the URL or LINK please !!!
|
|
|
|
|
There is very little on assembly language under Windows because hardly anyone ever uses it.
Why are you fixated on assembly?? What are you doing that makes you think you require it?
|
|
|
|
|
Is a School project, is hibrida or hybrid programming ("programacion hibrida" in spanish). The teacher say: "Use Assembly Code with another language (mixing)". And i want programmin VB 2005 with Assembly language......
But the information is little.....if you can help me....i will happy
Thanks !!!
|
|
|
|
|
You're going to have to create two seperate project. An assembly language project compiled with an assembler, or you could write in-line assembly into a C++ component, which compiles to a .DLL, and a seperate VB.NET project to consume the library functions you write.
Google for "Windows assembly language" if you want examples.
|
|
|
|
|
Hi,
I haven't programmed in VB6 and I have this project to convert from vb6 Vvb.net
Can you help me to convert the following lines to vb.net
Public Declare Function DirectoryNumToTapiDeviceID Lib "tapihlpr" _
(ByVal hLineApp As Long, ByVal szDN As String) As Long
and
Public SysOptions As tSysOptsRec
Public iSystemStatus As Integer
' Per call data elements
Public iMaxChannel As Integer
Public iMinChannel As Integer
Public CallData() As tCallDataRec
thanks
|
|
|
|
|
Public Declare Function DirectoryNumToTapiDevice Lib "tapihlpr" ( _
ByVal hlineApp As Integer, ByVal szDN As String) As Integer
Public SysOptions As tSysOptsRec
Public iSystemStatus As Short
' Per call data elements
Public iMaxChannel As Short
Public iMinChannel As Short
Public CallData() As tCallDataRec
Of course, this does NOT mean that the code will actually work.
|
|
|
|
|
In vb6 all the variables passed to a function are by default by ref so when you have to pass some variable by value you have to give byval explicitly
In vb.net all variables are by default by val, so remove byval it may work
For the variable declaration
Where are u declaring these variables
You can use global for modules then the variable will be accessible in whole of the application
For a form file you can declare at the top in the class to be accessible by all function
Good luck
|
|
|
|
|
I have a bit problem here in ReportViewer.. I have this project where I should translate or convert the MONEY in number(in a textbox) into words(in another textbox) (e.g. 1234--> one thousand two hundred thirty four).
Is it possible to do this in a report document(.rdlc file)?
|
|
|
|
|
You could write a custom function with your report definition to do this.
Do a Google search for code to convert a value into words if you are unsure how to do this.
Paul Marfleet
|
|
|
|
|
In crystal report try to use ToWords(number) with a little customization
Salman Sheikh
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
