User Control içinde TextBox'ın Text property sini override etmek.

User Control içinde TextBox'ın Text property sini override etmek.

Imports System.ComponentModel

    <EditorBrowsable(EditorBrowsableState.Always)> _
    <Browsable(True)> _
    <DesignerSerializationVisibility(DesignerSerializationVisibility.Visible)> _
    <Bindable(True)> _
    Public Overrides Property Text() As String
        Get
            Return TextBox1.Text
        End Get
        Set(ByVal value As String)
            TextBox1.Text = value
        End Set
    End Property

VB.NET Datatable'daki veriyi sıralamak.

Datatable'daki veriyi, SQL'deki Order By deyimini kullanıyormuş gibi sıralamak.

myDataTable.DefaultView.Sort = "columnName DESC"

ya da LinQ kullanarak

Dim linQuery = (From dRow In myDataTable.AsEnumerable() _
                Order By dRow.Item(columnName) Descending)
myDataTable = linQuery.CopyToDataTable()

SQL'de Split Fonksiyonu

SQL'de Split Fonksiyonu

ALTER FUNCTION [dbo].[fn_Split](@text varchar(8000), @delimiter varchar(20) = ' ')
RETURNS @Strings TABLE
(
  Split VarChar(1000)
)
AS
BEGIN
DECLARE @index int
SET @index = -1
WHILE (LEN(@text) > 0)
  BEGIN 
    SET @index = CHARINDEX(@delimiter , @text) 
    IF (@index = 0) AND (LEN(@text) > 0) 
      BEGIN  
        INSERT INTO @Strings VALUES (@text)
          BREAK 

SQL'de bir tabloya index ekleme ve bu eklenen index'e göre tabloyu rebuild etme

Bir tabloya index ekleme ve bu eklenen index'e göre tabloyu rebuild etme

IF  EXISTS (SELECT * FROM sys.indexes WHERE object_id = OBJECT_ID(N'[dbo].[t_Products]') AND name = N'x_Products_venderno')
DROP INDEX [x_Products_venderno] ON [dbo].[t_Products] WITH ( ONLINE = OFF )
GO

CREATE NONCLUSTERED INDEX [x_Products_venderno] ON [dbo].[t_Products] 
(
[ds_id] ASC,
[vender_no] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
GO


ALTER INDEX x_Products_venderno ON [dbo].[t_Products]
REBUILD;

ListView'e DataTable'dan veri aktarmak.

ListView'e DataTable'dan veri aktarmak. Aşağıdaki kodu kullanmadan önce, listView'de str dizisine aktarılan her veri için bir kolon oluşturulması gerekmektedir.

For i As Integer = 0 To myDataTable.Rows.Count - 1
    Dim str(4) As String
    Dim itm As ListViewItem
    str(0) = myDataTable.Rows(i)("userID")    str(1) = myDataTable.Rows(i)("Name")    str(2) = myDataTable.Rows(i)("SurName")    str(3) = myDataTable.Rows(i)("Genre")    str(4) = myDataTable.Rows(i)("Country")    itm = New ListViewItem(str)
    listView.Items.Add(itm)
Next

.NET TabControl içinde istenen sayfaya gitmek.

TabControl içinde sayfalar arasında geçişi sağlamak ya da tabcontrol içindeki bir sayfaya erişimi engellemek için aşağıdaki kod parçası kullanılabilir(bu durumda tabcontrol'un SelectedIndexChanged event'inde belirtilmelidir).

TabControl.SelectedTab

Kullanımı:
tabControl1.SelectedTab = tabControl1.TabPages(1)