basic

    1热度

    1回答

    我需要在Visual Basic中执行cmd命令。这并不困难,但我需要在外部程序运行时提供参数。 F:\mysql-5.7.13-winx64\bin\mysqldump.exe -h <ip> -u <user> -p <database> > abcd.sql 但是在执行之后,程序将要求输入密码。那我该怎么做? 问候,多米尼克

    0热度

    1回答

    我必须编写一个程序来选择随机指示灯并点亮它,但是我无法使RANDOM函数正常工作。我已经包含了下面的代码。 main: RANDOM w0 w1 = w0// 10+ 1 SELECTCASE w1 Case1: high b.1 pause 1000 low b.1 Case2: high b.2 pause 1000

    2热度

    1回答

    我知道这个命令比较并可以减去数值,但我并不确切地看到它是如何工作的。我已经使用了TI BASIC编程教程网站(http://tibasicdev.wikidot.com/movement-explanation),我需要在整个List上进行说明。 与列表中的这部分代码如下所示,: :min(8,max(1,A+sum(ΔList(Ans={25,34→A :min(16,max(1,B+sum(

    2热度

    3回答

    在LibreOffice基本子我在数组中使用一堆uno属性。为了使用getByName“function”,我必须“嵌入”它们的最简单的Unostructure或UnoService? 例子: dim props(1) as new com.sun.star.beans.PropertyValue props(0).Name = "blahblah1" props(0).Value = "b

    0热度

    1回答

    我为时钟系统公司工作,有时无法访问路由器和其他工具来查找网络中的某些东西。 所以我做了这个,但得到的错误。我需要能够扫描端口9922,TCP上的内部网络。 Imports System.Net.Sockets Imports System.Net Imports System.Threading Imports System.Text Module Module1 Dim por

    1热度

    1回答

    我试图从窗体上的textfield获取值。 sub Test(oEv) oForm = oEv.Source.Model.Parent textBox = oForm.getByName("Description") MsgBox textBox.Text end sub 有一个例外: “类型:com.sun.star.container.NoSuchElementExceptio

    1热度

    1回答

    我使用下面的代码在QB64捕获控制,中断: ON TIMER(1) GOSUB breaktrap TIMER ON x = _EXIT ' disable break DO _LIMIT 50 x$ = INKEY$ LOOP breaktrap: v = _EXIT IF v THEN PRINT "*break*" SLEEP 5

    0热度

    3回答

    我需要识别字符串中的以下模式。 “2N”:“2N”:“2N” - “2N” - “2N” - “2N” - “2N”/'2N'/'2N“ - ”2N“ 2N” 等等..... 基本上我想这个模式,如果写成简单的语言 2号码[:/ - 2个号码[:/ - 2个号码 所以反正是有我可以写出一种涵盖所有可能情景的模式?否则我必须写出总共9个模式,并且必须将所有9个模式匹配到字符串....并且这不是我的代

    0热度

    1回答

    我想用visual basic在excel中执行几行数据搜索。 基本上,搜索每个产品的网站...并不重要,如果它打开多个窗口或选项卡或任何...没有什么需要与网页做。这是我当前的尝试: Private Sub CommandButton1_Click() Dim index As Integer index = 1 Dim searchme As String

    0热度

    1回答

    我想要做的是计算LibreOffice Calc宏的一些单元格的平均值... 通过以下代码: REM ***** BASIC *** ** Private Sub myrange() myrange = Range("G31:G42") Range("H45") = WorksheetFunction.Average(myrange) End Sub 我得到了错误: BASIC运行时错