Fungsi-Fungsi Dalam Visual Basic 6.0

Fungsi-Fungsi Dalam Visual Basic 6.0

Admin 4:29 PM
Admin
Pada tugas kali ini, saya akan menjelasakan tentang Fungsi ( Function ) yang berada pada Visual Basic 6.0. Dengan menggunakan functions bawaan Visual Basic 6.0 Anda bisa menggunakan perintah coding lebih pendek dan tidak memusingkan. Jadi functions dalam Visual Basic 6.0 sangat bisa meperkecil ukuran file dari sebuah program. Selamat belajar.
 
Function IIF
 
Rumus:
IIF (Expression, TruePart, FalsePart)
Fungsi IIF berguna untuk membandingkan 2 ekspresi yang berbeda. Sebagai contoh. Saya membuat 1 TextBox (txtIif) dan 1 CommandButton (cmdIif), seperti gambar di bawah :
Lalu memberi coding pada cmdIif :
Private Sub cmdIif_Click()
MsgBox IIf(txtIif.Text >= 81, “Nilai A”, “Tidak Nilai A”), vbOKOnly, “Iif” End Sub
 
Saat program dijalankan, lalu Anda memasukkan nomor di txtiIf, lalu menekan tombol cmdiIf, maka muncul MessageBox :
 
Function InputBox
 
Rumus:
InputBox(Prompt, [Title], [Default], [XPos], [YPos], [HelpFile], [Context]) As String
Fungsi InputBox berguna untuk menampilkan kotak Input. Sebagai contoh.
Saya membuat 1 CommandButton (cmdInputBox), seperti gambar di bawah :
Lalu memberi coding pada cmdInputBox :
Private Sub cmdInputBox_Click()
InputBox “Masukkan Kata atau Kalimat”, “Input Box”,
“Masukkan Kata Disini….”, 1212, 777 End Sub
Saat program dijalankan, lalu menekan tombol cmdInputBox maka muncul kotak Input Box :
Anda bisa melihat sendiri apa maksud dari coding:
  • Masukkan Kata atau Kalimat = memberikan pernyataan pada form
  • Input Box = memberikan judul di TitleBar
  • Masukkan Kata Disini… = memberikan pernyataan pada TextBox  1222 & 777 = menempatkan InputBox di koordinat yang diinginkan

Function InStr
 
Rumus:
InStr([Start], [String1], [String2], [Compare As VbCompareMethod = vbBinaryCompare])
Fungsi InStr berguna untuk mengetahui string pada sebuah variabel berada pada posisi ke-X. Sebagai contoh. Saya membuat 1 CommandButton (cmdInStr), seperti gambar di bawah :
Lalu memberi coding pada cmdInStr :
Private Sub cmdInStr_Click()
MsgBox InStr(“Imam Ciptarjo”, “Ciptarjo”), vbOKOnly, “InStr”
MsgBox InStr(“Imam Ciptarjo”, “a”), vbOKOnly, “InStr”
MsgBox InStr(5, “Imam Ciptarjo”, “a”), vbOKOnly, “InStr” End Sub
Saat program dijalankan, lalu Anda menekan tombol cmdInStr, maka muncul MessageBox :
Penjelasan :
MessageBox 1 = MsgBox InStr(“Imam Ciptarjo”, “Ciptarjo”), vbOKOnly, “InStr”
Menghasilkan nilai=6 karena Ciptarjo pada Imam Ciptarjo, terdapat pada posisi ke 6.
MessageBox 2 = MsgBox InStr(“Imam Ciptarjo”, “a”), vbOKOnly, “InStr” Menghasilkan nilai=3 karena a pada Imam Ciptarjo, terdapat pada posisi ke 3.
MessageBox 3 = MsgBox InStr(5, “Imam Ciptarjo”, “a”), vbOKOnly, “InStr” Menghasilkan nilai=10 karena a pada Imam Ciptarjo, terdapat pada posisi ke 10, tetapi dimulai dari posisi 5. Jadi a pada posisi 3 diabaikan.
 
 
Function Int
 
Rumus: Int(Number)
Fungsi Int berguna untuk mengetahui isi dari objek atau variabel ini number atau bukan number. Sebagai contoh. Saya membuat 1 CommandButton (cmdInt), seperti gambar di bawah :
Lalu memberi coding pada cmdInt : Private Sub cmdInt_Click()
If Int(999) Then
MsgBox “Number”, vbOKOnly, “Int”
Else
MsgBox “Bukan Number”, vbOKOnly, “Int”
End If
End Sub
Saat program dijalankan, lalu Anda menekan tombol cmdInt, maka muncul MessageBox :
 
Function IsArray
 
Rumus:
IsArray(VarName) As Boolean
Fungsi IsArray berguna untuk mengetahui isi dari objek atau variabel Array atau bukan Array. Sebagai contoh. Saya membuat 1 CommandButton (cmdIsArray), seperti gambar di bawah :
Lalu memberi coding pada cmdIsArray:
Private Sub cmdIsArray_Click()
Dim x As Variant Dim y As Variant
x = Array(“NRP”, “Nama”, “Kelas”) y = “imam cakep”
If IsArray(x) = True Then
MsgBox “Array”, vbOKOnly, “IsArray”
Else
MsgBox “Bukan Array”, vbOKOnly, “IsArray” End If
End Sub
 
Saat program dijalankan, lalu Anda menekan tombol cmdIsArray, maka muncul MessageBox :
Penjelasan :
x = Array(“NRP”, “Nama”, “Kelas”)
Termasuk Array jadi, jika IsArray(x) = Array True
y = “imam cakep”
Tidak termasuk Array jadi, jika IsArray(y) = Array False

Function IsDate
 
Rumus:
IsDate(Expression) As Boolean
Fungsi IsDate berguna untuk mengetahui isi dari objek atau variabel berisi format Date (penanggalan) atau bukan Date. Sebagai contoh. Saya membuat 1 TextBox (txtIsDate) dan 1 CommandButton (cmdIsDate), seperti gambar di bawah :
Lalu memberi coding pada cmdIsDate:
Private Sub cmdIsDate_Click()
If IsDate(txtIsDate.Text) = True Then
MsgBox “Berisi Tanggal”, vbOKOnly, “IsDate”
Else
MsgBox “Tidak Berisi Tanggal”, vbOKOnly, “IsDate”
End If
End Sub
Saat program dijalankan, lalu Anda memasukkan format tanggal atau bukan format tanggal di txtIsDate lalu menekan tombol cmdIsDate, maka muncul MessageBox :
Function IsNumeric
 
Rumus:
IsNumeric(Expression) As Booleanm
Fungsi IsNumeric berguna untuk mengetahui isi dari objek atau variabel berisi angka (number) atau bukan angka. Sebagai contoh. Saya membuat 1 TextBox (txtIsNumeric) dan 1 CommandButton (cmdIsNumeric), seperti gambar di bawah :
Lalu memberi coding pada cmdIsNumeric:
Private Sub cmdIsNumeric_Click()
If IsNumeric(txtIsNumeric.Text) = True Then
MsgBox “Numeric Tao”, vbOKOnly, “IsNumeric”
Else
MsgBox “Bukan Numeric Tao”, vbOKOnly, “IsNumeric”
End If
End Sub
Saat program dijalankan, lalu Anda memasukkan angka atau bukan angka (ex:huruf) di txtIsNumeric lalu menekan tombol cmdIsNumeric, maka muncul MessageBox :
Penjelasan :
txtIsNumeric = 1234
Termasuk Angka atau Numerik, jadi jika txtIsNumeric = True
txtIsNumeric = abcd
Tidak termasuk Angka atau Numerik, jadi jika txtIsNumeric = False

Function CDate
 
Rumus:
CDate(Expression) As Date
Fungsi CDate berguna untuk mengkonversi atau merubah angka menjadi sebuah tanggal. Sebagai contoh. Saya membuat 1 CommandButton (cmdCDate), seperti gambar di bawah :
Lalu memberi coding pada cmdCDate:
Private Sub cmdCDate_Click()
MsgBox CDate(2), vbOKOnly, “CDate”
MsgBox CDate(366), vbOKOnly, “CDate” End Sub
Saat program dijalankan, lalu Anda menekan tombol cmdCDate, maka muncul MessageBox :
Jadi tanggal default atau tanggal awal adalah 31 Desember 1989 [CDate(1)].

Function Hex
 
Rumus: Hex(Number)
Fungsi Hex berguna untuk mengkonversi atau merubah angka desimal (basis 10) angka Hexadecimal atau Hex (basis 16). Sebagai contoh, 1 CommandButton (cmdHex), seperti gambar di bawah :
Lalu memberi coding pada cmdHex:
Private Sub cmdHex_Click()
MsgBox “1 Desimal = Hex ” & Hex(1), vbOKOnly, “Hex” MsgBox “9 Desimal = Hex ” & Hex(9), vbOKOnly, “Hex”
MsgBox “10 Desimal = Hex ” & Hex(10), vbOKOnly, “Hex”
MsgBox “15 Desimal = Hex ” & Hex(15), vbOKOnly, “Hex”
MsgBox “100 Desimal = Hex ” & Hex(100), vbOKOnly, “Hex”
MsgBox “9999 Desimal = Hex ” & Hex(9999), vbOKOnly, “Hex”
End Sub
Saat program dijalankan, lalu Anda menekan tombol cmdHex, maka muncul MessageBox :
Function Space
 
Rumus:
Space(Number As Long)
Fungsi Space berguna untuk memberikan jumlah spasi pada objek yang kita inginkan, kali ini saya memberikan contoh objek pada MessageBox. Sebagai contoh. Saya membuat 1 CommandButton (cmdSpace), seperti gambar di bawah :
Lalu memberi coding pada cmdSpace :
Private Sub cmdSpace_Click()
MsgBox Space(15) & “50 spasi”, vbOKOnly, “Space”
MsgBox Space(100) & “100 spasi”, vbOKOnly, “Space” End Sub
Jika program dijalankan, lalu Anda menekan tombol cmdSpace, maka muncul MessageBox :
 
Penjelasan :
Space(15)
Menampilkan panjang MsgBox dengan 15 spasi
Space(100)
Menampilkan panjang MsgBox dengan 100 spasi
 
Semoga Bermanfaat....!!!
 
Sumber:www.tiforu.org

Artikel Terkait

Next
« Prev Post
Previous
Next Post »
Subscribe to: Post Comments (Atom)
It's possible to trade profitably on the Forex, the nearly $2 trillion worldwide currency exchange market. But the odds are against you, even more so if you don't prepare and plan your trades. According to a 2014 Bloomberg report, several analyses of retail Forex trading, including one by the National Futures Association (NFA), the industry's regulatory body, concluded that more than two out of three Forex traders lose money. This suggests that self-education and caution are recommended. Here are some approaches that may improve your odds of taking a profit. Prepare Before You Begin Trading Because the Forex market is highly leveraged -- as much as 50 to 1 -- it can have the same appeal as buying a lottery ticket: some small chance of making a killing. This, however, isn't trading; it's gambling, with the odds long against you. A better way of entering the Forex market is to carefully prepare. Beginning with a practice account is helpful and risk-free. While you're trading in your practice account, read the most frequently recommended Forex trading books, among them Currency Forecasting: A Guide to Fundamental and Technical Models of Exchange Rate Determination, by Michael R. Rosenberg is short, not too sweet and highly admired introduction to the Forex market. Forex Strategies: Best Forex Strategies for High Profits and Reduced Risk, by Matthew Maybury is an excellent introduction to Forex trading. The Little Book of Currency Trading: How to Make Big Profits in the World of Forex, by Kathy Lien is another concise introduction that has stood the test of time. All three are available on Amazon. Rosenberg's book, unfortunately, is pricey, but it's widely available in public libraries. "Trading in the Zone: Master the Market with Confidence, Discipline and a Winning Attitude," by Mark Douglas is another good book that's available on Amazon, and, again, somewhat pricey, although the Kindle edition is not. Use the information gained from your reading to plan your trades before plunging in. The more you change your plan, the more you end up in trouble and the less likely that elusive forex profit will end up in your pocket. Diversify and Limit Your Risks Two strategies that belong in every trader's arsenal are: Diversification: Traders who execute many small traders, particularly in different markets where the correlation between markets is low, have a better chance of making a profit. Putting all your money in one big trade is always a bad idea. Familiarize yourself with ways guaranteeing a profit on an already profitable order, such as a trailing stop, and of limiting losses using stop and limit orders. These strategies and more are covered in the recommended books. Novice traders often make the mistake of concentrating on how to win; it's even more important to understand how to limit your losses. Be Patient Forex traders, particularly beginners, are prone to getting nervous if a trade does not go their way immediately, or if the trade goes into a little profit they get itchy to pull the plug and walk away with a small profit that could have been a significant profit with little downside risk using appropriate risk reduction strategies. In "On Any Given Sunday," Al Pacino reminds us that "football is a game of inches." That's a winning attitude in the Forex market as well. Remember that you are going to win some trades and lose others. Take satisfaction in the accumulation of a few more wins than losses. Over time, that could make you rich!
No car insurance resource would be complete without a comprehensive glossary of car insurance terms. We've compiled a list of terms and their definitions to better help you navigate the sometimes confusing world of insurance Accident - This is an unexpected sudden event that causes property damage to an automobile or bodily injury to a person. The event may be an at-fault or not-at fault and it may be report or unreported. An accident involving two vehicles may be termed a collision. Accident report form - This is the report filed by police, often called the police report, containing the important information regarding the vehicle collision. This report will include the names of all individuals involved, vehicles involved, property damaged and citations that were issued. Adjuster - This is the person who will evaluate the actual loss reported on the policy after an accident or other incident. They will make the determination on how much will be paid on the auto insurance policy by the Insurer. Agent - This is a licensed and trained individual who is authorized to sell and to service insurance policies for the auto insurance company. At Fault - This is the amount that you, the policy holder, contributed or caused the auto collision. This determines which insurance agency pays which portion of the losses. Auto Insurance Score - This is a score similar to credit score that evaluates the information in your consumer credit report. These scores are used when determining pricing for your auto insurance policy. Negative marks on your credit report can increase your auto insurance premiums. The use of this information to determine policy pricing does vary from state to state. Automobile Insurance - This is a type of insurance policy that covers and protect against losses involving automobiles. Auto Insurance policies include a wide range of coverage's depending on the policy holders needs. Liability for property damage and bodily injury, uninsured motorist, medical payments, comprehensive, and collision are some of the common coverage's offered under an auto insurance policy. Binder - This is a temporary short-term policy agreement put in place while a formal permanent policy is put into place or delivered. Bodily Injury Liability - This is the section of an insurance policy that covers the cost to anyone you may injure. It can include lost wages and medical expenses. Broker - This is a licensed individual who on your behalf sells and services various insurance policies. Claim - This is a formal notice made to your insurance company that a loss has occurred which may be covered under the terms of the auto insurance policy. Claims Adjuster - This person employed by the insurance agency will investigate and settle all claims and losses. A representative for the insurance agency to verify and ensure all parties involved with the loss, get compensated fairly and correctly. Collision - The portion of the insurance policy that covers damage to your vehicle from hitting another object. Objects can include but are not limited to; another vehicle, a building, curbs, guard rail, tree, telephone pole or fence. A deductible will apply. Your insurance company will go after the other parties insurance policy for these cost should they be at fault. Commission - This is the portion of the auto insurance policy that is paid to the insurance agent for selling and servicing the policy on behalf of the company. Comprehensive - This is a portion of the insurance policy that covers loss caused by anything other than a collision or running into another object. A deductible will apply. This includes but is not limited to vandalism, storm damage, fire, theft, etc. Covered loss - This is the damage to yourself, other people or property or your vehicle that is covered under the auto insurance policy. Declarations Page - This is the part of the insurance policy that includes the entire legal name of your insurance company, your full legal name, complete car information including vehicle identification numbers or VIN, policy information, policy number, deductible amounts. This page is usually the front page of the insurance policy. Deductible Amount - This is the portion of the auto insurance policy that is the amount the policy holder must pay up front before the Insurance Company contributes and is required to pay any benefits. This amount can be within a wide range in price and varies from approximately $100 - $1000. The larger amount you pay in a deductible the lower your normal monthly/yearly policy will cost. This is the portion of the auto insurance policy that would be applicable only to comprehensive or collision coverage. Discount - This is a reduction in the overall cost of your insurance policy. Deductions can be given for a variety of different reasons including a good driving record, grades, age, marital status, specific features and safety equipment on the automobile. Emergency Road Service - This is the part of an auto insurance policy that covers the cost of emergency services such as flat tires, keys locked in the car and towing services. Endorsement - This is any written change that is made to the auto insurance policy that is adding or removing coverage on the policy. Exclusion - This is the portion of the auto Insurance policy that includes any provision including people, places or things that are not covered under the insurance policy. First Party - This is the policyholder, the insured in an insurance policy. Gap Insurance - This is a type of auto insurance provided to people who lease or own a vehicle that is worth less than the amount of the loan. Gap auto Insurance will cover the amount between the actual cash value of the vehicle and the amount left on loan should the care be stolen or destroyed. High-Risk Driver - If you have a variety of negative marks on your insurance record including driving under the Influences, several traffic violations, etc. you may be labeled as a risk to the insurance company. This will increase your insurance policy or may make you ineligible for coverage. Insured - The policyholder (s) who are covered by the policy benefits in case of a loss or accident. Insurer - Is the Auto Insurance company who promises to pay the policy holder in case of loss or accident. Liability insurance - This part of an auto insurance policy which legally covers the damage and injuries you cause to other drivers and their vehicles when you are at fault in an accident. If you are sued and taken to court, liability coverage will apply to your legal costs that you incur. Most states will require drivers to carry some variation of liability coverage Insurance and this amount will vary state by state. Limits - This is the portion of the auto insurance policy that explains and lists the monetary limits the insurance company will pay out. In the situation you reach these limits the policy holder will be responsible for all other expenses. Medical Payments Coverage - This is the portion of an auto insurance policy that pays for medical expenses and lost wages to you and any passengers in your vehicle after an accident. It is also known as personal injury protection or PIP. Motor Vehicle Report - The motor vehicle report or MVR is a record issued by the state in which the policy holder resides in that will list the licensing status, any traffic violations, various suspensions and./ or refractions on your record. This is one of the tools used in determining the premium prices offered by the insurance agency. This is also used to determine the probability of you having a claim during your policy period. No-Fault Insurance - If you reside within a state with no-fault insurance laws and regulations, your auto insurance policy pays for your injuries no matter who caused the accident. No-fault insurance states include; Florida, Hawaii, Kansas, Kentucky, Massachusetts, Michigan, Minnesota, New Jersey, New York, North Dakota, Pennsylvania, Utah and Washington, DC.. Non-Renewal - This is the termination of an auto insurance policy on the given expiration date. All coverage will cease as of this date and insurer will be released of promised coverage. Personal Property Liability - This is the portion of the auto insurance policy that covers any damage or loss you cause to another person's personal property. Personal Injury Protection or PIP - This portion of an auto insurance policy pays for any lost wages or medical expenses to you and any passengers in your vehicle following an accident. PIP is also known as medical payments coverage. Premium - This is the amount charged to you monthly, yearly or any other duration agreed upon by insurance company and policy holder and paid directly to the auto insurance company. A premium is based on the type and amount of coverage you choose for your vehicle(s) and yourself. Other factors that will affect your insurance premium prices include your age, marital status, you're driving and credit report, the type of car you drive and whether you live in an urban or rural area. Premiums vary by insurance company and the location you live. Quotation - This is the amount or estimated amount the insurance will cost based on the information provided to the agent, broker or auto insurance company. Rescission.- This is the cancellation of the insurance policy dated back to its effective date. This would result in the full premium that was charged being returned. Rental Reimbursement - This is the portion of the auto insurance policy that covers the cost of an automobile rental of similar size should the covered vehicle be in repair from a reported incident. Replacement Cost - This is the amount of money it would cost to replace a lost or damaged item at it is actually new replacement value. This monetary amount would be based on a new identical item in the current local market. Salvage - This is the auto insurance policy holders property that is turned over tot eh insurance agency in a loss final settlement. Insurance companies will sell the salvage property in hopes to recoup some of its monetary loss due to the loss and settlement. Second Party - this is the actual insurance company in the auto insurance policy. Surcharge - This is the amount added to your auto insurance policy premium after a traffic violation or an accident in which you were found to be at fault. Third Party - This is another person other than the policy holder and auto insurance company who has faced a loss and may be able to collect and be compensated on behalf of the policy holder's negligence. Total Loss - This is complete destruction to the insured property of a policy holder. It has been determined that it would be a great sum of money to repair the item rather than replace the insured piece of property to its state prior to the loss. Towing Coverage - This is the portion of the auto insurance policy that covers a specified amount for towing services and related labor costs. Under insured Driver - This is the portion of an auto insurance policy which covers injuries to you caused by a driver without enough insurance to pay for the medical expenses you have incurred from the accident. This is portion of the policy can vary state by state as some states include damage to the car in this section. Uninsured Driver or Motorist - This is the portion of the auto insurance policy which covers injuries to you caused by a driver who was without liability insurance at the time of the accident. Uninsured driver or motorist coverage comes in two different sections; uninsured motorist bodily injury and uninsured motorist property damage. Uninsured motorist bodily injury coverage covers the injuries to you or any passenger in your vehicle when there is an accident with an uninsured driver. Uninsured motorist property damage coverage covers the cost for the property damage to your vehicle when there is an accident with an identified uninsured driver. Uninsured driver or motorist coverage must be offered when you purchase the required liability coverage for your vehicle. You must sign a declination waiver if you decline Uninsured driver or motorist coverage. The majority of states require drivers to carry some form of uninsured motorist coverage. Some states include damages to your car in this coverage. Vehicle Identification Number or VIN - A VIN is a 17 letter and number combination that is the identification of the specific vehicle. It will identify the make, modem and year of the automobile. This number is typically located on the driver's side window on the dash. It can also be found on the vehicles registration and title