<< Chapter < Page Chapter >> Page >

Ví dụ 1:

Dim myString As String, Position As Integer

myString = "The *rain in Spain mainly..."

Position = Instr(myString,"*") ' Position sẽ là 5

Nếu trong myString không có dấu "*" thì Position sẽ bằng 0

Ví dụ 2:

Dim KeyValuePair As String, Key As String

Dim Value As String

KeyValuePair = "BeatlesSong=Yesterday"

Pos = Instr(KeyValuePair, "=")

Key = Left(KeyValuePair, Pos-1)

Value = Mid(KeyValuePair, Pos+1)

  • Replace: tìm và thay thế chuỗi.

Cú pháp:

Replace(Expression, find, replace[, start[, count[, compare]]])

Trong đó:

- Expression:Biểu thức chuỗi chứa chuỗi cần thay thế.

- find:Chuỗi cần tìm.

- replace: Chuỗi thay thế chuỗi tìm được.

- start:Tương tự như hàm InStr.

- count: Xác định số lần thay thế. Mặc định là 1.

- compare: Tương tự như hàm InStr.

  • LTrim (RTrim): cắt tất cả các khoảng trắng bên trái (bên phải của chuỗi)

Cú pháp:LTrim(string)


  • UCase: đổi chuỗi sang chuỗi gồm các ký tự là chữ hoa.

Cú pháp:UCase(string)

  • Asc: cho mã Ascii của một ký tự.
  • Chr: trả về ký tự ứng với mã Ascii được chỉ định.

Dim ASCIINumberA As Integer, CharB As String * 1

Dim StrFive As String * 1

ASCIINumberA = Asc("A") ' ASCIINumberA bây giờ bằng 65

CharB = Chr(66)

StrFive = Chr(Asc("0") + 5) ' ta có digit "5"

  • InstrRev: tương tự như InStr nhưng việc tìm kiếm được tiến hành từ phải sang.
  • Val: Hàm đổi chuỗi sang số.
  • Str: Hàm đổi số sang chuỗi.

Kiểu ngày tháng (date)

- Là kiểu mà các biến của nó chứa giá trị ngày tháng.

- Để cho VB biết dữ liệu là kiểu Date ta cần đặt giữa hai dấu # (hoặc cặp “”).

Ví dụ:

Dim D As Date

D = #01/02/98# ‘ Hay “01/02/98”

Hình IV.1 Hộp thoại xác lập kiểu ngàyNếu hiểu theo kiểu người Mỹ, đây là ngày 2 tháng giêng năm 1998, còn nếu theo kiểu Anh thì đây là ngày 1 tháng hai năm 1998. Tuy nhiên, định dạng ngày tháng hiển thị phụ thuộc vào quy định của Windows.

- Hộp thoại hình IV.1 hiển thị khi ta chọn Regional Setting trong cửa sổ Control Panel của Windows, nó cho phép quy định kiểu ngày tháng tùy thuộc cách mà người dùng quy định. VB xử lý ngày tháng theo kiểu Mỹ, nhưng nếu máy hiển thị theo kiểu Anh thì nó vẫn hiển thị theo kiểu Anh.

- Hàm Now: trả về ngày giờ hiện tại.

Ví dụ: Dùng hàm Now&Format:

MsgBox "NOW IS "&Format (Now, "ddd dd-mmm-yyyy hh:nn:ss")

' sẽ hiển thị

NOW IS Tue 05-Oct-2004 16:15:53

Các loại số

  • Để chuyển đổi một chuỗi ra số ta có các hàm Val, CInt, CSng. Ngược lại để chuyển đổi từ số sang chuỗi ta dùng CStr, Str.

Ví dụ:

Dollars = "500"

ExchangeRatePerDollar = "7000"

tempValue= Val(Dollars) * Val(ExchangeRatePerDollar)

VNDong = CStr(tempValue)

MsgBox "Amount in VN Dong is "&VNDong

Ví dụ:

Dollars = "500.0" ExchangeRatePerDollar = "7000.0"'Dùng hàm CSng để đổi chuỗi ra SingletempValue = CSng(Dollars) * CSng(ExchangeRatePerDollar)'Dùng hàm Format để có các dấu phẩy ở ngàn và triệu

‘ và phải có 2 chữ số sau dấu chấm thập phân.VNDong = Format (tempValue, "#,###,###.00")MsgBox "Amount in VN Dong is "&VNDong

  • Round: bỏ bớt một số chữ số sau dấu chấm thập phân

Ví dụ:

Round ( 12.3456789, 4 )

chỉ giữ lại 4 con số sau dấu chấm thập phân và cho ta 12.3457

Kiểu object

Biến kiểu Object chứa một địa chỉ 4 Byte trỏ đến đối tượng trong ứng dụng hiện hành hoặc các ứng dụng khác. Dùng lệnh Set để chỉ ra đối tượng cụ thể.

Questions & Answers

do you think it's worthwhile in the long term to study the effects and possibilities of nanotechnology on viral treatment?
Damian Reply
absolutely yes
how to know photocatalytic properties of tio2 nanoparticles...what to do now
Akash Reply
it is a goid question and i want to know the answer as well
characteristics of micro business
Do somebody tell me a best nano engineering book for beginners?
s. Reply
what is fullerene does it is used to make bukky balls
Devang Reply
are you nano engineer ?
fullerene is a bucky ball aka Carbon 60 molecule. It was name by the architect Fuller. He design the geodesic dome. it resembles a soccer ball.
what is the actual application of fullerenes nowadays?
That is a great question Damian. best way to answer that question is to Google it. there are hundreds of applications for buck minister fullerenes, from medical to aerospace. you can also find plenty of research papers that will give you great detail on the potential applications of fullerenes.
what is the Synthesis, properties,and applications of carbon nano chemistry
Abhijith Reply
Mostly, they use nano carbon for electronics and for materials to be strengthened.
is Bucky paper clear?
so some one know about replacing silicon atom with phosphorous in semiconductors device?
s. Reply
Yeah, it is a pain to say the least. You basically have to heat the substarte up to around 1000 degrees celcius then pass phosphene gas over top of it, which is explosive and toxic by the way, under very low pressure.
Do you know which machine is used to that process?
how to fabricate graphene ink ?
for screen printed electrodes ?
What is lattice structure?
s. Reply
of graphene you mean?
or in general
in general
Graphene has a hexagonal structure
On having this app for quite a bit time, Haven't realised there's a chat room in it.
what is biological synthesis of nanoparticles
Sanket Reply
what's the easiest and fastest way to the synthesize AgNP?
Damian Reply
types of nano material
abeetha Reply
I start with an easy one. carbon nanotubes woven into a long filament like a string
many many of nanotubes
what is the k.e before it land
what is the function of carbon nanotubes?
I'm interested in nanotube
what is nanomaterials​ and their applications of sensors.
Ramkumar Reply
what is nano technology
Sravani Reply
what is system testing?
preparation of nanomaterial
Victor Reply
Yes, Nanotechnology has a very fast field of applications and their is always something new to do with it...
Himanshu Reply
good afternoon madam
what is system testing
what is the application of nanotechnology?
In this morden time nanotechnology used in many field . 1-Electronics-manufacturad IC ,RAM,MRAM,solar panel etc 2-Helth and Medical-Nanomedicine,Drug Dilivery for cancer treatment etc 3- Atomobile -MEMS, Coating on car etc. and may other field for details you can check at Google
anybody can imagine what will be happen after 100 years from now in nano tech world
after 100 year this will be not nanotechnology maybe this technology name will be change . maybe aftet 100 year . we work on electron lable practically about its properties and behaviour by the different instruments
name doesn't matter , whatever it will be change... I'm taking about effect on circumstances of the microscopic world
how hard could it be to apply nanotechnology against viral infections such HIV or Ebola?
silver nanoparticles could handle the job?
not now but maybe in future only AgNP maybe any other nanomaterials
I'm interested in Nanotube
this technology will not going on for the long time , so I'm thinking about femtotechnology 10^-15
how did you get the value of 2000N.What calculations are needed to arrive at it
Smarajit Reply
Privacy Information Security Software Version 1.1a
Berger describes sociologists as concerned with
Mueller Reply
Got questions? Join the online conversation and get instant answers!
QuizOver.com Reply

Get the best Algebra and trigonometry course in your pocket!

Source:  OpenStax, Giáo trình visual basic. OpenStax CNX. Jul 29, 2009 Download for free at http://cnx.org/content/col10777/1.1
Google Play and the Google Play logo are trademarks of Google Inc.

Notification Switch

Would you like to follow the 'Giáo trình visual basic' conversation and receive update notifications?