Januari 2011Januari 2011

Jumat, 28 Januari 2011

the Scion tC is generally considered Toyota’s successor to the Toyota Celica




Introduced in the United States in June 2004 and Canada in 2010, the Scion tC is generally considered Toyota’s successor to the Toyota Celica whose production ended with the 2005 model year. The name tC does not fit in with its stablemates the xA, xB, and xD, because the name XC designation has already been used by Volvo for its lineup of sport utility vehicles. According to Scion, tC stands for touring coupe.

Major improvements have been made to the oddly named tC. The front-drive, two-door hatchback has more power, better transmissions, a revised interior, improved chassis and larger wheels. Moreover, the 2011 Scion tC provides lots of standard equipment, including a panoramic sunroof, air conditioning, cruise control, power windows and door locks with remote keyless entry and an AM/FM/CD sound system. Safety items include stability and traction control systems and a bunch of air bags.

Prices are reasonable, at $18,275 with a manual transmission at $19,275 with an automatic. (Add $720 for the destination charge.) Looking at the total package of the second-generation Scion tC, it’s apparent that the vehicle is here to stay. With other affordable sports cars missing in action or mired in mediocrity, the tC promises to maintain its hold on the market by combining solid engineering with chiseled good looks and a potent powerplant. We’re looking forward to seeing it dominate the streets after its debut this fall.
Selengkapnya...

the Honda FIT was introduced in other world markets





The Honda Fit is the newest sports compact car of Honda. Designed after Honda Jazz, this beauty holds power and space despite its small structure. Although the Honda FIT was introduced in other world markets, including its home Japan, as early as 2001, the model wasn’t brought to the U.S. until 2006, as a 2007 model. Featuring a 109-horsepower, 1.5-liter VTEC four-cylinder engine, a five-speed manual or five-speed automatic transmission, and front-wheel drive, along with steering and suspension that felt slightly more on the sporty side compared to rival models, the Honda FIT performed very well. Cargo space was also astonishingly good, thanks to a so-called Magic Seat, which allowed the back seat to fold into several different positions, including to a very low, flat cargo floor or to allow exceptionally high cargo like a mountain bike or potted plant.


The Honda FIT is one amazing car. With the comfort and quality you’d expect from a Honda, combined with peppy performance and unmatched versatility for a car of its size, it’s easy to see why the Honda FIT stands out.

When you’re a Honda FIT driver, every trip becomes a fun adventure. And thanks to the many design innovations and safety features, you’ll always have the perfect car for every situation.
Selengkapnya...

menampilkan asisten office sebagai pengganti msgbox di vb net



dalam trik kali ini kita akan membahas bagaimana cara menampilkan assisten office sebagai media interaktif user untuk menampilkan info2 selain menggunakan msgbox
ayoo langsung saja berkoding ria



Imports System.Windows.Forms
Imports AgentObjects
Public Class Agent
Public aksi As _aksi
Public Merlin As AgentObjects.IAgentCtlCharacter
Public ctlAgent As New AgentObjects.Agent
Public Const DATAPATH = "C:\Windows\Msagent\Chars\Merlin.acs"
Public Sub New()
ctlAgent.Connected = True
ctlAgent.Characters.Load("Merlin", DATAPATH)
Merlin = ctlAgent.Characters("Merlin")
End Sub
Public Enum _aksi
GetAttention
GetAttentionReturn
Explain
Congratulate
Announce
Congratulate_2
DontRecognize
Write
Surprised
Suggest
Wave
End Enum

Public Sub PanggilAgent(ByVal aksi As _aksi, ByVal stringtext As String, ByVal locationX As Integer, ByVal locationY As Integer)
Try
Merlin.MoveTo(CShort(locationX + 420), CShort(locationY + 130))
Merlin.Show()
Merlin.Play(aksi.ToString())
Merlin.Speak(stringtext)
Merlin.IdleOn = True

Catch ex As Exception
MsgBox(Err.Description)
End Try
End Sub

Public Sub moveagent(ByVal htop As Integer, ByVal hleft As Integer, ByVal hwidth As Integer)
Try
Merlin.MoveTo(hleft + 20, htop + hwidth - 200)
Catch ex As Exception
MsgBox(Err.Description)
End Try
End Sub
End Class

jangan sampe lupa, add dulu referencenya, pilih microsoft agent control 2.0. selamat mencoba, semoga bermanfaat
Selengkapnya...

membuat fungsi validasi huruf saja dengan vb net


nie contoh saya ambil dari sesepuh programer ud muncul jogja, piss yak hehehee


'Hanya Huruf yang diperbolehkan
Public Shared Sub HanyaHuruf(ByVal e As System.Windows.Forms.KeyPressEventArgs)
If StringType.StrLike(e.KeyChar.ToString(), "[A-Z]", CompareMethod.Binary) OrElse StringType.StrLike(e.KeyChar.ToString(), "[a-z]", CompareMethod.Binary) OrElse e.KeyChar = Chr(8) OrElse e.KeyChar = (" "c) Then
e.Handled = False
Else
e.Handled = True
End If
End Sub

validasi ini hanya akan mengijinkan karakter huruf saja [A-Z], [a-z] dan spasi.
fungsi tersebut paling afdol kalo dijadiin dalam sebuah class fungsi,sehingga bisa dipake dalam beberapa form, semoga bermanfaat teman
Selengkapnya...