•
•
•
•
What is DaniWeb IT Discussion Community?
You're currently browsing the VB.NET section within the Software Development category of DaniWeb, a massive community of 374,011 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 2,862 IT professionals currently interacting right now! Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.
Please support our VB.NET advertiser:
Views: 906 | Replies: 14 | Solved
![]() |
•
•
Join Date: Mar 2008
Posts: 115
Reputation:
Rep Power: 1
Solved Threads: 0
hey I faced the interview Question -
Name Textbox
EMail Textbox
Mobile Textbox
Button-ADD
First he told me to add the three textboxes values into the listbox.
Its simple--I have done it.
Listbox1.items.add(me.textbox1.text & " " & me.textbox2.text & " " & me.textbox3.text)
Then he told me that draw one more button -PRINT & on PRINT Button click the listboxes
information are exported to EXCEL to the individual columns.
Means name in first column & email in second column & Mobile in Third Column.
Plz send me the coding of this bz I have no idea from where to start it.
Name Textbox
EMail Textbox
Mobile Textbox
Button-ADD
First he told me to add the three textboxes values into the listbox.
Its simple--I have done it.
Listbox1.items.add(me.textbox1.text & " " & me.textbox2.text & " " & me.textbox3.text)
Then he told me that draw one more button -PRINT & on PRINT Button click the listboxes
information are exported to EXCEL to the individual columns.
Means name in first column & email in second column & Mobile in Third Column.
Plz send me the coding of this bz I have no idea from where to start it.
Go to Project -> References -> Microsoft Excel 10.0 Object Library
Then add this following code :
Then add this following code :
vb Syntax (Toggle Plain Text)
Dim MsExcel As Excel.Application Private Sub Command1_Click() MsExcel.Workbooks.Add MsExcel.Range("A1").Value = List1.List(0) MsExcel.Range("B1").Value = List1.List(1) MsExcel.Range("C1").Value = List1.List(2) MsExcel.Visible = True End Sub Private Sub Command2_Click() With List1 .AddItem (txtName.Text) .AddItem (txtEmail.Text) .AddItem (txtMobile.Text) End With End Sub Private Sub Form_Load() Set MsExcel = CreateObject("Excel.Application") End Sub
Never tried = Never Know
So, Please do something before post your thread.
* PM Asking will be ignored *
So, Please do something before post your thread.
* PM Asking will be ignored *
•
•
Join Date: Mar 2008
Posts: 115
Reputation:
Rep Power: 1
Solved Threads: 0
HI Jx_Man, I want the code in VB.net ,but its a Vb Code...Rite????????
i do the foll. steps--
Go to project-->Add Refernce->Microsoft Excel 11.0 Object Library
cz there is noo Microsoft Excel 10.0 Object Library in Vb.net
Plz tell me y there are two commands buttons in the code given as above--
I want just the one command button Print.
Where I have to write the above steps......on print_click
My code is as under---
Public Class Form2
Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click
ListBox1.Items.Add(Me.txtname.Text & " " & Me.txtmail.Text & " " & Me.txtmob.Text & " " & Date.Now)
End Sub
Dim MsExcel As Excel.Application
Private Sub btnprint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnprint.Click
End Sub
End Class
i do the foll. steps--
Go to project-->Add Refernce->Microsoft Excel 11.0 Object Library
cz there is noo Microsoft Excel 10.0 Object Library in Vb.net
Plz tell me y there are two commands buttons in the code given as above--
I want just the one command button Print.
Where I have to write the above steps......on print_click
My code is as under---
Public Class Form2
Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click
ListBox1.Items.Add(Me.txtname.Text & " " & Me.txtmail.Text & " " & Me.txtmob.Text & " " & Date.Now)
End Sub
Dim MsExcel As Excel.Application
Private Sub btnprint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnprint.Click
End Sub
End Class
oh... i m so sorry...
yeah that codes for vb 6, but there are same code for vb.net.
this following code for vb.net.
- button 1 for add item from textbox to listbox.
- button 2 to add all item in listbox to excel.
- Declare Dim MsExcel As Excel.Application in top of all event. don't declare it on event cause it be a global variable.
- You can modified it as u needed.
yeah that codes for vb 6, but there are same code for vb.net.
this following code for vb.net.
vb.net Syntax (Toggle Plain Text)
Dim MsExcel As Excel.Application Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load MsExcel = CreateObject("Excel.Application") End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click With ListBox1.Items .Add(txtName.Text) .Add(txtEmail.Text) .Add(txtMobile.Text) End With End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click MsExcel.Workbooks.Add() MsExcel.Range("A1").Value = txtName.Text MsExcel.Range("B1").Value = txtEmail.Text MsExcel.Range("C1").Value = txtMobile.Text MsExcel.Visible = True End Sub
- button 2 to add all item in listbox to excel.
- Declare Dim MsExcel As Excel.Application in top of all event. don't declare it on event cause it be a global variable.
- You can modified it as u needed.
Last edited by Jx_Man : May 11th, 2008 at 5:32 am.
Never tried = Never Know
So, Please do something before post your thread.
* PM Asking will be ignored *
So, Please do something before post your thread.
* PM Asking will be ignored *
•
•
Join Date: Mar 2008
Posts: 115
Reputation:
Rep Power: 1
Solved Threads: 0
hi Jx_Man,THX VERY VERY MUCH.
Hey if want also that when the record goes to excel,individual columns have name also like name,email,mobile.
then?????
Hey tell me one thing if u want,how u know so much of coding...like this question......this coding u done it by urself..........or thru book. Hey plz tell me also na,i will be very thankfull to you.
Hey if want also that when the record goes to excel,individual columns have name also like name,email,mobile.
then?????
Hey tell me one thing if u want,how u know so much of coding...like this question......this coding u done it by urself..........or thru book. Hey plz tell me also na,i will be very thankfull to you.
•
•
Join Date: Oct 2007
Location: Bristol, UK
Posts: 1,122
Reputation:
Rep Power: 3
Solved Threads: 46
•
•
Join Date: Oct 2007
Location: Bristol, UK
Posts: 1,122
Reputation:
Rep Power: 3
Solved Threads: 46
My advice is stick with it and study. Nobody ever became a code guru overnight :-) Practice practice practice. Oh and some good tutorials will help too.
Here is one I found that looks promising.
Here is one I found that looks promising.
If you have a quality, be proud of it and let it define you. Add it to the world!
If you got your answer, please mark the thread as Solved. It saves time when people are looking to contribute threads or for answers!
If you got your answer, please mark the thread as Solved. It saves time when people are looking to contribute threads or for answers!
i learn from many resource friend.
from books (i have many books), internet (google), Asking from anybody and trying it by myself. like my signature Never tried Never Know
Actually this forum is a great place to learn, many people with different experience will give u a many example in different type.
Microsoft supplied MSDN, looks for function that u dont know there.
from books (i have many books), internet (google), Asking from anybody and trying it by myself. like my signature Never tried Never Know

Actually this forum is a great place to learn, many people with different experience will give u a many example in different type.
Microsoft supplied MSDN, looks for function that u dont know there.
Never tried = Never Know
So, Please do something before post your thread.
* PM Asking will be ignored *
So, Please do something before post your thread.
* PM Asking will be ignored *
![]() |
•
•
•
•
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
•
•
•
•
•
•
•
•
DaniWeb VB.NET Marketplace
•
•
•
•
access advice broadband business classification code combo crime cult of the dead cow daniweb data data protection data transfer database drive dropdownlist encryption europe forensic forensics gadget google government hacking hard hardware help hitachi hp industrial espionage information internet linux mobile module net news payment services privacy protection reuse search security spot storage terabyte tutorials and more tv web wikipedia
- Previous Thread: Security Exception
- Next Thread: in need of serious help here....



Linear Mode