Visual Basic Express Edition Forum

Why you should not learn VB!

Sun, 28 Oct 2007 23:07:02 Z

Learning a new programming language is as hard as learning a new language. Most aspects of learning a new language could be point of simile when it comes to learning a new programming language.

Indeed before the brain starts making the necessary connections between its different parts it will take a while, however, a programming language like VB is much more simpler to learn because the language is some form of written English which large number of people know. This is one of the most important aspects of VB which makes is ideal for students. This is not a random fact as during the 1960s Basic (Visual Basic is some sort of Basic) was created to be the programming language that students learn and hence it took advantage of the fact that most English speaking students would already know the language which in turn makes learning a programming language with English as its infrastructure more simple

But why should we learn VB? Or should we not? Of course as discussed above learning VB is simpler than most other programming languages, however, is it capable of performing all the actions that one could perform with other languages? Well the answer to this question is not as straight forward as one might think, but if the language is easy to learn why do other people learn other languages? I think the reason for this is that other languages could provide a better efficiency and performance with some advanced features. So when some advanced coding skills is required VB comes to a dead end at the present time.

I’ll give you a simple example from my personal experience. I coded two identical programs in VB and C#, so both were based on .NET 3.0 and compiled with Visual Studio 2008 beta 2. Then I created a .dll of both codes and linked them to one other code which was able to use the code in the .dll. I then calculated process speed for both codes the results are staggering (They are average results):

VB .NET: 520 KB/s

C# .NET: 934 KB/s

I have to say that the .dll only plays a small part in the program. So when the above data is analysed we could conclude that the .dll produces by VB runs slower than the one produced by C#. So “why learn VB at all?”. I don’t mean that one should not learn VB but I am trying to say is “what is the point of learning VB?” While the same time could be spend learning a language like C or even better C++; which in turn would virtually work on any operating system!

If you are planning to learn VB “DON’T”. Because as you develop new coding skills you would find that VB is limiting your abilities. At this time you will be looking for a new language and indeed you need to start learning from scratch. This means all the time spend becoming fluent in VB was nothing but waste of time. This is only my personal opinion about the language. The first language that I have leant was VB. And I have to mention that I truly respect everyone that codes in VB and everyone else who doesn’t.

I welcome any critisism, spelling mistakes or any other type of comments and I would like to think why I might be biased towards this isuee.

Thanks you

Help you use events and a VB / C# compare question

Wed, 25 Nov 2009 03:53:22 Z

Since i am reworking my current project from scratch with new ways to handle code, i am trying to get out of my vb comfort zone.

So this is an example using events to pass back a value to a parent form from a child form using an event.

This should help those of you out there new to this and it would be a good topic to discuss further to compare a few points to how this might be handled similar to what might be done in C#. Hopefully some C#'ers will post with some thoughts.

I'll start with the child form code

Public Class frmLogin

  Public Event LoginHandled(ByVal LoggedIn As Boolean)

  Private Sub cmdLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdLogin.Click
    If Me.txtPassword.Text = My.Settings.Password Then
      RaiseEvent LoginHandled(True)
    End If
  End Sub

  Private Sub cmdExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdExit.Click
    RaiseEvent LoginHandled(False)
  End Sub

End Class

Above is just a simple form which i am using for a login for the user to enter a password.

There is a public event declared (LoginHandled) with a boolean parameter (LoggedIn). Public to be accessed from other classes through a new instance of the form.

When the login button is clicked, the event is raised with a value of true to show the user has logged in successfully, if the correct password was supplied.

When the Exit button is clicked, the event is raised with the value of false to show the user is not logged in.

Below is the parent code. This is an MDI Parent form (just for example; could be a regular form as well)

Imports System.Windows.Forms

Public Class MDIParent1

  'Private WithEvents LoginForm As frmLogin
  Private LoginForm As frmLogin

  Private Sub MDIParent1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    LoginForm = New frmLogin
    AddHandler LoginForm.LoginHandled, AddressOf LoginHandler
    LoginForm.ShowDialog()
  End Sub

  'Private Sub LoginForm_LoginHandled(ByVal LoggedIn As Boolean) Handles LoginForm.LoginHandled
  'End Sub

  Private Sub LoginHandler(ByVal LoggedIn As Boolean)
    If LoggedIn = True Then
      MsgBox("logged in")
    Else
      MsgBox("not logged in")
      Application.Exit()
    End If
    LoginForm.Close()
    LoginForm.Dispose()
  End Sub

End Class

The frmLogin form is declared as LoginForm. This is declared as a member level variable so it is accessible in several subs in this form class.

In the load event, a new instance of the frmLogin form is created.

A handler is added to the frmLogin (declared as LoginForm) form's LoginHandled event (declared as a public event in frmLogin code), with an address set to the LoginHandler sub in the MDIParent1 code.

The frmLogin is then shown modally so it is the only accessible form, disabling the parent form while working in the login form.

In the LoginHandler sub, a parameter is declared to allow the result of the rasied event to be passed in. A boolean in this case since we will be returning true or false based on whether the user logged in or not.

In this example:
if True is passed in, a messagebox is shown displaying "logged in"
If False is passeed in, messagebox is shown "not logged in"

Whichever result is passed in, the instance of the frmLogin is closed and disposed of since we do not need the form anymore until the next time the parent form is loaded.

You will also see there is a commented out declaration of the frmLogin as Private WithEvents. And you can see the commented out sub LoginForm_LoginHandled. if you declare the form instance WithEvents, this will give you access to the events in the IDE dropdown event list at the top of the form code window. This is gives you access to the events in the class just like any control in the toolbox.

alright, well i hope this helps some of you out there.

The question i have about comparing this to C#: Would a C#'er do it this way as well, and does the IDE also allow to declare WithEvents to have access to the events in the IDE?

I could just try this out in a test C# project but i thought it would help to hear it from C#'er side here in the forum.

FREE DEVELOPER TOOLS, CODE & PROJECTS at www.srsoft.us Database Code Generator and Tutorial

How to print records using crystal report?

Sat, 28 Nov 2009 11:36:56 Z

Hi Guyz! I'm trying to print a record in vb.net(vb2008 express edition) and what I'm familiar with printing was using data report way back when i was in vb6.0 but when i moved to vb.net lately i heard about using crystal report but im not familiar with it so i don't really know how to start with.I know it sounds like im depending too much but what im just trying to ask is a little favor just to give me a brief heads up to start with it in a first place and i'll do the rest. For example,I would like to print a line of text which is "I'm a sweet lover". Please give me a complete procedures on how to start with it in setting these all up using crystal report which detects the default printer as well as its simple codes which corresponds to it. I would really appreciate if you could give me a brief heads up to start with it...

need help with listview

Fri, 27 Nov 2009 22:36:06 Z

hi. i have a checked listviewbox with 2 columns ,first is filename 2nd is path ,filename and path are added to listbox while searching a drive for a file ,how do i get the selected checkboxes listview1 "path" to string

ListView1.Items.Add(New ListViewItem(New String() {fname, paths}, nIndex))
nIndex = nIndex + 1

i just want paths to string.. any ideas?
its doing my head in now!

Unshared items in Listbox Tabs?

Fri, 27 Nov 2009 21:04:09 Z

Hello. A little while ago, somebody gave me an excellent code, but there is a slight problem with it (which I have been trying to fix, but just can not figure it out). This code should force the items in a Listbox to create multiple panels, and this system is practically a tab system that is much more compact. However, the items that are drawn with this code seem to share the same data (Comboboxes all have the same items in them, when I want them to be different). Could somebody please fix this for me? Here is the code:

salanewt , as you stated..
you would rather have 1 panel to interact w/the listbox selection, which i think it is a good idea to use, considering you only have a certain amount of controls to rearrange, change location, visibility, content, etc.. much better to have 10 controls over 100 tabs w/10 controls on each tab.

as jeff , stated, you will have to use the ListBox1_SelectedIndexChanged event, to interact w/your panel and the controls on it..
personally, i would use the case..select option over the if..elseif in the matter of having so many options in the listbox...
therefore, this reply and the following example.

1 listbox, 1 panel, 1 combobox and 1 label inside the panel

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ListBox1.Items.Add("panel 1")
        ListBox1.Items.Add("panel 2")
        ListBox1.Items.Add("panel 3")
    End Sub

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Select Case ListBox1.SelectedItem
            '-------------------------
            Case "panel 1"
                '-------------------------
                With ComboBox1
                    .Items.Clear()
                    .Items.Add("item 1")
                    .Items.Add("item 2")
                    .Items.Add("item 3")
                    .Location = New Point(0, 0)
                End With
                '-------------------------
                With Label1
                    .Text = "panel 1"
                    .Location = New Point(20, 20)
                End With
                '-------------------------
            Case "panel 2"
                '-------------------------
                With ComboBox1
                    .Items.Clear()
                    .Items.Add("item 5")
                    .Items.Add("item 6")
                    .Items.Add("item 7")
                    .Location = New Point(10, 10)
                End With
                '-------------------------
                With Label1
                    .Text = "panel 2"
                    .Location = New Point(30, 30)
                End With
                '-------------------------
            Case "panel 3"
                '-------------------------
                With ComboBox1
                    .Items.Clear()
                    .Items.Add("item 7")
                    .Items.Add("item 8")
                    .Items.Add("item 9")
                    .Location = New Point(20, 20)
                End With
                '-------------------------
                With Label1
                    .Text = "panel 3"
                    .Location = New Point(40, 40)
                End With
                '-------------------------
        End Select
    End Sub

End Class

Thank you in advance.

Have a nice day.

Button Click event to highlight all records

Thu, 26 Nov 2009 22:36:53 Z

Hi,

on my form that contains an active database through a persistent ODBC connection I have a button that says 'Select all records' to give the user access to delete the records, but the problem I'm having is I cannot get it to highlight all records or any records for that matter.

i have tried the selectionmode = FullRowSelect text but don't know what context to use it in so it just comes up with errors, plus this would just highlight one row anyway.

Can anyone make a suggestion please?

many thanks

Console Application, Cannot be debugged in Windows Vista

Fri, 27 Nov 2009 19:26:53 Z

I have a simple console program, that simply copies three folders to another location, separating them with day/time timestamps ...
The problem is that, it is fully functional on XP, but on Vista, even the debugger is unable to run it
The complied program although, it has an 0xc000007b error code, before it is killed.

Is there anything to do for it?

Search and Highlight found text

Thu, 26 Nov 2009 04:30:59 Z

Is there any code that works in VB 2008 (Visual Studio 9.0) that will let the user type something into a textbox (TextBox1), click a button (Button1), and search and highlight it in a rich text box(txt)? I have tried several "If, Then" statements and "Try" Statements

Flash Integration

Fri, 27 Nov 2009 20:55:18 Z

Does anyone know of any third party components that will let me stream flash videos into my vb.net application?

** CHECK OUT HTTP://www.rapidsoftware.co.uk MY NEW APPLICATIONS SILENT SCREEN & RAPID DJ **

upgrade failed

Fri, 27 Nov 2009 18:18:23 Z

[upgrade failed...could not load comdlg32.ocx ridhtx32.ocx...]
thats the message i get when i try to upgrade a project from VB6.0 in VB2008.
i have installed VB2008 express edition in my pc and nothing else.
do i have to (re)install vb6.0?or just some missing components???
thanks in advance:-)

Animated gif and time-consuming code handling

Mon, 23 Nov 2009 07:26:11 Z

Hi all,

I made an application, where on the form I placed an animted gif so the user knows that the application is busy.
Now when the user push the button, the program starts handling some time consuming code, and the goal was to
start the animated gif. There is my problem, it does not animate.

As far as I know it has to do with threads, but this is Unknown territory for me. I experimented with it, but it is not
that easy.

Can someone give me some hints/tips so to help me fix my problem, animate the animated gif.

With kind regards,
Jurgen

Audio Record and playback via MCI Device

Mon, 23 Nov 2009 18:05:08 Z

Hi folks , I was trying to develop an Audio chat application and i am trying to use the MCI device. I know how to record the application and save it to a wave file and then play it. using the following method:

'Declare the API

Declare Function mciSendString Lib "winmm" Alias "mciSendStringA" (ByVal _

lpstrCommand As String, ByVal lpstrReturnString As String, _

ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

CommandString = "Open new type waveaudio alias RecWavFile"

' start recording

CommandString = "Record RecWavFile"

CommandString = "Record RecWavFile to 2000 wait"

CommandString = "Save RecWavFile " & "c:\mysound.wav"

CommandString = "Close RecWavFile"

'Now to play it I could go like
retVal = mciSendString("open " & "c:\myound.wav" & " type mpegvideo alias asound",0,0,0)

retVal = mciSendString("play asound", 0, 0, 0)

what i am trying to achieve here is a way or a method through which I dont have to save the stream to a file for transmission , a way or a method that i could just send the stream over to the other computer via sockets and when it is received there its automatically played.
any help regarding this issue would be be appreciated ...thanks.

A candle loses nothing by lighting another candle.

Project-to-Project references.

Thu, 26 Nov 2009 21:10:03 Z

So I've got a problem. At the moment all of my projects for a certain product i work on are solution-less. Our reasoning for doing this is because different people might want different solutions, so keep your solution files in your local working folder, but never commit them to source control. (keep them to yourselves)

My problem arises when I have multiple projects in a solution, and I want to use "Go to definition" or "Find all references". If the definition is in a different project, then Visual Studio opens the Object Browser, it does not go to the 2nd project and find the definition in the code. This is because the reference is targeted at the 2nd project's build path, it is not a Project-to-Project reference.

If I change the reference to be a Project-to-Project reference, "Go to definition" and "Find all references" works, but if someone else on my team opens one of the projects while not in the solution (since its my solution, they don't have it), the reference will become invalid. This is also the case if I "unload" the 2nd project in the solution (which I have a habit of doing when i have several dozen projects in the same solution - for larger products this can happen a lot).

Is there any way to fix it so that it is a project-to-project reference, failing that it goes to a specific path to find it? I've already tried using a reference path to no avail.

Collin Sauve

VB6 Converting File information

Fri, 27 Nov 2009 15:58:48 Z

I was wondering if VB6 can read .text document numbers then VB will display the lowest, largest, total number used in the file and the average use of numbers.

The problem I have is that I know you can open files into VB (or well open the file and display it) but since the file is usually a .text document and has words (or numbers) in it I don't understand how to intergrate the files content into forming the format i want it to appear.

I'm using MS notepad and the file I'm using (Or document I have saved .text) is being displayed but the document only has numbers in it (Thats a good thing cause I only want numbers) I don't want VB to read the document as a DOCUMENT but I want it to read the file then display all the numbers within the document then sort them in a particular order like; Largest, lowest, average numbers found, and the total of numbers within the document.

I was thinking that I had to use a conversion command but I don't think CStr,CDbl, CInt would apply to a document. If anyone has any suggestions please answer. >~<

integer value in datagridview

Fri, 27 Nov 2009 00:19:01 Z

Hoping someone can point out where I'm going wrong.

I have an Access database with two tables. The primary table contains an autonumber field for ClientID. The second table contains a foreign key number field (long integer) that relates to the primary table. On my first form, I have a datagridview that displays data from the primary table. The user can select a row and on clicking a button, a new form opens to display the data from the second table.

I have the following code, but for some reason I keep getting a 'Data type mismatch in criteria expression' error:

            Dim clientid As Long

            clientid = DataIndividuals.CurrentCell.Value

            If auditconnection.State = ConnectionState.Closed Then auditconnection.Open()

            auditcommand = New OleDbCommand("SELECT * From Audits WHERE TxtClientID = '" & clientid & "'", auditconnection)
            auditDA = New OleDbDataAdapter(auditcommand)
            auditDataSet = New DataSet()
            auditDA.Fill(auditDataSet, "audit") 'here is where the error occurs
            DataGridaudit.DataSource = auditDataSet.Tables("audit").DefaultView
            auditconnection.Close()

I've tried changing the ClientID field to Text in the database and then using Dim clientID As String and it works perfectly, so I just can't see where I'm going wrong.

user settings for all users

Wed, 25 Nov 2009 21:51:13 Z

I've written a program that saves a number settings including file locations for loading and saving files. I do not want to save these settings as "application" settings since I'd like to be able to change the settings even after it has been installed. If I do change the settings though, it is important that these settings would change for everyone who uses the program no matter who they are logged in as. Currently it seems these settings go back to the default setting for each new user who is logged in to the machine and would need to be set for each new user. (Hundreds of students will be using this program.) Is there a way to put the user settings in "all users" instead of the individual user settings?

Thanks in advance for any help.

Wes

How to use Vb 2008 with .mdb database?

Wed, 25 Nov 2009 08:09:16 Z

How to use Vb 2008 with .mdb database?
I am interested write and reading from the database

how to get the address of smtp server and port? ex. google, yahoo or other mail

Mon, 30 Jul 2007 03:17:53 Z

how to get the address of smtp server and port? ex. google, yahoo or other mail

regards

sending email with checknames...

Wed, 25 Nov 2009 07:00:12 Z

Hi,

I'd created a simple sending mail... and works well...
I want to implement the checknames like in outlook...the checkname is activated for company receipients only

I'm using the company's SMTP ()

noob vb programmer

Debug Start Debugging

Fri, 06 Nov 2009 11:23:08 Z

Hi,

When i click build i do not get a problem but if i click Debug Start Debugging i get the following message

Unable to copy file obj\debug\myprogram.exe to bin\debug\myprogram.exe could not find the file obj\debug\muprogram.exe

How do i fix this and why has it happened, i'm using visual basic 2008 express

Richard

How to display records in the listview control?

Fri, 27 Nov 2009 05:52:39 Z

Hi everyone!

I'm trying to use listview control in vb.net or vb2008 express edition to display records from my database after it is being queried.I have two column headers in my listview control which are named Account# and Authorized Users.
I was able to display the records from the database into the listview control but i don't know how to arrange it in a proper column where it should be displayed cause what happen is all records are being combined in one column which other records should be aligned to the other column.What I want is to display the account numbers in aligned with the Account# column header and the names should be aligned in Authorized Users column header.
Here's the codes I used:

*****************************************************************
Private Sub Button1_Click(-------------) Handles Button1.Click

     Dim db As New memrecDataContext
     Dim au = From ah In db.Table1s _
                   Where ah.Account <> " "

     For Each ah In au
          With Form9.ListView1.Items
                 Form9.ListView1.Items.Add(ah.Account)
                 Form9.ListView1.Items.Add(ah.Name)
                 Form9.Show()
          End With
    Next

End Sub
*********************************************************
I would greatly appreciate if you could correctly debug the codes for me?

don't want ease of access used on my mouse

Sat, 21 Nov 2009 15:49:22 Z

My mouse only lets me click on the right. Every time I try to change it, it wount let me. Any suggestions?

SQL Server is missing in database explorer

Thu, 26 Nov 2009 04:22:50 Z

I have installed visual studio 2008 express edition.

In visual web developer I can see the Microsoft SQL server in the available databases when I open database connection wizard.

but In visual basic, I cant see Microsoft SQL server but Microsoft SQL server compact edition 3.5. is there any difference between Microsoft SQL server and Microsoft SQL server compact edition 3.5?

Searching the database

Fri, 22 Aug 2008 20:31:55 Z

Hi, i am developing an inventory system for my 3rd year of studies. Problem: I have a search screen which requires you to enter data in the textbox click search, and than it gives you the record in the datagridview. That all works well. What i need to do is that while the user is typing i need the search to to start performing with every letter typed. So like if the user types "M" it should go to all records with "M" and so on. Could you please help as i have no idea where to start from! I am using an Access database!

Thanks

Princy_Jones

Problem with Messenger api

Tue, 24 Nov 2009 20:44:50 Z

So I created an application with vb .net, I added Messenger type Api in preferences, compiled my program and everything was fine. However I can't run the program from other directories. It says that the .dll is missing. I'm trying to include the .dll to the program somehow - no success, how that should be done?

Friend tried to help me and said I should add "Application block" something to the references. I can't find that though.

Soo: If i move my program from the directory where visual basic 2008 created it. It won't start.
-> System.IO.FileNotFoundException: Could not load file or assembly 'Interop.MessengerAPI, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null' or one of its dependencies. Määritettyä tiedostoa ei löydy.

convert C# to VB.NET

Wed, 25 Nov 2009 13:20:51 Z

Hi all, 

 I want convert the below code to VB.net. I tried many online convertion tool. but I didnt get the solution. 

Action<PieChart, Func<PieSegmentList>> act = (pc, fp) => pc.Segments = fp();

Printing in 17 CPI & 6 LPI

Thu, 26 Nov 2009 19:26:47 Z

How do I print at 17 cpi & 6 LPI? Using Visual Basic 2008 express edition. Don't want to use the escape sequence to do this because this is limited to a specific printer.

How to selecect a lot of files in OpenFileDialog

Tue, 24 Nov 2009 15:48:40 Z

Hello everybody,

I made a program wchich changes filesnames of a lot of files. But an OpenFileDialog has a TextBox and that textbox has a limit. So you can't select more than around 500 files (depends of the length of the filename) because it doesn't fit in the TextBox. Does anyone know how i can select as many files as i want? The OpenFileDialog doesn't have to show the filenames in the TextBox, but I must be able to use OpenFileDialog.FileNames.

Thanks!!

Search form and store result of search in a DataGridView

Wed, 25 Nov 2009 12:09:09 Z

Hi everyone and thanks for reading my question!

I have two 2tables PatrimoniuMasini and FoaieParcursMasina (2tables.sql file - the DDL is made with create table and insert into- no problem here -just run the file in sql server to see the results). The name of the database is ParcAuto.

What I want:

I have on my form 3 textboxes and 2 datetimepickers.

When I click search button it searches the values entered and selected in 3 textboxes and 2 datetimepickers, and stores in appropiate columns of DataGridView my result.

Test to store values in DataGridView: (this values typed in 3 textboxes and selected in the dtpickers exist as rows in my 2 tables)

TextBox1: the user types DB-20-RTS (and the result is stored in column1 of DataGridView)

DateTimePicker1: the user selects 7 april 2004 (the result is stored in column2 of DataGridView )

DateTimePicker2: the user selects 7 april 2004 (the result is stored in column3 of DataGridView )

TextBox2: the user types Targoviste (the result is stored in column4 of DataGridView )

TextBox3: the user types Medgidia (the result is stored in column5 of DataGridView )

I have no error of syntax (my problem is in Search button) .

I attach here the full source (sql file and visual basic 2008 express edition file) in order to be more clear and to complete my explanations.

I don't know what I'm missing the query it's ok done he is connecting well with sql server but he doesn't store in appropiate columns the result of my search. (the last thing is my problem but not having errors of syntax in the code of button search where it lies my problem).

Here is the full project attached (no error syntax but still doesn't do what I want to achieve in my explanations above):

http://www.4shared.com/file/159466712/dd065166/Project_store_result_in_datagr.html

Thanks for any and all help!

Just not know what I'm missing! All seems fine but he doesn't store the result of search in the 5 columns(each value entered by user in a separate column) even if I don't have errors of syntax.

Best regards,

Mike

Copy a text resource file to a directory

Thu, 19 Nov 2009 16:31:12 Z

I have a batch file imported into my resources. I have code that will validate that a directory does not yet exist and it will make a new directory:

If Not Directory.Exists("C:\Program Files\GVS Batch") Then
            Directory.CreateDirectory("C:\Program Files\GVS Batch")
        End If

After that i want to copy my resource file into the newly created directory.

Can anyone explain how this works, and what steps i have to take?

Mail body formating

Tue, 24 Nov 2009 11:38:43 Z

I want to use the code below on my website. User must fill out the form and send it via mail to my gmail account.

Textbox1 is for body, textbox2 for e-mail and textbox3 for name.
I have two questions.
- 1 - What should be written in the yellow fields ?. Maybe (in this case ) it's not important.
- 2 - I want to get in the mail body, not only content of textbox1 but also contents from several other textboxes,

( something like a textbox1.text+textbox4.text+textbox5.text….) but each in the new line of body area.. What do I need to add in code?
Thanks. Onenew.

Imports System.Net.Mail

Partial Class _Default

Inherits System.Web.UI.Page

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

sendMail("mymail@gmail.com", "", TextBox1.Text)

End Sub

Private Sub sendMail(ByVal toAddress As String, ByVal subject As String, ByVal msgbody As String)

Try

Dim MyMail As New MailMessage()

MyMail.From = New MailAddress("something@gmail.com")

MyMail.To.Add(toAddress)

MyMail.Subject = "Message sent by : " + TextBox3.Text + " dana " + DateTime.Now.ToString("dd. MMMM, yyyy. u HH:mm")

MyMail.Body = TextBox1.Text

‘Here I want to add (in mail body) strings from other textboxes 4,5,6 etc. but every string in new line of body area.

Dim SMTPServer As New SmtpClient("smtp.gmail.com")

SMTPServer.Port = 587

SMTPServer.Credentials = New System.Net.NetworkCredential("mymail@gmail.com", "onenew")

SMTPServer.EnableSsl = True

SMTPServer.Send(MyMail)

MsgBox("E-mail sent")

Catch ex As SmtpException

MsgBox(ex.Message)

End Try

End Sub

End Class

Click?

Sat, 21 Nov 2009 05:11:08 Z

Just to save me time, what is the code to just make your mouse click?

Acc Vio in graphics

Mon, 23 Nov 2009 03:59:12 Z

I wrote a routine that ran great under Vista and with a different terminal. It doesn't as it get's an access violation in storagebit.bitmap now. Here hoping you can help me with it. If you want to try the program out leave or send me your address.
Renee

Private Sub Tmr_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Tmr.Tick

Static Factor As Single = RectangleHeight / 100

Static proc1pen As Pen = New Pen(Color.Red, 1) : Static proc2pen As Pen = New Pen(Color.MintCream, 1)

Static PhysMemPen As Pen = New Pen(Color.Teal, 1) : Static VirtMemPen As Pen = New Pen(Color.DarkGoldenrod, 1)

Static clearpen As Pen = New Pen(Color.Black, 2)

Static P0val As Integer : Static P1val As Integer : Static hDraw As Short : Static YPoint As Short

hDraw = RectangleHeight - StepSize

nbm = bm.Clone

StorageBitmap.DrawImage(nbm, New Rectangle(0, 0, RectangleWidth - StepSize, RectangleHeight), _

New Rectangle(StepSize, 0, RectangleWidth - StepSize, RectangleHeight), _

GraphicsUnit.Pixel)

StorageBitmap.DrawLine(clearpen, RectangleWidth - 1, RectangleHeight, RectangleWidth - 1, 0) 'clear last two lines

P0val = P0.NextValue() >> 2

If Uni Then

StorageBitmap.DrawLine(proc1pen, RectangleWidth - 1, RectangleHeight, RectangleWidth - 1, RectangleHeight - P0val)

Else

P1val = P1.NextValue() >> 2

StorageBitmap.DrawLine(proc1pen, RectangleWidth - 2, RectangleHeight, RectangleWidth - 2, RectangleHeight - P0val)

StorageBitmap.DrawLine(proc2pen, RectangleWidth - 1, RectangleHeight, RectangleWidth - 1, RectangleHeight - P1val)

End If

If ShowPhysMem Then

YPoint = -CInt((My.Computer.Info.AvailablePhysicalMemory / TotPhysicalMem) * -RectangleHeight)

StorageBitmap.DrawLine(PhysMemPen, RectangleWidth - StepSize, YPoint, RectangleWidth, YPoint)

End If

If ShowVirtMem Then

YPoint = RectangleHeight - Math.Round(VMInUse.NextValue * Factor)

StorageBitmap.DrawLine(VirtMemPen, RectangleWidth - StepSize, YPoint, RectangleWidth, YPoint)

End If

pb1.Image = bm

End Sub

Creating a black overlay on an image/Splash screen Transparency issues/ Pressing a button to restart the process

Tue, 24 Nov 2009 06:35:20 Z

So I've made a program which creates a collage of imagse but my problem is that there are a bit too many varying colors. My simple solution idea was creating a faded black overlay on the image. Is there anyway of doing this?

Second Question, How do I make a splashscreen's borders transparent?

Finally is there a way to have a button on the form which will restart the program except for the splash screen?

Thanks

Rouru Sakai

p.s. Heres the code to create the picture grid if you find that it is needed.

Sub CreatePictureGrid(ByVal locationBase As Point, ByVal gridSize As Size, _
                            ByVal pictureSize As Size, ByVal sourceDir As String, _
                            ByVal searchPattern As String)
        Dim imagePaths As String()
        imagePaths = System.IO.Directory.GetFiles(sourceDir, searchPattern, _
                                IO.SearchOption.AllDirectories)
        Dim myRandomPaths As New List(Of String)
        Dim myRandom As New Random
        myRandomPaths.Add(imagePaths(0))
        For Each path In imagePaths
            myRandomPaths.Insert(myRandom.Next Mod myRandomPaths.Count, path)
        Next
        Dim imageIndex = 0
        Dim loc As Point = locationBase
        ' Defines the space around each image.
        ' If you don't want any space set to '0'.
        Dim pbMargin As Padding = New Padding(-1)
        For row As Integer = 0 To gridSize.Height - 1
            For col As Integer = 0 To gridSize.Width - 1
                Dim pb As New PictureBox()
                With pb
                    .Margin = pbMargin
                    .SizeMode = PictureBoxSizeMode.Zoom
                    .Image = Image.FromFile(myRandomPaths(imageIndex))
                    .Location = New Point(loc.X + pbMargin.Left, loc.Y + pbMargin.Top)
                    .Size = pictureSize
                    .Visible = True
                End With
                Me.Controls.Add(pb)
                loc.Offset(pbMargin.Right + pbMargin.Left + pictureSize.Width, 0)
                'Dim randomnmbr As Random
                imageIndex += 1
                If (imageIndex = imagePaths.Length) Then Exit Sub
            Next
            loc = New Point(locationBase.X, _
                    loc.Y + pictureSize.Height + pbMargin.Top + pbMargin.Bottom)
        Next
    End Sub

Background File Copy Queue

Wed, 25 Nov 2009 16:41:22 Z

Hi everyone,

I have vb.net app that allows people to click and drag files into it and it copies the files to a centralized collection. I want to create a background worker or thread that allows me to be able to do the copying in the background.

I search the web and these forums but couldn't find anything to what I'm trying to do. I think my biggest challenge is being able to send new files to the thread once it started.

The way I think it should work is having one thread and inside the thread will be an arraylist. As long as the arraylist has items in it the thread is going to copy the files one by one.

When user wants a another file copied my program will use Thread.SetData() to pass the file name to be added to the arraylist.

Is this best way to do this? If there are any other ways, I'm willing to try them.

Thanks in advance.

VB versus C#

Sat, 21 Nov 2009 21:18:52 Z

The "Why you should not learn VB" thread has got me thinking a little more about the differences between vb and c#.

i have played with c# very little. just a few glances really.

today i created a new c# application just to take a closer look and i thought it would be helpful for others to have a discussion on the differences to understand why all the fuss. hopefully this will be treated with good information and not a battle between which is "better". i am curious about the differences and why they are so.

for instance in the test c# app i notice the form class is declared as public partial class
i see from playing with a second form, other form objects are not accessible even when declared public member level.

in a vb applicaton, a form class is a public shared class and so it's properties and controls, as well as public member level objects, are accessible to other classes.

so what i am curious about is how would this be handled usually in c#?

FREE DEVELOPER TOOLS, CODE & PROJECTS at www.srsoft.us Database Code Generator and Tutorial

Visual Basic 5 user has very simple problem

Sat, 21 Nov 2009 06:18:57 Z

I spoke Radio Shack Basic in the 1980s and a little Visual Basic 5 eight years ago. I am trying to type a simple program in VB 2008 Express and I have no idea how to get rid of the suggestion-box-that-automatically-finishes-my-words that corrects what I write. I want to write "for a = 1 to c" but it insists on changing "a" to "addresssomething" and "c" to "char" without letting me leave them as single letters. I want to get rid of the suggestion-box altogether. How do I?
Thank you very much for your time. (In case it matters, I am trying to write code inside a TextBox.)

How do I make a read-only file accessible to my application?

Wed, 25 Nov 2009 16:03:02 Z

I know I've seen something on this somewhere before, but I'm not sure where. How do I make a read-only file so that it's not read-only, so that my application can use it?

Thanks in advance for the help!

How do you resolve this error message

Wed, 25 Nov 2009 12:32:24 Z

I'm new to this whole programming thing, and working on an existing code. When i run, it gives me several errors, and this is one of them.

Any ideals on ow to solve it will be appreciated.

System.Web.HttpException was unhandled by user code

ErrorCode=-2147467259

Message="Error executing child request for ~/error.aspx."

Source="System.Web"

StackTrace:
       at System.Web.HttpServerUtility.Execute(String path, TextWriter writer, Boolean preserveForm)
       at System.Web.HttpServerUtility.Transfer(String path, Boolean preserveForm)
       at System.Web.HttpServerUtility.Transfer(String path)
       at ASP.global_asax.ReportError() in Y:\Quality\Quality\global.asax:line 36
       at ASP.global_asax.Application_Error(Object sender, EventArgs e) in Y:\Quality\Quality\global.asax:line 15
       at System.EventHandler.Invoke(Object sender, EventArgs e)
       at System.Web.HttpApplication.RaiseOnError()

InnerException: System.Configuration.ConfigurationErrorsException
       BareMessage="Request for the permission of type 'System.Web.AspNetHostingPermission, System, Version=2.0.0.0,
Culture=neutral, PublicKeyToken=b77a5c561934e089' failed."
       Filename="Y:\Quality\Quality\web.config"
       Line=35
       Message="Request for the permission of type 'System.Web.AspNetHostingPermission, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' failed. (Y:\Quality\Quality\web.config line 35)"
       Source="System.Web"
       StackTrace:
            at System.Web.Configuration.ConfigUtil.GetType(String typeName, String propertyName, ConfigurationElement configElement,

Word Object Library

Fri, 20 Nov 2009 15:01:57 Z

The following code works with the Microsoft Word 10.0 Object Library:

Dim

objWord As New Word.Application

But, does not work with the Microsoft Word 12.0 Object Library. How do you active a Word aopplication with the Word 12.0 library??