Visual Basic .Net

تمامی برنامه ها و کدهای ویژوال بیسیک دات نت (VB.net)

Visual Basic .Net

تمامی برنامه ها و کدهای ویژوال بیسیک دات نت (VB.net)

ورژن اول Image ComboBox

دوستان عزیز من ورژن اول ImageComboBox رو آماده کردم
یکم ناقصی داره ولی خوب فعلا میشه ازش استفاده کرد
هم نمونه برنامه رو میزارم و هم کامپونت استفاده ازش رو
 

  

  

 

برای دانلود کامپونت اینجا کلیک کنید 

 

 

برای دانلود نمونه برنامه طریقه استفاده از کامپونت اینجا کلیک کنید  

 

 

 

 برای اضافه کرد یک رکورد به کامبو از دستور زیر استفاده کنید 

 

ImageCombobox1.AddItems("Ali Najari", Image.FromFile("C:\Ali 3.png"))

 


برای نمایش عکس ایتم انتخاب شده در پشت زمینه فرم از دستور زیر استفاده کنید 

 

Me.BackgroundImage = ImageCombobox1.SelectedImage

کلاسی برای کار با بانک اطلاعاتی SQL

دوستان این کلاسی که براتون واسه دانلود گذاشتم واسه کار با بانک اطلاعاتی SQL هست که کلیه عملیات Insert - Update - Delete - Select - Read رو انجام میده


Imports System.Data
Imports System.Data.SqlClient

Public Class SQLDatabase

Private ObjCon As New SqlConnection
Private ObjCom As New SqlCommand
Private da As New SqlDataAdapter
Public dt As New DataTable

Public Sub doConnect(ByVal Server As String, ByVal Database As String, ByVal Password As String, ByVal Username As String)

   Dim cs As String = "Data Source=" & Server & ";Initial Catalog=" & Database & ";User      ID=" & Username & "Sa;Password=" & Password 
   ObjCon.ConnectionString = cs
   ObjCon.Open()  
End Sub

Public Function doSelect(ByVal Str As String)
   dt.Reset()
   ObjCom.Connection = ObjCon 
   ObjCom.CommandText = Str 
   da.SelectCommand = ObjCom 
   dt = New DataTable 
   da.Fill(dt) 
   Return dt 
End Function

Public Sub doCommand(ByVal str As String)
   ObjCom.Connection = ObjCon
   ObjCom.CommandText = str
   ObjCom.ExecuteNonQuery()
End Sub

Public Function Docheck(ByVal str As String) As Boolean
   ObjCom.Connection = ObjCon
   ObjCom.CommandText = str
   Dim dr As SqlDataReader = ObjCom.ExecuteReader
   Docheck = dr.Read 
   ObjCon.Close() 
   Return Docheck 
End Function

Public Sub Disconnect()
  ObjCon.Close() 
End Sub

End Class



کلاسی برای کار با بانک اطلاعاتی Access

دوستان این کلاسی که براتون واسه دانلود گذاشتم واسه کار با بانک اطلاعاتی Access هست که کلیه عملیات Insert - Update - Delete - Select - Read رو انجام میده

Imports System.Data
Imports System.Data.OleDb

Public Class Mydb

Private ObjCon As New OleDbConnection
Private ObjCom As New OleDbCommand
Private da As New OleDbDataAdapter
Public dt As New DataTable

Public Sub doConnect()
      Dim cs As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|                                      \Database.mdb;Persist Security Info=True"
      ObjCon.ConnectionString = cs
      ObjCon.Open()
End Sub

Public Function doSelect(ByVal Str As String)
      dt.Reset()
      ObjCom.Connection = ObjCon
      ObjCom.CommandText = Str
      da.SelectCommand = ObjCom
      dt = New DataTable
      da.Fill(dt)   
      Return dt 
End Function

Public Sub doCommand(ByVal str As String)
   ObjCom.Connection = ObjCon
  ObjCom.CommandText = str 
  ObjCom.ExecuteNonQuery() 
End Sub

Public Function Docheck(ByVal str As String) As Boolean
  ObjCom.Connection = ObjCon 
  ObjCom.CommandText = str 
  Dim dr As OleDbDataReader = ObjCom.ExecuteReader 
  Docheck = dr.Read 
  ObjCon.Close() 
  Return Docheck 
End Function

Public Sub Disconnect()
  ObjCon.Close() 
End Sub

End Class





ورژن 1.1 از MaskShamsiDate

سلام دوستان عزیز ورژن 1.1 از MaskShamsiDate رو واستون آماده کردم با یکسری امکانات جدید و بدرد بخور امیدوارم که به کارتون بیاد هم Dll رو میزارم و هم Sample رو برای استفاده از قسمتهایی که افزوده شده.  

دوستان فقط بگم که :  

با Alt+home سال رو انتخاب میکنه  

با Alt+End روز را انتخاب میکنه  

با UP و Down تاریخ تغییر میکنه و بسته به اینکه سال یا ماه یا روز انتخاب شده تغییر میکنه  

با کلید Wheel موس تاریخ کم و زیاد میشه  

با کلید Right و Left عدد بعدی یا قبلی انتخاب میشه    

با Alt+Right و Alt+Left مقدار سال یا ماه یا روز انتخاب میشه  

 

منتظر ورژن بعدی این کامپونت باشید با امکانات جدیدتر  

فقط دوستان اگر نظری دارند بدهند برای بهتر شدن و کاملتر شدن این کامپونت  

 

با تشکر از دوستان  

 

 

برای دانلود کامپونت اینجا کلیک کنید 

  

 

برای دانلود نمونه برنامه استفاده از قسمت های کامپونت اینجا کلیک کنید 

 

ورژن اول MaskShamsiDate


این هم ورژن اول Mask Shamsi Date برای کلیه دوستان
به هیچ کد نویسی هم نیاز نداره چون خودش همه چیز رو تشخیص میده و کاربر رو محدود میکنه به وارد کردن فقط عدد و خودش بصورت اتوماتیک Mask میکنه و همچنین اگر تاریخ درست نباشه خطا میده و قابلیت تشخیص سال کبیسه رو هم داره

این امکان رو هم داره که با کلید وسط موس (Wheel) میتونید تاریخ رو به عقب و جلو ببرید

و یکسری امکانات دیگه داره که در آینده یه پروژه میزارم و همه اونها رو تویش توضیح میدم



برای دانلود اینجا کلیک کنید