日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

Qt5调用VBS脚本

發布時間:2024/8/1 编程问答 28 豆豆
生活随笔 收集整理的這篇文章主要介紹了 Qt5调用VBS脚本 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

今天看自己的學習資料,突然發現有一個demo程序是利用Qt5調用VBS腳本的,想起之前用Qt5調用VBS腳本直接生成Excel文件了。這些小眾的需求分享一下吧,可能是我從哪位大神那里弄回來的,侵權請及時告知我。話不多說,上代碼:


Qt工程里面文件如下:

首先是需要調用的VBS腳本文件,這個文件要添加進Qt資源里面,VBScript.vbs:

Function ShowMyMsgVb(msg)MsgBox(msg)End FunctionFunction fun()MsgBox("111")End Function

vbs腳本里面一個是帶參數的函數,一個是不帶參數的函數。


ui界面如下:


mainwindow.cpp代碼如下:

#include "mainwindow.h" #include "ui_mainwindow.h"MainWindow::MainWindow(QWidget *parent) :QMainWindow(parent),ui(new Ui::MainWindow) {ui->setupUi(this);if(!initVBScripts()){QMessageBox::critical(this, "Error", "Script not loaded!");return;} }MainWindow::~MainWindow() {delete ui; }void MainWindow::on_hello_btn_pressed() {main_scrpt->call("ShowMyMsgVb(QString)", ui->msg_edit->text());//main_scrpt->call("fun()"); }bool MainWindow::initVBScripts() {scrpt_mgr = new QAxScriptManager(this);main_scrpt = scrpt_mgr->load(":/VBScript.vbs", "MyScript");if(!main_scrpt)return false;return true; }

mainwindow.h代碼如下:

#ifndef MAINWINDOW_H #define MAINWINDOW_H#include <QMainWindow>#include <QtWidgets> #include <ActiveQt>namespace Ui {class MainWindow; }class MainWindow : public QMainWindow {Q_OBJECTpublic:explicit MainWindow(QWidget *parent = 0);~MainWindow();bool initVBScripts();private slots:void on_hello_btn_pressed();private:Ui::MainWindow *ui;QAxScriptManager *scrpt_mgr;QAxScript *main_scrpt; };#endif // MAINWINDOW_H

main.cpp代碼如下:

#include "mainwindow.h" #include <QApplication>int main(int argc, char *argv[]) {QApplication a(argc, argv);MainWindow w;w.show();return a.exec(); }

pro文件內容如下:

#------------------------------------------------- # # Project created by QtCreator 2015-11-17T14:18:49 # #-------------------------------------------------QT += core gui axcontainergreaterThan(QT_MAJOR_VERSION, 4): QT += widgetsTARGET = QtVbscriptExample TEMPLATE = appSOURCES += main.cpp\mainwindow.cppHEADERS += mainwindow.hFORMS += mainwindow.uiRESOURCES += \resources.qrc

運行結果見下圖:

總結

以上是生活随笔為你收集整理的Qt5调用VBS脚本的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。