Private Sub Check1_Click()
If Check2.Value = 1 Then Check2.Value = 0
If Check3.Value = 1 Then Check3.Value = 0
If Check4.Value = 1 Then Check4.Value = 0
If Check5.Value = 1 Then Check5.Value = 0...

Hi Friends !
I want to create DSN automatically with common dialog to choose database. I don't want user have to go to control pannel \ Administrative tools \ ODBC Manager for create DSN. ...

Hi Friends!
I am creating a project & want to minimized its form like photoshop in its own status bar. How can I do this ? Any Idea .... ?

cguan_77 has written the right code for this. Use his code in this way : -

Private Sub Command1_Click()
Dim txturl As String
txturl = "http://www.google.com"
Shell "C:\Program Files\Internet...

Please help ! I am new in VB.

Thanks hkdani !
But still it has problem . As for example for 5 january 2009 it is week 2 but it returns week 1 . Please check it.

Thanks vb5prgrmr
But still my problem is not solved. I have DtPicker control in my form and i want the result according to it's value. I try you code giving date as dtpicker value but still...

Hello !
I want to get the current week number of the month. I have used this code below : -

Private Sub Command1_Click()
Dim t_Day As Double
t_Day = Day(DTPicker1.Value)
Select Case t_Day...

Use this Code below :-

Private Sub Command1_Click()
Dim RetVal
RetVal = Shell("D:\Project\Project1.exe", 1)
End Sub

Give this code in Form1 :-

Private Sub Text1_Change()
Form2.Label1 = Text1.Text
End Sub

I am new in VB & I am having problem in Filter ( See Form2). My another problem is my boss want to see all Follow Up Report (Call Report of the Customer; Form6). Generally he want to see current...

Please Help me. Please see the attachment. I have created a project and have coding problem. Please help me. it's urgent.

I am doing a project in VB and have used ADODC connection to connect in Access Database. I have used MSHFlexGrid and want it's data get highlighted Automatically if it is on current date (i.e Today's...