小编Jea*_*ett的帖子

在重载的构造函数中重用代码

我的BigBlock类需要一些重载的构造函数.所有这些都需要以相同的方式初始化相同的几个字段.

这样做的正确方法是什么?是否要创建一个函数,例如Initialize在下面的示例中,执行这些操作,并让所有构造函数调用该函数?

public class BigBlock {
    private Thing parentThing;
    Units lengthUnit;
    LabCoordinateSystem labCoordinateSystem;

    private void Initialize(){
        lengthUnit = parentThing.getPreferredUnits(0);
        labCoordinateSystem = parentThing.getCoordinateSystem();
    }

    BigBlock(Thing myThing){
        parentThing= myThing;
        Initialize();
    }

    BigBlock(Thing myThing, double x, double y, double z){
        parentThing= myThing;
        Initialize();
        // more code involving x, y, z
    }

    // a few more constructors

}
Run Code Online (Sandbox Code Playgroud)

java oop constructor

10
推荐指数
1
解决办法
6894
查看次数

如何在执行期间保持VBScript命令窗口打开

当我执行VBScript时,它创建的命令窗口会在用户有机会读取输出之前快速关闭.如何在不修改Windows注册表的情况下让窗口保持打开状态?

这是代码:

Set objShell = WScript.CreateObject("WScript.shell") 
objShell.Run "SyncToyCmd.exe -R", 1, True
Run Code Online (Sandbox Code Playgroud)

vbscript command-window

10
推荐指数
1
解决办法
5万
查看次数

获取包含32位程序的"程序文件"文件夹的路径

如何使用VBA确定包含32位程序的文件夹的完整路径?它在32位Windows系统上称为"程序文件",但在64位系统上称为"程序文件(x86)".

windows vba

10
推荐指数
4
解决办法
2万
查看次数

我们何时应该使用未初始化的静态最终变量?

我们何时应该使用未初始化的静态最终变量?我知道一个未初始化的静态最终变量只能在静态初始化程序块中赋值,但我想不出任何实际用途.

java final

10
推荐指数
3
解决办法
2800
查看次数

根据屏幕形状或对接状态自动更改Windows 7任务栏位置

使用VBScript或任何其他编程语言可以实现以下目标:

  • 检测屏幕形状 - 或计算机是否已停靠
  • 更改Windows任务栏位置

我想要实现的目标:

我的笔记本电脑有一个14英寸的宽屏:相当宽,但不是很高.我发现将Windows任务栏放在屏幕左侧最方便,因为我可以节省宽度而不是垂直空间.

然而,当我在办公室时,我的电脑坐在一个扩展坞,并连接到一个漂亮的大方形屏幕.在这里,我更喜欢将任务栏放在其默认位置,即底部.

当然,我知道如何在任务栏属性中手动切换两个任务栏位置.但我每天都这样做几次,这很烦人.我的问题是:我可以自动更改任务栏位置吗?

例如,在启动时(或从休眠状态唤醒),将运行一个脚本来检测:

  • 屏幕形状是否高于4:3?(或任何数字)
  • 电脑是否停靠在扩展坞?

如果是,请将任务栏放在底部,否则放在左侧.

有人知道怎么做或者能让我走上正轨吗?或者是否已经有一个实用程序可以做到这一点?

windows vbscript automation taskbar windows-7

10
推荐指数
1
解决办法
4942
查看次数

如何比较工作表中的两个整行

我是VBA的新手.我手头有工作来提高VBA代码的性能.为了提高代码的性能,我必须读取整行并将其与另一行进行比较.在VBA中有什么办法吗?

伪代码:

sheet1_row1=read row1 from sheet1
sheet2_row1=read row1 from sheet2
if sheet1_row1 = sheet2_row1 then
      print "Row contains same value"
else
      print "Row contains diff value"
end if
Run Code Online (Sandbox Code Playgroud)

excel vba excel-vba

10
推荐指数
3
解决办法
5万
查看次数

Excel - 哪里条件?

我有两列数据:

    A         B
1   HELIOS    AU
2   HELIOS
3   HELIOS    AU
4   SPARTA
5   HELIOS    AU

Countif(A..;"HELIOS") AND Countif(B..;"AU")
Run Code Online (Sandbox Code Playgroud)

我可以计算一列中的HELIOS或SPARTA的数量.但是我如何计算每个HELIOS或SPARTA的AU数量?

excel count where

9
推荐指数
1
解决办法
2万
查看次数

告诉Excel VBA TextToColumns不要用空格分割

我在Excel 2003中使用VBA.这是我遇到的问题最简单的例子.我想只用逗号将一个字符串拆分成行中的单元格.

在Cell A1中,我有以下字符串:

A B,C
Run Code Online (Sandbox Code Playgroud)

在VBA中,如果我说Range("A1").TextToColumns Comma:=True,Space:=False,它会做我期望的.单元格A1是A B,单元格B1是C

但如果我有这个字符串:

A B C,D
Run Code Online (Sandbox Code Playgroud)

然后,如果我使用Range("A1").TextToColumns Comma:=True,Space:=False它,它无论如何都会被SPACES分割!单元格A1是A,单元格B1 B,单元格C1是C,D(?!)

TextToColumns当有多个空格时,为什么会自动按空格分割,即使我明确告诉它不要?这是一个已知的错误?有没有解决方法,除了自己手动将字符串解析为列?

csv excel vba

9
推荐指数
1
解决办法
3836
查看次数

格式化一个double以省略不必要的".0"并且永远不会四舍五入

我知道如何格式化double以仅保留可用的小数位(DP),最多只能保留一定数量的DP.此示例最多可保留4个DP.

    double d = 1.0;
    DecimalFormat df = new DecimalFormat("#.####");
    System.out.print(df.format(d)); // returns "1"

    double d = 1.23;
    DecimalFormat df = new DecimalFormat("#.####");
    System.out.print(df.format(d)); // returns "1.23"

    double d = 1.2345678;
    DecimalFormat df = new DecimalFormat("#.####");
    System.out.print(df.format(d)); // returns "1.2346", rounding off: bad!
Run Code Online (Sandbox Code Playgroud)

现在我想要整数,例如1.0"1"没有必要的情况下返回.0,#格式字符确实提供了该功能.但是我该如何确保数字永远不会变圆呢?是否有任何其他的方式比任意长的链其他#"#.###########################################"

或者我应该使用double到string的默认转换,并截断".0"它在结尾处是否出现:

    String s = "" + d;
    if(s.substring(s.length()-2).equals(".0")) {
        s=s.substring(0, s.length()-2);
    }
Run Code Online (Sandbox Code Playgroud)

这两种方式看起来都非常笨拙.

java string-formatting

9
推荐指数
1
解决办法
1万
查看次数

带VBA的矩阵数学(线性方程组)

我正在寻找一些帮助在Excel的VBA中执行一些矩阵数学.我已经阅读了大量的回复建议使用Excel工作表,但我希望在VBA代码本身内解决这个问题.

虽然我的应用程序要大得多,但我要说我有一个线性方程组,我需要解决:

  x1 +   x2 = 8
2*x1 + 4*x2 = 100
Run Code Online (Sandbox Code Playgroud)

这可以用简单的矩阵公式A*x = B或x = A ^( - 1)*B来解决,其中,

A = [1, 1; 2, 4]
B = [8; 100]
Run Code Online (Sandbox Code Playgroud)

如果你解决这个问题,你会发现x1 = -34和x2 = 42.就矩阵而言,那么:

X = [-34; 42]
Run Code Online (Sandbox Code Playgroud)

使用Excel的工作表以及它的MMULT和MINVERSE函数使这很容易,我已经让它工作得很好.我的问题是我需要在VBA函数中进行此计算.这是我正在尝试的:

Dim A(0 To 1, 0 To 1) As Single
Dim B(0 To 0, 0 To 1) As Single
Dim X(0 To 0, 0 To 1) As Single

A(0, 0) = 1
A(1, 0) = 1
A(0, 1) = 2
A(1, …
Run Code Online (Sandbox Code Playgroud)

arrays math excel vba matrix

9
推荐指数
1
解决办法
1万
查看次数