bữa nào bùn là vào đây gào thét với tỷ Số_hên . coi bộ e với tỷ hợp tuổi à nha . e sinh năm 1985 đó,hợp với tuổi tỷ ko tỷ. tỷ coi sao chứ bữa nào chị em mình cũng vào đây hết là cuối tháng bán nhà đó chị .bùn quá trời ơi sao số trúng ko đánh mà sao con toàn lựa số trật đánh ko vậy nè
Đánh dấu ngày trở lại bằng một chiến thắng ngọt ngào, rồi đây ta lại tung hoành như chưa từng gác kiếm!
Sub GetUserName() Dim strName As String strName = InputBoPrompt:="You name please.", _ Title:="ENTER YOUR NAME", Default:="Your Name here") If strName = "Your Name here" Or _ strName = vbNullString Then Exit Sub Else Select Case strName Case "Bob" 'Do Bobs stuff Case "Bill" 'Do Bills stuff Case "Mary" 'Do Marys stuff Case Else 'Do other stuff End Select End If End Sub
Thua người hai chữ GIÀU SANG Hơn người hai chữ ĐÀNG HOÀNG .... Hiền quá đâm ra nhu nhược Giàu chưa chắc hẳn đã sang nhưng nghèo thường đi đôi với hèn Đàng hoàng cũng có nhìu kiểu đoàng hoàng Cà chớn cũng có nhìu kiểu cà chớn ...
Sub Cà Chớn () Dim Cachon As String Cachon = MsgBoPrompt:="Is your name cachon or not cachon ?", _ Buttons:=vbYesNoCancel, Title:="Test Module") If Cachon = vbYes Then MsgBox ("Congratulation !!!" & vbLf & "Your name is Ca' Cho'n " ) ElseIf Cachon = vbNo Then MsgBox ("Congratulation !!!" & vbLf & "Your name is not Ca' Cho'n ") Else Exit Sub End If End Sub
Đò Dọc , Đò Ngang , hoho mai mốt lòi ra thêm mấy cái nick Đò Xéo , Đò Xuôi, Đò Ngược, Đò Lèn , Đò Quan ... Củ Chuối , Củ Hành , Củ Tỏi cóa ùi , mai mốt sẽ xuất hiện củ cà rốt , củ khoai lang ...