[Programmer-VB] Re: Ganti Font Style

Tue, 28 Feb 2006 11:24:19 -0800


--- In [email protected], "Robby" <[EMAIL PROTECTED]> wrote:
>
> maaf, Bisa diulangi lagi pertanyaan sebelumnya
>

Ini saya ulangi lagi masalah saya.
Saya mau ganti font style yang ada di dalam textbox dengan cara mengklik sebuah checkbox.
Kalau checkbox Bold di-check, maka text yang ada di textbox menjadi bold.
Kalau checkbox Italic di-check, maka text yang ada di textbox menjadi miring. Dll.

Saya sudah buat dan kodenya sbb :
--------
If tbxTeks.Font.Bold Then
    tbxTeks.Font = New System.Drawing.Font(tbxTeks.Font,
    tbxTeks.Font.Style Xor FontStyle.Bold)
Else
    tbxTeks.Font = New System.Drawing.Font(tbxTeks.Font,
    tbxTeks.Font.Style Or FontStyle.Bold)
End If
--------
--> tbxTeks is een textbox

Saya juga sudah coba cara ini :
Dim style As FontStyle = IIf(tbxTeks.Font.Style And FontStyle.Bold, tbxTeks.Font.Style Xor FontStyle.Bold, tbxTeks.Font.Style Or FontStyle.Bold)
tbxTeks.Font = New Font(tbxTeks.Font, style)

dan juga ini :

If cbxBold.Checked Then
  tbxTeks.Font = New System.Drawing.Font(tbxTeks.Font, FontStyle.Bold)
End If

Tapi kode ini tidak jalan dan saya dapat error message :
An unhandled exception of type 'System.ArithmeticException' occurred in system.drawing.dll
Additional information: Overflow or underflow in the arithmetic operation.

Kesalahannya terletak pada baris di mana NEW berada.

Saya juga sudah coba ini :

If tbxTeks.Font.Bold Then
  tbxTeks.Font .Bold = False
Else
  tbxTeks.Font .Bold = True
End If

Tapi saat di ketik saja sudah error (digaris bawahi) seperti ini :
tbxTeks.Font .Bold = False


Saya pakai Window XP proff, VS 2003 dan .Net 1.1.

Bisa tolong saya ?

Terima kasih sebelumnya,
Kusmanto





Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer



SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language

YAHOO! GROUPS LINKS



Kirim email ke