pro16

VISUAL sintassi per variabili stringa

VISUAL BASIC

Private Sub CommandButton1_Click()
Dim a, b, c As String
Dim x As Integer
b = "maria"
c = "rosa"
a = "laudare"
Label1.Caption = Len(a)
x = Len(a)
Label2.Caption = Right$(a, x - 3)
Label3.Caption = Left$(a, x - 1)
Label4.Caption = Mid$(a, 2, 2)
Label5.Caption = "maria" + "rosa"
Label6.Caption = b + c
Label7.Caption = b & c
End Sub

Private Sub CommandButton1_Click()
Dim a, b, c As String
Dim x As Integer
b = "maria"
c = "rosa"
a = "laudare"
Label1.Caption = Len(a)
x = Len(a)
Label2.Caption = Right$(a, x - 3)
Label3.Caption = Left$(a, x - 1)
Label4.Caption = Mid$(a, 2, 2)
Label5.Caption = "maria" + "rosa"
Label6.Caption = b + c
Label7.Caption = b & c
End Sub
7
dare
laudar
au
mariarosa
mariarosa
mariarosa

inizio