Introdução à função de VB

A finalidade principal das funções é aceitar determinadas entradas e passá-las sobre ao programa principal para terminar a execução e é também similar aos procedimentos normais mas. São dois tipos de função, as funções criadas pelos programadores e as funções internas do função (ou as internas).

O formato geral de uma função é

functionName(arguments)

onde os argumentos são os valores que são passados sobre às funções.

Nesta lição, nós estamos indo aprender dois muito básicos mas funções internas úteis, isto é função de InputBox () e sthe MsgBox ().

() função 1.MsgBox

O objetivo de MsgBox é alertar o usuário estalar sobre uma tecla de comando antes que que /she enlata continue e produz uma caixa de mensagem pop-up. Este formato da caixa de mensagem é como segue:

yourMsg=MsgBox(Prompt, Style Value, Title)

O primeiro argumento no formato acima, alerta, indicará a mensagem na caixa de mensagem e o valor do estilo determinará que tipo de teclas de comando aparece na caixa de mensagem, consulta por favor à tabela que é dada abaixo para os tipos de tecla de comando indicados. O argumento do título indicará o título da placa da mensagem.

Style Value	Named Constant	Buttons Displayed
0	vbOkOnly	Ok button
1	vbOkCancel	Ok and Cancel buttons
2	vbAbortRetryIgnore	Abort, Retry and Ignore buttons.
3	vbYesNoCancel	Yes, No and Cancel buttons
4	vbYesNo	Yes and No buttons
5	vbRetryCancel	Retry and Cancel buttons

A tabela abaixo mostra os valores, a constante nomeada correspondente e teclas.

Value	Named Constant	Button Clicked
1	vbOk	Ok button
2	vbCancel	Cancel button
3	vbAbort	Abort button
4	vbRetry	Retry button
5	vbIgnore	Ignore button
6	vbYes	Yes button
7	vbNo	No button

O seguinte exemplo mostra o uso da função de MsgBox () em VB

Private Sub Test_Click()
Dim testmsg As Integer
testmsg = MsgBox("Click to test", 1, "Test message")
If testmsg = 1 Then
Display.Caption = "Testing Successful"
Else
Display.Caption = "Testing fail"
End If
End Sub

O/P:

Há quatro tipos de ícones disponíveis em VB como mostrado na seguinte tabela:

Value	Named Constant	Icon
16	vbCritical
32	vbQuestion
48	vbExclamation
64	vbInformation

O seguinte exemplo mostra o uso de ícones de VB

Private Sub test2_Click()

Dim testMsg2 As Integer
testMsg2 = MsgBox("Click to Test", vbYesNoCancel + vbExclamation, "Test Message")
If testMsg2 = 6 Then
display2.Caption = "Testing successful"
ElseIf testMsg2 = 7 Then
display2.Caption = "Are you sure?"
Else
display2.Caption = "Testing fail"
End If

End Sub

O/P:

função de 2.The InputBox ()

Uma função de InputBox () indicará uma caixa de mensagem onde o usuário possa incorporar uma mensagem ao formulário do texto ou de um valor. O formato é como segue:

myMessage=InputBox (alerta, título, default_text, x-posição, y-posição)

o myMessage é um tipo de dados variant mas tipicamente declara-se como a corda e este aceita a mensagem input pelos usuários. Os argumentos são explicados como segue: segue:

Alerta - a mensagem indicou normalmente enquanto a pergunta pediu.
Título - o título da caixa da entrada.
opt-texto - o texto do defeito que se publica no campo da entrada onde os usuários podem mudar à mensagem que deseja fechar à chave dentro e pode usá-la como sua entrada pretendida.
x-posição e y-posição - a coordenada ou a posição da caixa da entrada.

O seguinte exemplo mostra o uso da função de InputBox () em VB

Private Sub OK_Click()
Dim userMsg As String
userMsg = InputBox("What is your message?", "Message Entry Form", "Enter your messge here", 500, 700)
If userMsg <> "" Then
message.Caption = userMsg
Else
message.Caption = "No Message"
End If

End Sub

Keywords: Looping in VB, visual basic looping, asp net looping, visual basic vb, vb source code, while loop in vb, for loop in vb, vb asp net, looping in excel, looping in sql, vb array, vb functions, vb controls

HTML Quizes

XML Quizes