DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Visual Basic 4 / 5 / 6 RSS

Please help me

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site

Thread Solved

•

Join Date: Jul 2009

Posts: 3

Reputation: pixelerator is an unknown quantity at this point

Solved Threads: 0

pixelerator pixelerator is offline

Offline

Newbie Poster

Please help me

Jul 2nd, 2009

Hello my name is intekhab khab persuing BCA final
i have some problem in Visual basic coding as i dont know any thing about Visual basic i know c/c++ php Ajax but i dont familiar with visual basic 6.0.Sir gave me assignment and two days of only please help me ,the question of assignment are

01)Program which takes 10 records from the user, there are two buttons on the form. Display, Modify. On clicking the button display information about the requested record, on clicking modify, information of particular student should be changed.
02)Take Two LISTBOXS. First List box has 10 elements. There are three buttons.
i. >
ii. >>
iii. remove

on clicking first button selected item from first list box should be inserted into second one. If second button is clicked than all items of first should be inserted into second one (no duplicate element in second list box). On clicking third button selected element from the second list box should be deleted.
03) Create a menu
Color Font Case
Red Bold Lower
Green Italic Upper
Blue Bold And Italic
Font Name
Form has one Textbox, on clicking any option properties of textbox should change accordingly.

I know this programmes are too simple i alone do this but i have not familiar with this languages
Thank you

Pixelerator http://intekhab.co.cc

•

Join Date: Mar 2009

Posts: 828

Reputation: vb5prgrmr will become famous soon enough

Solved Threads: 150

vb5prgrmr

Offline

Practically a Posting Shark

Re: Please help me

Jul 3rd, 2009

To add items to a list box you use the additem method...

Help with Code Tags

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)

List1.AddItem "MyString"

To make your list box allow multiple selections set its multiselect property to true on/in the property box.

To run through the list to test which one(s) have been selected. Use a for loop...

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
Dim ForLoopCounter As Integer
For ForLoopCounter = 0 To List1.ListCount - 1
  If List1.Selected(ForLoopCounter) = True Then
    'do something
  End If
Next ForLoopCounter
Dim ForLoopCounter As Integer
For ForLoopCounter = 0 To List1.ListCount - 1
  If List1.Selected(ForLoopCounter) = True Then
    'do something
  End If
Next ForLoopCounter

To remove an item or items from a list box. Once again use a for loop but this time do it backwards...

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
Dim ForLoopCounter As Integer
For ForLoopCounter = List1.ListCount - 1 To 0 Step -1
  If List1.Selected(ForLoopCounter) = True Then
    List1.RemoveItem ForLoopCounter
  End If
Next ForLoopCounter
Dim ForLoopCounter As Integer
For ForLoopCounter = List1.ListCount - 1 To 0 Step -1
  If List1.Selected(ForLoopCounter) = True Then
    List1.RemoveItem ForLoopCounter
  End If
Next ForLoopCounter

use the menu editor to create your menu items and if you don't know how to use it, there are several tutorials out there, just search the web.

Now to enumerate through all the fonts on the system, use a for next loop...

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
For ForLoopCounter = 0 To Printer.FontCount - 1
  List2.AddItem Printer.Fonts(ForLoopCounter)
Next ForLoopCounter
For ForLoopCounter = 0 To Printer.FontCount - 1
  List2.AddItem Printer.Fonts(ForLoopCounter)
Next ForLoopCounter