Wednesday, November 24, 2010

Tips for Caring Strategies For Long-lasting Printer Cartridges

The printer is an important item. Without our printers can not print the results of our work. But printers are often overlooked for its maintenance. Here are some tips for caring for inkjet printer cartridges for durable and can still be used in the long term.



1. If the ink in the cartridge runs out, get the content.

Ink is a lubricant for the printer head. For example, color ink still used though to be printed is black, and vice versa. If you print without ink colors, meaning you damage the printer head because of the lack of lubrication / friction when the ink while printing. That is the reason why some printers can not print if the absence of color ink even if you do not use it. If you let the color cartridge runs out of ink, the ink remaining there would clog the printer head and a long time will be permanent until the cartridge is not available. So immediately the contents if your cartridge is running low on ink. Do not be left too long or you have to buy another new cartridge.

2. Do not turn on and turn the printer off frequency.

Try to let the printer stay alive, in addition to not suck up much electric power-saving aliases also because it can extend the life of the cartridge. When the printer is turned on, the printer sends a signal to immediately replace the ink on the head so as not to clog. If you turn off the printer and the next time you turn it on again, then the printer will do the replacement ink remains in the head. It is a waste of ink. Some printer cartridges can hold 3-7 ml of ink, and when done cleaning, 2-3 ml of ink wasted. In addition, the ink reservoir foam will rapidly wet / full. And if the foam began to get soaked, then the printer will not print. Repair costs are more expensive than the price of the printer itself. Try to keep the printer and do not in-cleaning frequency.
3. If you are forced to turn off the printer, turn off the power button on the printer, do not pull the plug / plug directly. The printer will perform their own shutdown properly. Such as cleaning the ink remaining in the head and close it to avoid blockage. By turning it off via the power button on the printer, things will be done by the printer.
Hopefully Helpful ...

Thursday, November 18, 2010

Angka Romawi Converter

Tthis VB6 program converts an integer in the range of 1 through 3999 to its equivalent in Roman numerals. VB6 program to convert an integer in the range 1 to 3999 for the equivalent in Roman numerals. Also it converts a Roman numeral string to its decimal equivalent.

It is also changing the Roman numeral string to its decimal equivalent.

The rules for Roman numerals are as follows: The rules for Roman numerals is as follows:

* The basic symbols are I (= 1), V (= 5), X (= 10), L (= 50), C (= 100), D (= 500), and M (= 1000). Basic symbols are I (= 1), V (= 5), X (= 10), L (= 50), C (= 100), D (= 500), and M (= 1000).
* If a letter is Immediately followed by one of equal or lesser value, the two numbers are added, thus, XX = 20, XV = 15, VI = 6. If the letter is immediately followed by one or more of the same low value, two numbers are added, thus, XX = 20, XV = 15, VI = 6.
* If a letter is Immediately followed by one of Greater value, the first is subtracted from the second, thus IV = 4, XL = 40, CM = 900. If the letter is immediately followed by one of greater value, the first is subtracted from the second, so IV = 4, XL = 40, CM = 900.
* A bar over a letter multiplies it by 1000; thus, an X with a bar over it = 10,000. A bar over a letter multiplies it by 1000, thus, X with a bar above = 10,000. Such numbers will of not be addressed by this project. these numbers will not be addressed by this project.

Examples: The numbers from 1 to 10 acres: I, II, III, IV, V, VI, VII, VIII, IX, X. The numbers from 1 to 10 are: I, II, III, IV, V, VI, VII, VIII, IX, X.

XLVII = 47, CXVI = 116, MCXX = 1120, MCMXIV = 1914. XLVII = 47, CXVI 116, MCXX = = 1120, MCMXIV = 1914.

Note That a given symbol appears no more Than three times consecutively in a number. This is why 4 is written as "IV" instead of "IIII", and 40 is written as "XL" instead of "XXXX". Note that a given symbol appears no more than three times in a row in numbers. This is why 4 is written as "IV" instead of "IIII", and 40 listed as "XL" instead of "XXXX".

Probably the most challenging part of converting a Roman numerals to decimal numbers is not the conversion itself, but rather validating the input. Perhaps the most challenging to convert Roman numerals to decimal numbers rather than the conversion itself, but to validate the input. Basic validation Would include converting keystroke input to uppercase and allowing only the characters I, V, X, L, C, D, and F to be ENTERED. basic validation will include input keystroke to convert uppercase and only allows the characters I, V, X, L, C, D, and F must be included. Beyond that, the Following Should Be rules applied: Beyond that, the following rules shall apply:

* D, L, or V-only EACH May Appear at most one time in the string D, L, or V may each only appear at most once in the string

* M, C, X, or I May Appear no more That three times consecutively in the string F, C, X, or I may appear no more that three times in a row in the string

* The Following pairs of letters are invalid in all cases: IL, IC, ID, IM, XD, XM, VX, VL, VC, VD, VM, LC, LD, LM, DM. The following pair of valid characters in all cases: IL, IC, ID, IM, XD, XM, VX, VL, VC, VD, VM, LC, LD, LM, DM.

* Once a letter has been subtracted from, neither it nor its "5 counterpart" May Appear again in the string - so neither X nor V cans follow-IX, neither C nor L May follow-XC, and neither M nor D May follow-CM. Once a letter has been subtracted from, nor is it or the company "5 peer" may appear again in the string - so no X or V can follow IX, both C and L to follow the XC, and no M or D may follow the CM.

* Once a letter has been Used as a modifier subtraction, it can not Appear again in the strings - so C can not follow the CD or CM, X can not follow XL or XC, and I can not follow IV or IX. Once the letter has been used as a modifier reduction, can not appear again in the string - so that C can not follow the CD or CM, X can not follow the XL or XC, and I can not follow IV or IX.

* Once I, X, or C (or Their "5-counterparts" V, L, and D) appears in a string, the I, X, or C can not subsequently be Used as modifiers subtraction - IV or IX so I can not follow or V, XL or XC can not follow the X or L, and the CD or the CM can not follow C or D. After I, X, or C (or their "5-co" V, L, and D) appears in a string, I, X, or C can not be later used as a modifier reduction - so IV or IX can not follow me or V, XL or XC can not follow the X or L, and CD or CM could not follow C or D.

Sample runs are shown below. Examples are as follows.

VB6  screen1

When the user selects "Roman Numerals to Decimal Number" for the conversion type, note that the captions change and the reverse conversion is performed: Ketika pengguna memilih "angka Romawi ke Desimal Nomor" untuk jenis konversi, perhatikan bahwa perubahan keterangan dan konversi sebaliknya dilakukan:

VB6  screen2

Example of invalid input: Contoh input tidak valid:

VB6  screen3

VB6  screen4



konversi romawi

konversi bilangan to terbilang

Wednesday, November 10, 2010

guess function results

Private Sub tebakhasil(ByRef B As Integer, ByVal A As Integer, ByVal C As Integer, D As Integer)

A = 5

B = 2 * A

C = A + B

D = A + B + C

End Sub


Private Sub Form_Activate()

Dim A As Integer, B As Integer, C As Integer, D As Integer

A = 1: B = 2: C = 3: D = 4

Print " Angka Awal : "; A; B; C; D

tebakhasil A, B, C, D

Print " Angka Akhir : "; A; B; C; D

End Sub


Download Fromnya

Calculating combinations C (n, k)

Make a label 4, 2 and textbox CommandButton 1, and you design like the image below



Function Faktorial(ByVal n As Integer) As Double
Dim i As Integer, Fakt As Double
Fakt = 1
For i = 2 To n
Fakt = Fakt * i
Next
Faktorial = Fakt
End Function

Function kombinasi(ByVal n As Integer, ByVal k As Integer) As Long
kombinasi = Faktorial(n) / (Faktorial(n - k) * Faktorial(k))
End Function

Private Sub cmdhitung_click()
Dim n As Integer, k As Integer
n = Txtn.Text
k = Txtk.Text
LblCnk.Caption = kombinasi(n, k)
End Sub


Swap X and Y Values

Make a label 2, textbox 2 and CommandButton 1, and you design like the image below

Option Explicit


Sub Tukar(ByRef x As Single, ByRef y As Single)

Dim Temp As Single

Temp = x

x = y

y = Temp

End Sub


Private Sub cmdTukar_click()

Dim x As Single, y As Single

x = TxtX.Text: y = TxtY.Text

Tukar x, y

TxtX.Text = x: TxtY.Text = y

End Sub

Download Fromnya