• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

xin code "Chạy (execute) một dòng code" bằng vb.net

Nơi trao đổi về các vấn đề trong lập trình Windows Forms, Console dùng cú pháp ngôn ngữ Visual Basic .NET và C#

Điều hành viên: tungblt, vuathongtin

kedatinh233
Thành viên chính thức
Thành viên chính thức
Bài viết: 19
Ngày tham gia: T.Ba 23/12/2008 9:26 am
Đến từ: https://vankhannom.info
Liên hệ:

xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi kedatinh233 » T.Ba 20/09/2011 9:55 am

ai có code "Chạy (execute) một dòng code" bằng vb.net cho mình xin với. mình không chuyển qua vb.net được



Hình đại diện của người dùng
dazzlingvit
Guru
Guru
Bài viết: 960
Ngày tham gia: T.Ba 18/01/2011 10:21 am
Đến từ: Sinh ra từ hư vô, sống trong thế giới ảo...
Has thanked: 7 time
Been thanked: 112 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi dazzlingvit » T.Ba 20/09/2011 10:53 am

Bạn chuyển "từ đâu" sang VB.NET ?! Chạy một dòng code? Ý bạn là chạy một dòng code dưới dạng một xâu hả? Theo mình biết thì cái này hay được dùng ở các ngôn ngữ kịch bản (script). .NET thì không làm được việc này.

Hình đại diện của người dùng
bangnhatquang68
Guru
Guru
Bài viết: 791
Ngày tham gia: T.Ba 26/01/2010 12:44 pm
Đến từ: Vĩ tuyến 17
Has thanked: 20 time
Been thanked: 38 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi bangnhatquang68 » T.Ba 20/09/2011 12:15 pm

cái thằng vịt này hay phán bừa!
.net ai bảo không làm được.
đọc lại bài của bác phú dùm cái coi.
msscriptcontrol á
Mời anh em lên facebook giao lưu nào!
http://www.facebook.com/groups/145823032176611/

phamcanh1990
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 89
Ngày tham gia: T.Ba 16/08/2011 7:27 pm
Đến từ: TP Vũng Tàu
Has thanked: 7 time
Been thanked: 15 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi phamcanh1990 » T.Ba 20/09/2011 12:26 pm

Chỉ 1 dòng code là có thể thao tác với CSDL như là : Delete, Update, Insert into
VD: Delete (Update,Insert tương tự)
  1. Kn.TruyVanDuLieu("Delete From HocSinh Where MaHS='"& TxtMaHS.Text &"'")

Đó là 1 dòng code mà có thể thực hiện được việc Delete
:> :> :>

kedatinh233
Thành viên chính thức
Thành viên chính thức
Bài viết: 19
Ngày tham gia: T.Ba 23/12/2008 9:26 am
Đến từ: https://vankhannom.info
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi kedatinh233 » T.Ba 20/09/2011 1:19 pm

mình không hiểu lắm bạn nói cụ thể hơn được không vậy? mình đang nói đến cái này nè.

Mã: Chọn hết

'Thanks To ----------michka - Michael Kaplan
'Rest of code by Sergio Perciballi -oigres P (Aug-6-2000)
'Email: oigres@postmaster.co.uk
'Uses the Function used by the immediate window
'to execute a line of code.
Option Compare Text
Option Explicit

Private Declare Function EbExecuteLine Lib "vba6.dll" _
        (ByVal pStringToExec As Long, ByVal Foo1 As Long, _
        ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

' For VB5 IDE
'Declare Function EbExecuteLine Lib "vba5.dll" _
(ByVal pStringToExec As Long, ByVal Foo1 As Long, _
ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

' For Access 97/VBE.dll clients Like Word 97 And Excel 97
'Declare Function EbExecuteLine Lib "vba332.dll" _
(ByVal pStringToExec As Long, ByVal Foo1 As Long, _
ByVal Foo2 As Long, ByVal fCheckOnly As Long) As Long

Function FExecuteCode(stCode As String, _
            Optional fCheckOnly As Boolean) As Boolean

    FExecuteCode = EbExecuteLine(StrPtr(stCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function

Private Sub Form_Load()
    FExecuteCode "msgbox app.Title"
    FExecuteCode "msgbox("Chao " & inputbox("Ten cua ban: ", "Nhap ten") & vbcrlf & "Hom nao ranh di nhau nha!")"
End Sub


gửi bởi truongphu » T.Ba 13/01/2009 3:25 pm
* Cần text1 và text2. Command1
* Khi run: gõ biểu thức vào text1, vd 5*6+4 Xong nhấn command1, text2 ra kết quả

Option Explicit
Private WithEvents AddedCommandButton As CommandButton
Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Unknownn1 As Long, ByVal Unknownn2 As Long, ByVal fCheckOnly As Long) As Long

Public Function ExecuteLine(sCode As String, Optional fCheckOnly As Boolean) As Boolean
  ExecuteLine = EbExecuteLine(StrPtr(sCode), 0&, 0&, Abs(fCheckOnly)) = 0
End Function
Private Sub Command1_Click()
ExecuteLine "var=" & Text1 & ":Form1.Text2.Text=var"
End Sub

phamcanh1990
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 89
Ngày tham gia: T.Ba 16/08/2011 7:27 pm
Đến từ: TP Vũng Tàu
Has thanked: 7 time
Been thanked: 15 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi phamcanh1990 » T.Ba 20/09/2011 2:59 pm

Tóm lại mục đích chỉ có 1: là Thực hiện nhanh chóng các thao tácđối với CSDL trong code Project
Ý của mình đang nói đến là : lớp kết nối:
Tác dụng của lớp kết nối này là: Giúp thao tác CSDL 1 cách nhanh chóng và hiệu quả(Insert into, update, delete) chỉ bằng 1 dòng code...
:> :> :>

Hình đại diện của người dùng
dazzlingvit
Guru
Guru
Bài viết: 960
Ngày tham gia: T.Ba 18/01/2011 10:21 am
Đến từ: Sinh ra từ hư vô, sống trong thế giới ảo...
Has thanked: 7 time
Been thanked: 112 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi dazzlingvit » T.Ba 20/09/2011 3:43 pm

bangnhatquang68 đã viết:cái thằng vịt này hay phán bừa!
.net ai bảo không làm được.
đọc lại bài của bác phú dùm cái coi.
msscriptcontrol á

Đừng có kết luận là "hay phán bừa" :P Dù sao cũng cảm ơn về cái MSScriptControl.

Hình đại diện của người dùng
bangnhatquang68
Guru
Guru
Bài viết: 791
Ngày tham gia: T.Ba 26/01/2010 12:44 pm
Đến từ: Vĩ tuyến 17
Has thanked: 20 time
Been thanked: 38 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi bangnhatquang68 » T.Ba 20/09/2011 3:53 pm

Không phán bừa thì xử dùm anh mấy cái excel mà anh hỏi kìa! để lâu rồi mấy ổng biết thì không vào 4rum nên chả ai trả lời cho mình. ~X(
hừ hừ ~X(
Mời anh em lên facebook giao lưu nào!
http://www.facebook.com/groups/145823032176611/

Hình đại diện của người dùng
dazzlingvit
Guru
Guru
Bài viết: 960
Ngày tham gia: T.Ba 18/01/2011 10:21 am
Đến từ: Sinh ra từ hư vô, sống trong thế giới ảo...
Has thanked: 7 time
Been thanked: 112 time
Liên hệ:

Re: xin code "Chạy (execute) một dòng code" bằng vb.net

Gửi bàigửi bởi dazzlingvit » T.Ba 20/09/2011 3:54 pm

Không biết thì vào xử kiểu gì !


Quay về “Visual Basic .NET và C# (VB.NET & C#)”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.4 khách