Tags-Etiketler
Bu kısımda sitemizde etiketlenmiş makaleleri toplu olarak bulabilirsiniz...
[ tl ] /
Makaleler-Article(s)
tl ile ilgili toplam 6 makale bulundu ! (A total of 6 article(s) about tl was(were) found in all of articles!)
Article |
---|
DataGridView da Formatlı Gösterim Yapılması Merhaba arkadaşlar bu makalemizde dataGridView nesnesindeki satırları formatlı bir şekilde gösterimini sağlayacağız. Seçili satırın arka plan rengi ve yazı rengini değiştireciz. | Formu Sabitleme Formumuzun taşınmasını istemiyorsak, aşağıdaki hazır kod bayağı işimize yarayacak. İlk önce ;
Imports System.Runtime.InteropServices
formunuza ekleyin. | Mouse Hareketleri Bu örneğimizde mouse un sol,orta, sağ tuşa tıklanıldığında veya klavyenin herhangi bir tuşuna tıklanıldığında, o tuşun ismini mesajla bildiren küçük bir program yapacağız. Aşağıdaki şekilleri inceleyin.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
namespace WindowsFormsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
this.MouseUp += new MouseEventHandler(OnMouseUp);
this.MouseMove += new MouseEventHandler(OnMouseMove);
this.KeyUp += new KeyEventHandler(OnKeyUp);
CenterToScreen();
}
private void Form1_Load(object sender, EventArgs e)
{
}
protected void OnMouseUp(object sender, MouseEventArgs e)
{
if (e.Button == MouseButtons.Left)
MessageBox.Show("Sol tuş tıklandı!");
else if (e.Button == MouseButtons.Right)
MessageBox.Show("Sağ tuş tıklandı!");
else if (e.Button == MouseButtons.Middle)
MessageBox.Show("Orta tuş tıklandı!");
}
protected void OnMouseMove(object sender, MouseEventArgs e)
{
this.Text = "Mouse Şimdiki Pozisyon: (" + e.X + ", " + e.Y + ")";
}
public void OnKeyUp(object sender, KeyEventArgs e)
{
MessageBox.Show(e.KeyCode.ToString(), "Klavyedeki tuşa tıklanıldı!");
}
}
}
//Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN | Formunuz Efektli Açılsın Formunuza 1 adet Timer ekleyin. Aşağıdaki kodları yazın.
private void Form1_Load(object sender, EventArgs e)
{
timer1.Start();
}
private void timer1_Tick(object sender, EventArgs e)
{
int x, y, k;
x = 300;
y = 0;
for (k = 0; k <= 100; k++)
{
y++;
this.Size = new System.Drawing.Size(x, y);
}
timer1.Stop();
}
//Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN | TextBox ta Telefon Formatında Yazmak TextBox a girilen rakamları telefon formatında göstereceğiz.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
namespace WindowsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
string telefonno = "02121234567";
string str = telefonno.Insert(1, "-");
string str2 = str.Insert(5, "-");
textBox1.Text = str2;
//Programı çalıştırdığımızda
//textBox a girilen no 0-212-1234567
//şeklinde görülür.
}
}
}
//Bir sonraki makalede görüşmek üzere. Bahadır | TL yi YTL ye Dönüştürmek Bu örnekte TL olan tutarı YTL ve YKrş a çevireceğiz. Formunuza 1 button ekleyin. Aşağıdaki şekli inceleyin.
Public Class Form1
Dim tl, ytl, ykr As Decimal
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text <> "" Then
tl = Val(TextBox1.Text)
ytl = Int(tl / 1000000)
ykr = Int((tl Mod 1000000) / 10000)
MessageBox.Show(ytl & "," & ykr & vbCrLf & ytl & " YTL " & ykr & " Yeni Kuruş")
If TextBox1.Text Mod 10000 >= 5000 Then ykr = ykr + 1 Else ykr = ykr
End If
End Sub
End Class
Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN |
|
        Sitede yayınlanan makaleleri
Blog sitemizden de takip edebilirsiniz.
Sitemizdeki makaleleri RSS olarak takip edebilirsiniz.