Tuesday, September 28, 2010

CHANGING LETTERS IN TXTBOX TO LOWER CASE ONLY ALPHABETS

CHANGING LETTERS IN TXTBOX TO LOWER CASE ONLY ALPHABETS
Private Sub TextBox3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles EMAIL.KeyDown
'MsgBox(e.KeyCode)
'MsgBox(Chr(e.KeyCode))


Dim k As String
If Not e.Shift And Not e.Alt And Not e.Control Then
If Chr(e.KeyData) Like "[A-Z]" Or Chr(e.KeyData) Like "[a-z]" Then

k = Chr(e.KeyData)


EMAIL.Text = EMAIL.Text + k.ToLower()
e.SuppressKeyPress = vbAbort
SendKeys.Send("{END}")
End If
End If

End Sub
kaar3k@gmail.com

Sunday, September 26, 2010

run time data grid in vb.net

Connecting to the datagrid at run time
Imports System.Data.OleDb
Imports System.Data

Dim ad As New DataSet
Dim con As New OleDbConnection
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=employee.mdb;Jet OLEDB:Database Password=12345"
Dim dset As New DataSet

Dim adap As New OleDbDataAdapter("select * from custdetails where jobno='" & TextBox1.Text & "'", con)
adap.Fill(dset, "cdet")
DataGridView1.AutoGenerateColumns = True

DataGridView1.DataSource = dset.Tables("cdet")

use the specific driver in the connection and specific database



-kaar3k@gmail.com

Friday, July 23, 2010

vb is SICKKK

guys dont try to waste time in becoming a geek of VB....... it makes u bugged inside the Microsft recycle biNNNN

Never try 2 beat the technology,next instance u r beatenNNNNNN

All the technology in the mopdern world works with 0000000000 and 11111111111 ,m proud to be a indian who paved the way to this modern technology by inventing "000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"