Visual Basic

<bMILAN@Cybage9-Apr-07 3:57

9-Apr-07 3:57

if you want dates of a month in a column just for first date of month as

dim date as new date(yyyy,mm,dd)
i.e. dim ldtFirst as new date(2007,04,01) - for april

and loop through the ldtFirst.DaysInMonth - gives total number of days in the current month, add the rows in the datagrid

Milan Rose | [Rose]

Member 38798819-Apr-07 4:56

Member 3879881

9-Apr-07 4:56

plz tell me in loop what condition we want to give...,
I am new in this..,
Plz send some sample code...,
then it will be usefull for me....,

Magi

<bMILAN@Cybage9-Apr-07 18:50

9-Apr-07 18:50

in this way...........

Private Sub LoadDates()

Dim dt As New DataTable
Dim dr As DataRow
Dim lIntIndex As Integer
Dim lIntDysInMonth As Integer
Dim curDate As New Date(2007, 4, 1)

lIntDysInMonth = Date.DaysInMonth(2007, 4)

dt.Columns.Add("dates")

For lIntIndex = 1 To lIntDysInMonth
dr = dt.NewRow
dr.Item(0) = curDate.ToShortDateString
curDate = curDate.AddDays(1)
dt.Rows.Add(dr)
Next
DataGrid1.DataSource = dt
End Sub

Milan Smile | :)

Changing the papersize for a Print Document

Member 387988110-Apr-07 0:03

Member 3879881

10-Apr-07 0:03

thank u friend.....,

Magi

Socket Programming

Venkatesh Mookkan8-Apr-07 18:53

Venkatesh Mookkan

8-Apr-07 18:53

Hi All,
I am working on a project which is like LAN messenger. I am new to Sockets in .NET. Could anyone help me with a simple example.

Regards,
Venkatesh Mookkan.
Software Engineer, India
My: Website | Yahoo Group

Andrew Thorpe8-Apr-07 18:44

Andrew Thorpe

8-Apr-07 18:44

Hi All,

I have a bit of a newbie question I cant seem to figure out. I am using VB 2005 Express.

I want to change the size of paper to A5 during, but the kind property is read only

If there is a log then print A4 if not print A5.

I use VBMySQLiect to get data from a MySQL database.

My Code:

<br />
Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click<br />
    SQL = "select * from clients where id = '" & lvwList.SelectedItems.Item(0).Text & "'"<br />
    For i = 2 To lvwList.SelectedItems.Count<br />
       SQL = SQL & " or id = '" & lvwList.SelectedItems.Item(i - 1).Text & "'"<br />
    Next<br />
    rs = gCnn.Execute(SQL)<br />
    With prnPreview<br />
       .Document = prnDocument<br />
       If bLog Then<br />
          .Document.DefaultPageSettings.PaperSize.Kind = Printing.PaperKind.A5<br />
       Else<br />
          .Document.DefaultPageSettings.PaperSize.Kind = Printing.PaperKind.A4<br />
       End If<br />
       .ShowDialog()<br />
    End With<br />
End Sub<br />

What do I need to do?

Thank you
Andrew

unmovable running form in vs2005

kripa218-Apr-07 17:44

8-Apr-07 17:44

i want unmovable running form
what i do

<bMILAN@Cybage9-Apr-07 2:28

9-Apr-07 2:28

give 'None' as its border style

kripa219-Apr-07 5:08

9-Apr-07 5:08

there is not border style
pls help me

Dave Kreskowiak9-Apr-07 5:11

Dave Kreskowiak

9-Apr-07 5:11

He's talking about the Form's BorderStyle property. Set it to None and there won't be any method for the user to move the form from where it appears.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

kripa219-Apr-07 5:20

9-Apr-07 5:20

yes i understood
i was select form and search it's border style property, it's nothing
it also not done by code as me.borderstyle=none

<bMILAN@Cybage9-Apr-07 18:14

9-Apr-07 18:14

it is FormBorderStyle property- check it out

kripa219-Apr-07 18:48

9-Apr-07 18:48

Yes
it is working thank you

<bMILAN@Cybage9-Apr-07 18:51